打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:

1这个开奖会公告发出来魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表! x, I2 j0 a7 Z) d: I9 H: i( ~& d
9 C6 X. W% ~' t8 g/ ^
2不会借用论坛骰子脚本做出骰子图像.

3不能定时开奖 (譬如2分钟一次)

4不会判断豹子

第一次动手做的lua,老手别见怪.
" p; Y' }9 m. O' Q
function ng_TalkEvent(player,msg,color,range,size)
妖城在线论坛* ~" O0 z5 `8 _4 z2 W6 M( U4 E5 F
                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);/ R: F, A' L) A1 q! r
                              ro2 = math.random(1,6);
                              ro3 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 A3 k# u- s  R
                              local roo = ro1+ro2+ro3魔力私服,最新魔力宝贝私服技术交流) J9 @9 M7 N: J( E  Z  H
                              local QQ = 10000; --购买数量妖城在线论坛" u/ ~# Q- K& G
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then
                              if (shenshang<QQ) then妖城在线论坛. D- N. a8 z8 u( D- c
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# t2 g9 e, X  ?) P
                              if (roo>11) then魔力私服,最新魔力宝贝私服技术交流! @9 Q; Q  x+ I  B3 ?0 H
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
                                    return 0
                              end
                              Char.AddGold(player,battlePrizeGold);1 I" w  Q" U4 G, N- {
            end妖城在线论坛5 M6 u5 r1 v) v3 n
                                    if msg== "[10000大]"  then
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end妖城在线论坛/ ]# A3 e$ c* B% L7 D, @$ a- D/ z
                              Char.AddGold(player,-QQ);                               —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート( S' ?+ Z) d% E% V. }
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート$ t5 U! J+ {; [. @9 }  M- @
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表) z2 S0 t* \) M8 G& o/ D- |) \
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")魔力私服,最新魔力宝贝私服技术交流' T3 p& O) L5 t' C1 N9 |2 Q
                                    return 0
                              end魔力私服,最新魔力宝贝私服技术交流8 ~& X  {; V( g7 \
                              Char.AddGold(player,battlePrizeGold);                               —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート1 A( E" X+ i' F) Y4 V, i
            end                                     ) ^3 O& _; A" _, I& }  l2 ^
            魔力私服,最新魔力宝贝私服技术交流4 V0 |& I5 e1 U
            endbbs.mocwww.com! ?/ A& d( N- _, U; I$ w2 _

[ 本帖最后由 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 只看该作者

整理了一下顺序魔力私服,最新魔力宝贝私服技术交流$ ]* O- q5 d# _& x# I3 W/ G4 N
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート5 m0 M7 Q/ H8 C
function ng_TalkEvent(player,msg,color,range,size)
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート8 q5 Y, S+ f8 U  a1 v, K# n1 t
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流4 F6 w$ o3 E5 C! _% }
ro2 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表  g0 G) ]  G' E; a2 \  X
ro3 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流+ [" T& Y; [5 w* G2 G
local roo = ro1+ro2+ro3魔力私服,最新魔力宝贝私服技术交流' p- D" I5 T- D  u) |" ]3 O) A5 D9 r7 S
local QQ = 10000; --购买数量魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ r5 s: O; X9 ~
local battlePrizeGold = QQ*1.90;--收小费妖城在线论坛4 d$ }8 b& @0 H; l- {/ N

if (shenshang<QQ) then魔力私服,最新魔力宝贝私服技术交流1 `9 y, F9 {# G7 x
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")bbs.mocwww.com( W; S2 n% Q+ y4 w
return 0
end
Char.AddGold(player,-QQ);

buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);bbs.mocwww.com, C/ d( J. {- f3 ~* C

if msg== "[10000小]"  then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表) T1 ~/ K9 m) c
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
return 0魔力私服,最新魔力宝贝私服技术交流% Z9 ?- Q' M* t
end* x+ p0 j0 w1 h
end
魔力私服,最新魔力宝贝私服技术交流! g+ A* p: N  p4 e7 u- G! t
if msg== "[10000大]"  then 妖城在线论坛- L' E/ D% ?1 o% x
if (roo<10.5) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート- o, _% l4 d1 \0 @6 o. z
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
return 0bbs.mocwww.com; x5 p8 N$ T. r9 t4 `& N
end
end
Char.AddGold(player,battlePrizeGold); 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表) x6 O4 P- }6 ?& N: ^
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的
魔力私服,最新魔力宝贝私服技术交流: N- m5 \" T; ]
4 w8 P; T5 b7 D: F1 [- |) q
function ng_TalkEvent(player,msg,color,range,size)

local shenshang =Char.GetData(player, %对象_金币%) 8 ^" z; j+ f4 m/ y0 `" H. j
ro1 = math.random(1,6);
ro2 = math.random(1,6);
ro3 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* m, L  m; [6 _8 N) f; u
local roo = ro1+ro2+ro3妖城在线论坛) K* D7 J. S2 t7 k& Y8 e2 F
local QQ = 10000; --购买数量魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表! ?2 G5 Q* i9 M. U. U* ^  l
local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力宝贝私服技术交流' S! H. V( D$ b; ?
local battlePrizeGoldb = QQ*4.90;--豹子魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( S9 l/ t, z7 t
魔力私服,最新魔力宝贝私服技术交流& X, ~  T8 ^; Y- }& t
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") thenbbs.mocwww.com- |% M. X* H5 f& d: ]# Z
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")- c# L+ T* o0 |! D
return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート( t5 a, n  z! G6 p; S2 f
end
Char.AddGold(player,-QQ);bbs.mocwww.com4 a+ h- d0 |: @0 g+ m' ?( ?6 \+ T% o

% V& ?! ?, Z: \" \1 D0 E. w
if (ro1 == ro2 and ro2 == ro3) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")
if (msg== "[10000豹子]")  then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート% t# R0 w- y2 c$ @' a
Char.AddGold(player,battlePrizeGoldb);妖城在线论坛7 s' p  ], ~) E& N- n
end魔力私服,最新魔力宝贝私服技术交流9 b6 x( M% o- q, U& p
elseif (roo<10.5) thenbbs.mocwww.com4 J7 K5 Z6 e4 w" T1 K  [- G
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")妖城在线论坛1 B$ \6 ^/ y7 y# b+ Y$ Z2 k
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);
end
elsebbs.mocwww.com" g! ]( e  Y% J4 ^( v& J
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")
if (msg== "[10000大]") then
Char.AddGold(player,battlePrizeGold);妖城在线论坛4 Q3 i* _5 O9 Y# b' M) ^* h! D
end
end6 Z) c% d9 M, Y
return 0魔力私服,最新魔力宝贝私服技术交流6 o, W  j4 }9 l3 L
endbbs.mocwww.com; H5 H. K: _( B) A% N% j
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表
没有NPC吗没有NPC吗

魔力私服,最新魔力宝贝私服技术交流4 X: P$ O. a6 _9 c
现在还是不会怎么建立npc

TOP