打印

[讨论] lua-买大小的脚本

vcamed

小妖

Rank: 1

UID: 29615
精华: 0
积分: 33
威望: 0 度

妖城妖精勋章

阁楼大中小发表于 2017-3-18 16:38 只看该作者

lua-买大小的脚本

缺点有:
+ ~) t, u0 a0 R$ T$ b" X8 v
1这个开奖会公告发出来

2不会借用论坛骰子脚本做出骰子图像.
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート  l, N9 }/ T* Q% ~1 j" R8 A% ?( G
3不能定时开奖 (譬如2分钟一次)
bbs.mocwww.com2 H- u* C9 M  d  x5 h1 V9 `
4不会判断豹子魔力私服,最新魔力宝贝私服技术交流( e6 m) A: b0 G: W+ J/ r( H& g$ R
魔力私服,最新魔力宝贝私服技术交流4 K! O7 t3 [/ R. o

第一次动手做的lua,老手别见怪.

function ng_TalkEvent(player,msg,color,range,size)
妖城在线论坛1 \+ K. `- z: I
                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);bbs.mocwww.com# V5 m3 A; |2 G* |. g: {/ d
                              ro2 = math.random(1,6);
                              ro3 = math.random(1,6);bbs.mocwww.com/ y/ y* l* w& t" \$ k$ u- Y
                              local roo = ro1+ro2+ro3, s" d2 T7 l) i3 [4 Q
                              local QQ = 10000; --购买数量
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end妖城在线论坛2 l( J0 U# B" x. r7 E4 E1 [$ p
                              Char.AddGold(player,-QQ);妖城在线论坛" s  t$ v  _1 D' f5 B, |5 r5 H
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";妖城在线论坛2 q* X& p8 e8 l/ E1 d
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);; l0 q% e  k# R; L! H7 t. W8 x
                              if (roo>11) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
                                    return 0魔力私服,最新魔力宝贝私服技术交流: C1 D) H4 X" H* A
                              end
                              Char.AddGold(player,battlePrizeGold);
            endbbs.mocwww.com8 [( D6 y8 N3 C# y8 M3 @
                                    if msg== "[10000大]"  then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート1 M$ w' B' ]: x" W9 ]  P: Q9 S
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end
                              Char.AddGold(player,-QQ);                               魔力私服,最新魔力宝贝私服技术交流( g) D/ G9 ^; s8 x+ R2 Q
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 m1 Y$ Q# w  ]1 k0 D/ |' k
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力宝贝私服技术交流) ]/ j$ P5 n  \  K7 r
                              if (roo<10.5) then; |& X8 `; ^2 }' q# q3 i
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")bbs.mocwww.com6 }4 c1 Y& t$ p+ M
                                    return 0
                              end魔力私服,最新魔力宝贝私服技术交流4 |* F7 ^( ~- c' t# N
                              Char.AddGold(player,battlePrizeGold);
            end

            end

[ 本帖最后由 vcamed 于 2017-3-18 17:05 编辑 ]

本帖最近评分记录

全熟牛排溅血妖力 +10 2017-11-22 00:07
全熟牛排溅血妖币 +10 2017-11-22 00:07

TOP

vcamed

小妖

Rank: 1

UID: 29615
精华: 0
积分: 33
威望: 0 度

妖城妖精勋章

沙发大中小发表于 2017-3-18 16:44 只看该作者

整理了一下顺序魔力私服,最新魔力宝贝私服技术交流  L# S+ M0 A5 R9 L  X, g2 x

function ng_TalkEvent(player,msg,color,range,size) 妖城在线论坛1 k$ Z3 W: E8 U8 B! h0 f

local shenshang =Char.GetData(player, %对象_金币%) bbs.mocwww.com8 l# s6 D: d1 p
ro1 = math.random(1,6);bbs.mocwww.com6 |2 i  a( f0 f1 i4 l
ro2 = math.random(1,6);
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 c. R! Z5 p9 l/ b$ u! n
local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力宝贝私服技术交流6 X$ L6 K& t, @' v7 Y
bbs.mocwww.com; ?1 @3 s% m% ?% f( S
if (shenshang<QQ) then4 Z" u" K1 q! [, I% A3 V: V2 U
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ w* L  y5 x7 I6 G2 r
return 0
endbbs.mocwww.com0 ]9 _4 h$ m- R& `- l; C
Char.AddGold(player,-QQ);bbs.mocwww.com# ?- ^2 q0 M" k3 K) `: l& f

buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";魔力私服,最新魔力宝贝私服技术交流; _3 F: Z  d6 d+ w* ]
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);

if msg== "[10000小]"  then
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
return 0
end
end

if msg== "[10000大]"  then
if (roo<10.5) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート( h3 i  O/ Q2 N; |& F' f( t1 g! ?
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
return 0
end
end 魔力私服,最新魔力宝贝私服技术交流2 X6 m& N/ o1 N# x1 {- k, S1 {, q
Char.AddGold(player,battlePrizeGold); 魔力私服,最新魔力宝贝私服技术交流; W  }. D5 Z4 Q% P; G
end

TOP

vcamed

小妖

Rank: 1

UID: 29615
精华: 0
积分: 33
威望: 0 度

妖城妖精勋章

板凳大中小发表于 2017-3-18 17:37 只看该作者

这是GA的魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 g. R6 Y, N" H9 _8 N# i4 K% y
妖城在线论坛4 F( ]. I' e9 ^! [* c4 x

function ng_TalkEvent(player,msg,color,range,size) —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート0 S' E2 Z% z# D+ s: F0 e1 P% k

local shenshang =Char.GetData(player, %对象_金币%) 魔力私服,最新魔力宝贝私服技术交流5 \4 F- Z) e4 f, P. j' K/ a
ro1 = math.random(1,6);
ro2 = math.random(1,6);
ro3 = math.random(1,6);妖城在线论坛  A& \+ _4 D, `( c+ u
local roo = ro1+ro2+ro3—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 v& T' t$ n& Q5 ?; A
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 y" k" R4 @" C: @
local battlePrizeGoldb = QQ*4.90;--豹子bbs.mocwww.com& h; ^/ Y7 P4 |  E5 v
妖城在线论坛; a7 m# `1 {8 k: h& E% g
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then$ C2 t2 n# z3 q7 ~. _/ W8 b
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート) q0 l) ~4 G  Z5 }9 E7 i
return 0: l' N' M3 ^7 W% @' [0 ~3 a" S
end
Char.AddGold(player,-QQ);$ L  e+ x# s' y* \) N

if (ro1 == ro2 and ro2 == ro3) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")
if (msg== "[10000豹子]")  then& \. e6 }0 h5 z% v0 X3 L8 e" p7 e# x
Char.AddGold(player,battlePrizeGoldb);2 [, b1 e, ?8 w1 Y9 C# H% ^
end
elseif (roo<10.5) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力宝贝私服技术交流+ t- r$ b. x. _6 K+ b8 a( r
end魔力私服,最新魔力宝贝私服技术交流. T% D) k$ x. t- D
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")% K5 _% a; K; y" S, H  Q: S
if (msg== "[10000大]") then魔力私服,最新魔力宝贝私服技术交流* h$ r1 j4 W: T# M& p% D
Char.AddGold(player,battlePrizeGold);
end 魔力私服,最新魔力宝贝私服技术交流; L8 {0 d6 e  X( P1 g: Q0 j1 ^
end
return 0
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# ?9 d) `7 [0 g$ j( @# ^
end

TOP

vcamed

小妖

Rank: 1

UID: 29615
精华: 0
积分: 33
威望: 0 度

妖城妖精勋章

地板大中小发表于 2017-3-26 18:32 只看该作者

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表
* M2 P+ _+ M1 K; v! V( ^9 h% o$ h' ~$ |没有NPC吗没有NPC吗

现在还是不会怎么建立npc

TOP