打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:

1这个开奖会公告发出来

2不会借用论坛骰子脚本做出骰子图像.妖城在线论坛+ l3 W6 O2 V5 _6 V& \; X

3不能定时开奖 (譬如2分钟一次)# U! O9 z: \, h" J) s

4不会判断豹子魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ ~" y/ F# t" }( o4 K5 R
8 z( j9 l( W8 H7 W

第一次动手做的lua,老手别见怪.
妖城在线论坛( [7 Y1 Q/ ~  B% T, X: |/ {
function ng_TalkEvent(player,msg,color,range,size)

                              local shenshang =Char.GetData(player, %对象_金币%)                               bbs.mocwww.com+ C3 l/ k4 }: [  E+ Z
                              ro1 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流0 |! H+ x; \  n4 A7 H
                              ro2 = math.random(1,6);bbs.mocwww.com; M! _1 t& G+ V- f2 i
                              ro3 = math.random(1,6);bbs.mocwww.com2 L! d, ?6 [9 Y# H
                              local roo = ro1+ro2+ro3
                              local QQ = 10000; --购买数量bbs.mocwww.com7 e$ v) z( O) G
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then( V) E: k4 o" M& w
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")bbs.mocwww.com, ]* M2 c2 u) a; Z7 @, m& {6 w
                                    return 0妖城在线论坛1 }; u: x2 u# c4 _/ U
                              end妖城在线论坛4 O6 N0 \6 P# B3 t7 Y. Q4 X$ k
                              Char.AddGold(player,-QQ);妖城在线论坛3 P' O7 t; D* \% I% n1 F' d3 a, q
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo>11) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# A7 g% `1 D$ `! t0 e( i8 }9 l. c
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
                                    return 0
                              end
                              Char.AddGold(player,battlePrizeGold);
            endbbs.mocwww.com. ?! k# e1 S% O9 @9 ^
                                    if msg== "[10000大]"  then: x" Y1 X* p0 m3 F$ h# ~
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表, w. v' F8 @# N5 a
                              Char.AddGold(player,-QQ);                               bbs.mocwww.com$ X* E9 f8 R: O5 ]
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力宝贝私服技术交流, K0 p9 B; @/ Z8 M
                              if (roo<10.5) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 w2 i- |) ?' E! U* o1 Z
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート; n) U3 M* o" u1 h+ |
                                    return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 S  n+ j& s# c
                              end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' v6 Q4 x* p6 L% z% H; ~0 e8 x6 O
                              Char.AddGold(player,battlePrizeGold);
            end                                     2 U1 v, G) ^* ^

            endbbs.mocwww.com* ~' A; m; |, z% i
bbs.mocwww.com6 C- G1 y$ d, I) h; S
[ 本帖最后由 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 只看该作者

整理了一下顺序bbs.mocwww.com  B) ~, Q1 {! O- |, i: K
妖城在线论坛0 r5 v/ v. ]8 Y! R& c$ |1 y1 j
function ng_TalkEvent(player,msg,color,range,size)
bbs.mocwww.com, X' e) M+ p- M# [! a* y
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);
ro2 = math.random(1,6);
ro3 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流# c3 I( Z, m0 }, [  O/ N0 }
local roo = ro1+ro2+ro3魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( A; J6 v7 x* w* s" a0 r6 }* D8 y
local QQ = 10000; --购买数量—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート" o, S! [: L4 b0 q% w0 T
local battlePrizeGold = QQ*1.90;--收小费妖城在线论坛6 ]/ V5 e, G  ]6 U: b
bbs.mocwww.com* e' r( z8 d2 W6 K7 s6 c5 Q
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0
end
Char.AddGold(player,-QQ);妖城在线论坛) c8 x9 u. c5 d) M3 Z
魔力私服,最新魔力宝贝私服技术交流2 {* e. D' S% s# K3 t) m0 \% M
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);

if msg== "[10000小]"  then
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 q' ^2 X1 o# \+ v& G
return 0
end
end魔力私服,最新魔力宝贝私服技术交流$ c3 }1 `; v" A& k& A  ~3 `
魔力私服,最新魔力宝贝私服技术交流4 U' x7 N5 y7 r& l" Y& Y8 n
if msg== "[10000大]"  then 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 c" s4 e; f/ w; r
if (roo<10.5) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: L* R. ?+ [# I, t; E9 ?
return 0
end 魔力私服,最新魔力宝贝私服技术交流3 C: g5 v8 j% X( m8 m3 h5 I! ~
end
Char.AddGold(player,battlePrizeGold); bbs.mocwww.com3 Z8 B0 g7 j% @- Z8 E) {
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート8 }* {4 K3 Q+ L/ h
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 o1 A% S0 F- L8 J% ^3 X: ?5 ]
魔力私服,最新魔力宝贝私服技术交流7 l. d5 L' z& \
function ng_TalkEvent(player,msg,color,range,size) —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート( ^: }$ h. w% b* X; _7 b) Z; k

local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート- p9 V8 V2 E$ _9 [3 W* L
ro2 = math.random(1,6);6 N: [  w2 r, N' ^6 L
ro3 = math.random(1,6);bbs.mocwww.com9 a1 \3 b! d. B: S# w" T; N
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ ^- a3 O2 G8 p5 {/ I
local battlePrizeGoldb = QQ*4.90;--豹子—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' X7 X0 ?# Y- s$ o$ S4 L( i7 l
( E, \7 A5 R8 s" H0 |$ C4 |3 V; D
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")bbs.mocwww.com% ]" c/ f9 m, v- b; f
return 0
end
Char.AddGold(player,-QQ);

if (ro1 == ro2 and ro2 == ro3) then妖城在线论坛* ?" I" j& q8 Q3 Y& Q9 r5 {$ b* Z
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")' V" ?3 x3 y4 X' ~1 O& K
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);
end魔力私服,最新魔力宝贝私服技术交流: B4 M: q% [! }: _
elseif (roo<10.5) then: r1 G) w" T/ k
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")妖城在线论坛/ h8 x, Q5 l- `7 _
if (msg== "[10000小]")  then 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 X- b# E; ~/ Q  D6 Y
Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力宝贝私服技术交流' ]& B1 D' d! |' _4 O
end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート: X, G! s; `" \& B
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")& S) J0 ~/ E7 M
if (msg== "[10000大]") then
Char.AddGold(player,battlePrizeGold);bbs.mocwww.com+ {, a  s) N1 q; x5 w, b
end 魔力私服,最新魔力宝贝私服技术交流9 N( U6 ~  T/ `8 Y+ r' e
end
return 0魔力私服,最新魔力宝贝私服技术交流0 |2 ]/ Y5 d: d, |
end魔力私服,最新魔力宝贝私服技术交流8 |0 _4 L. e6 @# u7 i$ L
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表魔力私服,最新魔力宝贝私服技术交流; ~6 s2 O _& _8 P
没有NPC吗没有NPC吗

bbs.mocwww.com5 O/ T$ a9 M E' R) ^) @ b+ U+ j
现在还是不会怎么建立npc

TOP