打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:

1这个开奖会公告发出来妖城在线论坛8 V6 L3 C2 a5 b, w* A7 V
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表) P" D/ S/ U# N* f6 i# J$ U
2不会借用论坛骰子脚本做出骰子图像.
bbs.mocwww.com$ ?% F! i+ ^( S2 @
3不能定时开奖 (譬如2分钟一次)魔力私服,最新魔力宝贝私服技术交流& e* K& {! m9 l4 q% l, a
bbs.mocwww.com# t; |" w" V, I% c2 m
4不会判断豹子
& V% ]' u& K( h! n. ~
魔力私服,最新魔力宝贝私服技术交流0 R/ P  U  }% i3 ~; N0 D6 \& V
第一次动手做的lua,老手别见怪.% C" V! Q$ P: X) A: |* J0 z# w# B

function ng_TalkEvent(player,msg,color,range,size)       妖城在线论坛+ U9 @$ H4 i' F2 L, m- D. ?8 G
bbs.mocwww.com  F" b3 D$ z/ _
                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 i1 Z$ H& m% P4 F: R4 H1 F
                              ro2 = math.random(1,6);
                              ro3 = math.random(1,6);bbs.mocwww.com: b2 z' ~- }. C7 S' V+ M
                              local roo = ro1+ro2+ro3魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 o; l$ H- \7 m+ x+ v# V- R& j
                              local QQ = 10000; --购买数量
                              local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力宝贝私服技术交流' n" z# z& W9 \. b% C( Q6 m
                              if msg== "[10000小]"  thenbbs.mocwww.com* v$ a" x4 j! w2 x! m3 L% r
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力宝贝私服技术交流, _5 r/ i2 z* P/ F
                                    return 0妖城在线论坛1 Z: d: o5 ^1 U+ G8 y7 W
                              end妖城在线论坛1 D4 n6 R" z7 o  U
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力宝贝私服技术交流4 J( ]  p# L! N' T) K
                              if (roo>11) then- N2 a/ l& s5 A- ]" `
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")妖城在线论坛5 g" R8 h7 j3 i8 K& O/ Q
                                    return 0) f# u7 z7 f6 v; y4 g# z  j* b! G6 d
                              end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表6 i8 E+ \6 y* d8 S
                              Char.AddGold(player,battlePrizeGold);
            end
                                    if msg== "[10000大]"  then
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！"): u+ v/ N2 s% D$ i4 x( R( `
                                    return 0
                              end" }+ m4 b" C3 D. J" i
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";妖城在线论坛+ t1 H' Y  c8 w" I  t$ \  ^. f
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力宝贝私服技术交流5 ~; G+ u" Y- l- x
                              if (roo<10.5) then妖城在线论坛5 J; n0 u7 D" U9 H! [9 O
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート$ j4 ~0 j/ Y' X0 W; x8 j& |# n
                                    return 0
                              endbbs.mocwww.com0 X4 x0 f% |1 C& W4 a4 u' W
                              Char.AddGold(player,battlePrizeGold);                               魔力私服,最新魔力宝贝私服技术交流+ I0 v4 C0 N, z: g: L: G4 W; b
            end
            ; F% x4 z) d) H! {' Z. V4 t+ c
            end
bbs.mocwww.com+ Q. g! ^. y& X) P% U: V  u
[ 本帖最后由 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 只看该作者

整理了一下顺序魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表8 ~) `, s! b: k. g) D2 t8 X

function ng_TalkEvent(player,msg,color,range,size)
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表, w4 _% Q& n; V
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);
ro2 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 g5 [7 y% o) q5 W8 |
ro3 = math.random(1,6);bbs.mocwww.com, B/ v4 Z$ @0 w) h: _2 s8 @$ Q# X& ?! J
local roo = ro1+ro2+ro3魔力私服,最新魔力宝贝私服技术交流' Z: ]$ k4 h0 ]4 h% z, l
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费

if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表8 s9 [; H( q! Q6 X& D
end妖城在线论坛8 h* ^) @: x. ~- D7 r
Char.AddGold(player,-QQ);
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表  i; L  Z! e$ G8 Z9 Y! @
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";妖城在线论坛, [- u. b9 W% O$ l. Y2 {2 [1 H
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);

if msg== "[10000小]"  then
if (roo>11) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* z3 H7 O6 \4 a1 J! e6 h3 h* s4 \* {
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
return 0
end
end

if msg== "[10000大]"  then
if (roo<10.5) then2 e, b' ]' S; j) j, _) J$ B
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")0 V1 b( ?% ~7 {9 [0 @& D/ X# h+ _
return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. k; b1 X* P6 P3 J2 H
end 魔力私服,最新魔力宝贝私服技术交流) q3 z" Q7 t' ]
end
Char.AddGold(player,battlePrizeGold);
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的

function ng_TalkEvent(player,msg,color,range,size) 妖城在线论坛* p: u& I+ s/ J6 D( w8 Y' h( j
bbs.mocwww.com/ v; n) C- |7 ^3 q" V/ E2 y) e4 U
local shenshang =Char.GetData(player, %对象_金币%) 妖城在线论坛' Z6 K/ i( u0 J* P
ro1 = math.random(1,6);
ro2 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" k) t( H1 I( J/ P
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量妖城在线论坛1 t) ^! @0 L8 J' |, z0 z
local battlePrizeGold = QQ*1.90;--收小费
local battlePrizeGoldb = QQ*4.90;--豹子

if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then* g4 ?8 ]: c/ w1 c' F- H8 D7 T8 {
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0
end
Char.AddGold(player,-QQ);
魔力私服,最新魔力宝贝私服技术交流; f  E& |- ?" U$ W
魔力私服,最新魔力宝贝私服技术交流9 a$ D& R6 K3 k8 c- w- u  z7 G
if (ro1 == ro2 and ro2 == ro3) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")魔力私服,最新魔力宝贝私服技术交流2 H+ z$ g% E, s: a
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);
endbbs.mocwww.com! ]( T0 G5 G  p/ }# K& q4 @
elseif (roo<10.5) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then 妖城在线论坛5 T: b+ U8 U4 }' U9 t, v1 G
Char.AddGold(player,battlePrizeGold);
end
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买"); n; m' _$ ]4 h, E$ n7 Q: x
if (msg== "[10000大]") then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ P* A% P6 m3 u+ |5 ~" T
Char.AddGold(player,battlePrizeGold);! x" c# g' ]4 L+ t4 P2 {
end 魔力私服,最新魔力宝贝私服技术交流6 V1 y( l8 ~: @2 L7 G% y- K
end魔力私服,最新魔力宝贝私服技术交流/ K7 N+ u/ H% G2 N' F8 z) s) ^: Z
return 0魔力私服,最新魔力宝贝私服技术交流5 e3 v" s, P, A+ h/ S* D! p4 F
end魔力私服,最新魔力宝贝私服技术交流2 G! y& n  w' S( ^* D% i0 a
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表 —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# K9 h: c; u/ m0 K; \
没有NPC吗没有NPC吗

bbs.mocwww.com' y! e S" A- }! @
现在还是不会怎么建立npc

TOP