打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

阁楼大中小发表于 2017-3-18 16:38 显示全部帖子

lua-买大小的脚本

缺点有:

1这个开奖会公告发出来 bbs.mocwww.com7 O3 n2 P7 O% J- l

2不会借用论坛骰子脚本做出骰子图像." M7 o; T3 W, y3 a  g
, M4 n/ E& l) u
3不能定时开奖 (譬如2分钟一次)魔力私服,最新魔力宝贝私服技术交流( i& ]$ m8 f* E* b
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( @) \) }9 Q* q9 @
4不会判断豹子

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

function ng_TalkEvent(player,msg,color,range,size)       妖城在线论坛: ^9 E' i3 h+ k

                              local shenshang =Char.GetData(player, %对象_金币%)                               魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表; B( _* l8 g; _3 o3 y
                              ro1 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 t/ \9 ?& Y' j! {: X& F9 t& a! Z1 U
                              ro2 = math.random(1,6);
                              ro3 = math.random(1,6);
                              local roo = ro1+ro2+ro3
                              local QQ = 10000; --购买数量
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then
                              if (shenshang<QQ) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ z/ w5 S. ~7 m, a
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0魔力私服,最新魔力宝贝私服技术交流( |% ^6 X% h5 y& z! {1 @; `3 b1 I
                              end
                              Char.AddGold(player,-QQ);bbs.mocwww.com$ l- j! x+ A2 B: i1 {; W6 \
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo>11) then妖城在线论坛8 x9 Z7 s! D; h5 t
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
                                    return 0魔力私服,最新魔力宝贝私服技术交流) l) `( J! K0 f  _
                              end
                              Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ u6 u2 h/ y0 e) k" C8 H+ T2 y. b
            end
                                    if msg== "[10000大]"  then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート. y$ E. w5 T# @7 s' u; {
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end
                              Char.AddGold(player,-QQ);                               —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート6 K1 z% K  y) r2 i8 d
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")妖城在线论坛3 C5 G# g3 O5 z3 l- q  n% j; C  f
                                    return 0
                              end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート" c2 G2 J! a3 h3 y" Q; S6 h
                              Char.AddGold(player,battlePrizeGold);
            end                                     2 N) v  K; ?1 A) h

            end
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. p! f% C4 U, {! Q: o7 j
[ 本帖最后由 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 显示全部帖子

整理了一下顺序

function ng_TalkEvent(player,msg,color,range,size)
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! n0 w6 p5 Y4 ^
local shenshang =Char.GetData(player, %对象_金币%) 3 C( ]5 c' F9 b; ~5 T! V! T
ro1 = math.random(1,6);
ro2 = math.random(1,6);
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3bbs.mocwww.com& v# n+ @, o, G
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费妖城在线论坛! a  D& {* \2 n, n) c' K
/ O+ \7 g+ i2 G
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0
end
Char.AddGold(player,-QQ);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表& i1 t# F. t, ]) N2 x& H
魔力私服,最新魔力宝贝私服技术交流, a* A0 e" E  `  s( q: m
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' n# v- w/ L; W4 d) |/ E( D
if msg== "[10000小]"  then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート8 O  [* b1 X: B
if (roo>11) then妖城在线论坛( S: a6 Z8 ?, O! H: w& V
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")bbs.mocwww.com; |* U6 G0 `* t: q9 d3 D% b
return 0
end
end
妖城在线论坛3 h8 Y7 E, n! H  b& @$ o# @4 `. }
if msg== "[10000大]"  then
if (roo<10.5) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
return 0bbs.mocwww.com& o, e6 _' R4 r& ?  |, u0 O
end
end 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表5 z! F1 j. J' g. C" V1 P
Char.AddGold(player,battlePrizeGold); 魔力私服,最新魔力宝贝私服技术交流" o3 h3 h; g/ m8 Q
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

板凳大中小发表于 2017-3-18 17:37 显示全部帖子

这是GA的魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( P7 c2 b+ j; x9 ]

魔力私服,最新魔力宝贝私服技术交流( i2 [8 B; t% L+ j' N  Z
function ng_TalkEvent(player,msg,color,range,size)

local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 |2 x$ W: P5 {' g
ro2 = math.random(1,6);妖城在线论坛6 N/ X3 u7 p( a1 W  \5 ?! h3 @* O
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表+ \6 m, P6 _1 H
local battlePrizeGoldb = QQ*4.90;--豹子
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: p" c) l- _( w/ L( K  c- A6 N0 {
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") thenbbs.mocwww.com: c: k' B  O& F9 [
if (shenshang<QQ) thenbbs.mocwww.com# m$ W: r* N7 N! P
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0* F" Q0 O2 J$ T9 a+ c6 ]
end
Char.AddGold(player,-QQ);妖城在线论坛' o2 ~7 e" S8 O- y2 v( t

bbs.mocwww.com+ K6 a% g$ a' J2 x" I8 i, `
if (ro1 == ro2 and ro2 == ro3) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")
if (msg== "[10000豹子]")  then妖城在线论坛* S/ I" F; \; \+ h% S7 R
Char.AddGold(player,battlePrizeGoldb);
end
elseif (roo<10.5) then! p7 Q5 O1 |. s8 x: G# u; ?2 [) g
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力宝贝私服技术交流( V' V# q: a! }: P2 d
endbbs.mocwww.com1 H5 |3 P+ z. B5 B4 a
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表+ ]  P4 y! ~8 @
if (msg== "[10000大]") then魔力私服,最新魔力宝贝私服技术交流+ ]7 j2 P/ u0 I! W# A
Char.AddGold(player,battlePrizeGold);
end 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ [$ @5 e# x! U  {! E$ @" S
end魔力私服,最新魔力宝贝私服技术交流, ], Z+ N+ A1 `$ D/ s# z
return 0, ^: ]+ x4 z7 O) f; Z/ ?
end
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

地板大中小发表于 2017-3-26 18:32 显示全部帖子

引用:

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

现在还是不会怎么建立npc

TOP