打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:

1这个开奖会公告发出来

2不会借用论坛骰子脚本做出骰子图像.bbs.mocwww.com5 n+ j. e* [* N1 n

3不能定时开奖 (譬如2分钟一次)—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート- b% Q* i3 D8 e3 @8 F2 n, N
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 W% R  L' H+ |8 q/ X
4不会判断豹子魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表8 m  _8 L/ }' B8 B( o

第一次动手做的lua,老手别见怪.
妖城在线论坛, h4 T; m* \" x$ \+ q, U3 O
function ng_TalkEvent(player,msg,color,range,size)       妖城在线论坛  O# u- [. a$ \* Z
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表5 C, M1 z5 u* J; C/ n: b+ z
                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);
                              ro2 = math.random(1,6);妖城在线论坛3 ?) p7 v2 I' ]" s+ ~: [5 w
                              ro3 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流+ K+ R7 n2 I' u0 ]0 C6 u
                              local roo = ro1+ro2+ro3, |, d- J5 h1 H" }; C9 {
                              local QQ = 10000; --购买数量
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then
                              if (shenshang<QQ) then2 ^* W& G. t* M+ l
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！"), G/ ]0 l4 t7 c) ]9 V6 S% h$ O5 d& ]
                                    return 0
                              end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' P* }, s+ p. W% `7 c3 h
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力宝贝私服技术交流2 D/ y* a2 R- S+ B
                              if (roo>11) thenbbs.mocwww.com2 {0 C* `: P( Y, S  Q; V+ O
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
                                    return 0: U5 n  F' U, N& V4 X
                              end妖城在线论坛& m  H/ S2 y, e7 _8 g! w% v% ~
                              Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' l, Q, w+ J8 y  l. s! R- g
            end妖城在线论坛6 d* E/ ]- s9 w! z
                                    if msg== "[10000大]"  then魔力私服,最新魔力宝贝私服技术交流" n* D/ C  |% k; R$ ]* J
                              if (shenshang<QQ) then妖城在线论坛: {3 c, [% U! c' e( Q8 U( z3 i
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* Z, e" _6 B& q1 w1 v% M
                                    return 0魔力私服,最新魔力宝贝私服技术交流! W8 s7 ^& _  L  E+ O
                              end
                              Char.AddGold(player,-QQ);                               —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ H8 ^/ v  \( w! ]. e
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力宝贝私服技术交流! N/ f( T; |1 h1 `' W
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")bbs.mocwww.com; n, ^+ K2 e- x* p) Z5 k
                                    return 01 G; S3 e# k5 [# r* s6 T
                              end魔力私服,最新魔力宝贝私服技术交流' p4 n5 D& Q/ ?! r8 a+ y& Q5 E
                              Char.AddGold(player,battlePrizeGold);                               魔力私服,最新魔力宝贝私服技术交流1 }, M: r; F3 O/ Q% g1 H
            end                                     —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート: u# @+ ?! n/ ^
            魔力私服,最新魔力宝贝私服技术交流5 S0 ?7 O% k; f" ?5 c
            end
魔力私服,最新魔力宝贝私服技术交流1 B4 o' }1 W% X2 ]0 I, {; A
[ 本帖最后由 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,电影,黑客,网络,网吧,破解,入侵,注册表7 S; Q5 {& j+ \. {
function ng_TalkEvent(player,msg,color,range,size) 魔力私服,最新魔力宝贝私服技术交流. C' ]! C+ b. x

local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);8 @: j2 D: r7 }" o
ro2 = math.random(1,6);
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表& l# z$ j) r9 p1 D7 H
local battlePrizeGold = QQ*1.90;--收小费
妖城在线论坛$ n. b# y7 ~3 |9 O# b! T
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0
end
Char.AddGold(player,-QQ);
妖城在线论坛1 h- F- Z3 ~6 b% t4 w* q6 K
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);bbs.mocwww.com6 v2 }9 |  B, N  k, n! }

if msg== "[10000小]"  then魔力私服,最新魔力宝贝私服技术交流' t3 s8 g5 f8 W) J
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
return 0
end
end
魔力私服,最新魔力宝贝私服技术交流  y" J* E1 n$ z! m# Q
if msg== "[10000大]"  then 魔力私服,最新魔力宝贝私服技术交流. K( i$ g% L4 J) x; X5 M7 X0 a
if (roo<10.5) then妖城在线论坛: }0 ]# i/ b: G/ n  O
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート9 u" l: S7 k+ }' v( _3 e4 c
return 0
end 魔力私服,最新魔力宝贝私服技术交流0 x' e! ?+ |& G: X% c
end - e  e0 n4 B: L: E4 p; w
Char.AddGold(player,battlePrizeGold);
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的
魔力私服,最新魔力宝贝私服技术交流, T# N; Y. M  u5 }0 t0 j- f! h1 G
bbs.mocwww.com7 Q1 d" }  ?3 W# z, |" b
function ng_TalkEvent(player,msg,color,range,size) 3 G7 B6 {0 Y, f: z* a0 R
魔力私服,最新魔力宝贝私服技术交流' B* n) `, e1 R/ ?1 i
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);
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;--豹子魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ P, V& |2 M$ a
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 b$ X) o  r' A) V; ~& [* ]. h
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then
if (shenshang<QQ) then妖城在线论坛: L4 _8 E7 G+ }( q
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. }; D: h) c0 ^# x# ?6 x
return 0妖城在线论坛6 e# I, J. }0 B* F) o
end妖城在线论坛* U8 w6 ]2 B% H( z0 Y. V# }
Char.AddGold(player,-QQ);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表- V2 y2 j- y+ f
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表% Z* y* x: s5 x' `1 w

if (ro1 == ro2 and ro2 == ro3) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" n! Q1 a# g% s& h1 Q
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")
if (msg== "[10000豹子]")  then妖城在线论坛) ^1 x! k3 o  D$ b1 E! R/ d
Char.AddGold(player,battlePrizeGoldb);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 v; Q# O& Y; r! i1 a
end妖城在线论坛+ b! f5 f; ~7 z' F! W
elseif (roo<10.5) thenbbs.mocwww.com" u+ X) K$ S4 n7 q( Q  B
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")bbs.mocwww.com2 b7 R5 b: Y3 L5 ]0 Y
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);妖城在线论坛9 m, F7 M& C8 G/ b( v$ Q6 Z
end
else魔力私服,最新魔力宝贝私服技术交流. c6 ^0 g, [  B1 R0 W% N
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")
if (msg== "[10000大]") then
Char.AddGold(player,battlePrizeGold);
end
endbbs.mocwww.com9 j$ H# u+ _1 g/ _
return 0
endbbs.mocwww.com, E$ U- Y; @3 x* A& R7 H
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表
: \8 U( M/ ^$ g" y妖城在线论坛没有NPC吗没有NPC吗

魔力私服,最新魔力宝贝私服技术交流 i- C+ j* Y1 k1 L, q' K
现在还是不会怎么建立npc

TOP