打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:

1这个开奖会公告发出来魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表! v8 G6 y/ A+ w9 \# ?; \
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# ?( [: g! E  V. t. b$ L4 |
2不会借用论坛骰子脚本做出骰子图像.bbs.mocwww.com6 y& b' b, T; [1 T* L( O

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

4不会判断豹子

第一次动手做的lua,老手别见怪.; n. g* t# r7 A. M# z
  a+ D( b6 s  c
function ng_TalkEvent(player,msg,color,range,size)
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( R  o9 P9 E$ y% u8 z
                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);bbs.mocwww.com1 Q+ ]  ], Y. {
                              ro2 = math.random(1,6);1 ^/ O  T1 W5 n$ n) u! c1 J1 F
                              ro3 = math.random(1,6);
                              local roo = ro1+ro2+ro3
                              local QQ = 10000; --购买数量
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! }/ c* Y  H6 T# m0 Q- X2 v' r
                              if (shenshang<QQ) then魔力私服,最新魔力宝贝私服技术交流1 s! L& M& ?" x" S, Y
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0bbs.mocwww.com, _$ U3 `) p+ A* n& J0 d
                              end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート  ]( Z) X2 d, j) y, ^
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);# N1 `& r7 q0 f
                              if (roo>11) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
                                    return 0
                              end
                              Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力宝贝私服技术交流! {; K, z' t' [5 K! q
            end
                                    if msg== "[10000大]"  then
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 y5 v( a2 ]% s& L6 a: v
                                    return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表% {" q% [. Z; U9 y* K5 K
                              end
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);$ k9 [% i. Y  V6 M4 v
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")' _% ?+ u) `) Y8 O, D
                                    return 0
                              end
                              Char.AddGold(player,battlePrizeGold);                               —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート( D8 V6 b, p9 X8 e: B# c5 }
            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 只看该作者

整理了一下顺序
魔力私服,最新魔力宝贝私服技术交流4 v7 ~; R3 ^7 F3 e$ g9 u% _$ y6 n
function ng_TalkEvent(player,msg,color,range,size)
bbs.mocwww.com# ?7 b/ j5 {" u1 v- B( Y- D
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流3 I$ Z! c! r/ p7 p( A$ V
ro2 = math.random(1,6);
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 W9 x7 `7 {7 N+ X
local QQ = 10000; --购买数量魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# {) \+ O: g5 Z5 u1 u3 r
local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力宝贝私服技术交流% {% a) z2 _. C' e' o
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 k8 X" Z% f; b+ M9 g$ B
if (shenshang<QQ) then- ^8 L+ O* M1 d7 z
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0bbs.mocwww.com, N2 |3 C3 O3 p2 W9 r( v
end
Char.AddGold(player,-QQ);6 I. d+ f9 [; m/ `* E

buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート. q$ k! y  o$ l; B8 X
if msg== "[10000小]"  then妖城在线论坛9 ^% h4 a! v" t1 h
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")魔力私服,最新魔力宝贝私服技术交流! R& q5 Q* ~6 L0 }
return 0魔力私服,最新魔力宝贝私服技术交流- Q4 Z' k+ l- `7 v: ~& e" S9 X
end魔力私服,最新魔力宝贝私服技术交流* `+ W3 Y* V* _
endbbs.mocwww.com- l; |2 m$ ?4 b* |! u

if msg== "[10000大]"  then 魔力私服,最新魔力宝贝私服技术交流0 h! Z6 P1 o0 l
if (roo<10.5) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
return 0
end 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表, k$ t; J2 |! N' A# ]: F1 p
end
Char.AddGold(player,battlePrizeGold); —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 Z+ E* l7 l/ i9 l5 |1 V, y5 {" z
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的魔力私服,最新魔力宝贝私服技术交流6 k& V! \8 s7 d
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表) N" v% {) r, j5 O
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 C, `) {( E+ C9 ~; N
function ng_TalkEvent(player,msg,color,range,size) —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート. @: G0 `: S& c0 L& c
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表6 C3 w  y* p- p3 B7 T
local shenshang =Char.GetData(player, %对象_金币%) 妖城在线论坛0 g. G$ V+ F7 H" D, ~, H/ Z
ro1 = math.random(1,6);bbs.mocwww.com# {2 b8 c# o' W' u  M
ro2 = math.random(1,6);
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费
local battlePrizeGoldb = QQ*4.90;--豹子
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# e- |" q; }0 b' A6 O; q
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then魔力私服,最新魔力宝贝私服技术交流3 p" o/ a  U- P  Z! w( h! X5 O2 S
if (shenshang<QQ) then妖城在线论坛. F, O2 Z$ g. s7 [; b
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力宝贝私服技术交流  s5 z5 }2 p1 p$ ^5 H* W1 C
return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート- D& H$ b) d) P- \7 V2 u; r
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表5 g2 [6 I* E4 ]4 M
Char.AddGold(player,-QQ);魔力私服,最新魔力宝贝私服技术交流; Q, t1 V  G* D  X

if (ro1 == ro2 and ro2 == ro3) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")妖城在线论坛0 \+ r( C0 Q7 @* e; L
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表% t  Y: S1 r3 m
endbbs.mocwww.com: j7 {# X! ~: E2 B
elseif (roo<10.5) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then : k1 e( b' z* B  O+ a4 A
Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表& q8 e/ h% Q5 {+ Q5 \
end
else魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 f. Z% |* E  V
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")
if (msg== "[10000大]") then魔力私服,最新魔力宝贝私服技术交流# g9 w6 f, }# p7 X3 Q' \5 S( f
Char.AddGold(player,battlePrizeGold);
end 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表4 M6 ^, {! r1 Q2 c, g/ j
end# ?6 x' {9 X5 p0 H3 h' e/ Z
return 0
end
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

引用:

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

魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表- a8 s9 e# u" Q# {: y
现在还是不会怎么建立npc

TOP