打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ s8 D& j: a+ Q' `! d; U
1这个开奖会公告发出来

2不会借用论坛骰子脚本做出骰子图像.

3不能定时开奖 (譬如2分钟一次)魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表6 T6 q$ L' ?0 g7 \7 X
魔力私服,最新魔力宝贝私服技术交流9 s' h9 o7 r3 A. S' T
4不会判断豹子

第一次动手做的lua,老手别见怪.
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表7 ?/ ?5 c7 P: J+ q% C6 P& i" h6 E
function ng_TalkEvent(player,msg,color,range,size)
6 G# E$ w# h+ E8 u; g9 \" R
                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート, k3 t" I" `! ]9 D* d" F# X
                              ro2 = math.random(1,6);妖城在线论坛; [3 z- _( O+ r9 y5 e5 b
                              ro3 = math.random(1,6);
                              local roo = ro1+ro2+ro3—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート1 T. i! j2 T) d, R4 m* I
                              local QQ = 10000; --购买数量bbs.mocwww.com1 T7 S. a2 N5 }1 E* h* D
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end
                              Char.AddGold(player,-QQ);妖城在线论坛8 z7 @0 H- U9 f: r, D
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);bbs.mocwww.com! u  M/ V& j1 i; x; M
                              if (roo>11) then魔力私服,最新魔力宝贝私服技术交流/ [+ l, Q/ j& r! Z
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")魔力私服,最新魔力宝贝私服技术交流1 l, {4 N& x' w. l" Q
                                    return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート0 p# o) `. H* F* p- c/ C
                              end$ C8 v/ z/ c" i* |9 o7 p
                              Char.AddGold(player,battlePrizeGold);bbs.mocwww.com/ a0 i: b! Q  N: d6 g
            end$ q( a4 c9 h9 R" \& V! J$ A
                                    if msg== "[10000大]"  then
                              if (shenshang<QQ) then妖城在线论坛) d) ?3 q# t, G% k: u
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")bbs.mocwww.com$ s1 L$ m4 k5 `& i* ]& p8 C! i: u
                                    return 0
                              end魔力私服,最新魔力宝贝私服技术交流5 E: G. y- o9 S: t
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
                                    return 0
                              end2 R5 G, J5 O( t$ p
                              Char.AddGold(player,battlePrizeGold);                               # w9 Z+ H" X+ F* x0 N# l
            end
            —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート7 O. \  p+ Y& @$ \
            end0 Y5 X& v! k5 M- E. r1 q5 o

[ 本帖最后由 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) 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 Z. T# j; D6 L. a8 k& Y

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魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: p) j* e, g- i+ ?: u
local QQ = 10000; --购买数量bbs.mocwww.com1 Z2 z% z" G$ G% b( Z$ M; n
local battlePrizeGold = QQ*1.90;--收小费
bbs.mocwww.com3 f3 v) B# J2 V
if (shenshang<QQ) thenbbs.mocwww.com% ?- o; z- i  l; P8 O& ~# B
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")bbs.mocwww.com9 f; s( e; Q# L! \7 L  B% B0 d0 Q& p
return 0魔力私服,最新魔力宝贝私服技术交流" I$ ?7 |% Y. C, g: a( A
end魔力私服,最新魔力宝贝私服技术交流! D. c# O6 w8 H% ]$ u2 x/ Q, k
Char.AddGold(player,-QQ);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" c1 G/ v5 }/ q. I# x7 M- `5 i4 D
魔力私服,最新魔力宝贝私服技术交流3 m1 {5 x% Q: x  x2 A) u
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート5 x4 q8 u4 T2 r5 N4 `+ Z; ^

if msg== "[10000小]"  then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* Q) w7 L) e/ G; g
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
return 0
end2 H7 W' W8 d6 K# @
end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート; ^, d3 D- |3 ~  u5 X

if msg== "[10000大]"  then
if (roo<10.5) then魔力私服,最新魔力宝贝私服技术交流7 {2 ?9 t/ i4 f# x: l2 i' @
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")魔力私服,最新魔力宝贝私服技术交流5 |+ Z! ^7 [' v, {% i/ n* t# v
return 0
end
end
Char.AddGold(player,battlePrizeGold); —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート- Y. e1 ?: m) }+ L; q
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的

魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: z( P8 R1 d; L! C& d
function ng_TalkEvent(player,msg,color,range,size) bbs.mocwww.com2 {0 @2 L4 h0 X- Q" E  j: u

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魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' U% t5 l! z: l9 H
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费
local battlePrizeGoldb = QQ*4.90;--豹子

if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0
end魔力私服,最新魔力宝贝私服技术交流" [! _* M8 v  C
Char.AddGold(player,-QQ);
bbs.mocwww.com# S' |  v8 M% M# M6 X9 t* E

if (ro1 == ro2 and ro2 == ro3) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);
end
elseif (roo<10.5) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")魔力私服,最新魔力宝贝私服技术交流; [) @1 v7 A6 S6 n8 ~5 @, r4 c
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);
endbbs.mocwww.com% M  `- a/ p  U
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")
if (msg== "[10000大]") then
Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力宝贝私服技术交流3 q' }" _4 Q% e1 e6 t0 b
end
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 ^; @/ U6 Z$ |$ o' @/ O
return 0% ~& o& u0 [, x0 P4 S
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