打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表) o, |1 {; h) \8 s' h' O4 t
1这个开奖会公告发出来 —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& N; I( `1 O( z  m. l

2不会借用论坛骰子脚本做出骰子图像.bbs.mocwww.com) `, \; q0 A8 ?$ s2 j7 v" _% ^4 [7 Q

3不能定时开奖 (譬如2分钟一次)

4不会判断豹子妖城在线论坛& P3 a1 h1 @9 u
1 K+ g7 ?, I0 ^4 }7 a3 U

第一次动手做的lua,老手别见怪.魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表8 R1 L. ~- q1 M- `
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' z2 W0 M/ G7 h
function ng_TalkEvent(player,msg,color,range,size)

                              local shenshang =Char.GetData(player, %对象_金币%)                               妖城在线论坛; r! Q: V: k. {3 u* R& z
                              ro1 = math.random(1,6);妖城在线论坛% d" H9 J. r& b- q
                              ro2 = math.random(1,6);
                              ro3 = math.random(1,6);妖城在线论坛, U, C. ]* |3 z  e$ F
                              local roo = ro1+ro2+ro3
                              local QQ = 10000; --购买数量魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表) S) t; v& u; H
                              local battlePrizeGold = QQ*1.90;--收小费% E6 n" k7 I1 ?' r+ I1 N' }  f
                              if msg== "[10000小]"  then妖城在线论坛  @8 h. Y% K- l
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")) W4 y1 M4 o0 L  J; a) Y% Y  Q
                                    return 0bbs.mocwww.com- ]& b7 u- K4 L$ C4 a
                              end
                              Char.AddGold(player,-QQ);/ D9 b/ Q" p  `
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 K! C6 A0 B1 Q2 t' C- i9 q
                              if (roo>11) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")妖城在线论坛7 R# R; T6 r( f5 {0 ?0 V
                                    return 0
                              end魔力私服,最新魔力宝贝私服技术交流3 W+ E7 S' I2 H8 p9 i  l
                              Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ c0 a3 h$ e, f6 m( H- y' K
            endbbs.mocwww.com+ V4 h  l) ^# y: h) w
                                    if msg== "[10000大]"  then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& t( I' F) u: y
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* ^$ h8 w+ o, g
                                    return 0
                              end8 m( b' f9 O9 S3 y, @! v! t1 L
                              Char.AddGold(player,-QQ);                               魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表! e" p, q' G# w' ~  B& g
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);bbs.mocwww.com! a5 C3 o) g0 s
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
                                    return 0
                              end
                              Char.AddGold(player,battlePrizeGold);                               bbs.mocwww.com! W( P1 \" A1 C% S
            end

            end
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート7 u: z( S- b( L2 q3 ^0 g" l
[ 本帖最后由 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编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& H4 z8 d' J5 u1 |. M
bbs.mocwww.com2 l& Q* _* e% z9 H0 T: Z8 Z
local shenshang =Char.GetData(player, %对象_金币%) 6 s# D% V, B; A( a
ro1 = math.random(1,6);bbs.mocwww.com4 f; S. B, d- {7 ^- [* n) U
ro2 = math.random(1,6);
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3妖城在线论坛* X: C; K/ q5 o% k7 Y+ T
local QQ = 10000; --购买数量—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート. d5 @2 E; c( Q* z
local battlePrizeGold = QQ*1.90;--收小费

if (shenshang<QQ) then魔力私服,最新魔力宝贝私服技术交流+ d4 s4 o8 l' W- @5 L( f& V
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力宝贝私服技术交流2 t+ x8 L% L/ o# Y; V- Z6 }
return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート) R; v( _  m- a5 S6 e- b
end妖城在线论坛; i+ z! n  a( s$ w* V4 c
Char.AddGold(player,-QQ);

buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";妖城在线论坛0 c3 ~# o8 t! K
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力宝贝私服技术交流7 M: l' O' L' X( G8 O( }; v

if msg== "[10000小]"  then
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
return 0: Y3 G0 [  A5 E/ B- W  f1 Q
end
end2 x6 ?) r" {9 F5 w( ~7 l: z1 V. c1 l
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート$ O; K& e6 K8 v7 s) Z3 B! g
if msg== "[10000大]"  then
if (roo<10.5) thenbbs.mocwww.com  F# B& w" K; e0 n/ f
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")魔力私服,最新魔力宝贝私服技术交流1 E6 B1 F. [8 X0 L. I
return 0
end
end 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ ]0 l2 \1 N5 \, i3 Q* s, r
Char.AddGold(player,battlePrizeGold);
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的0 F1 R( O: _+ O' G

function ng_TalkEvent(player,msg,color,range,size)

local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);
ro2 = math.random(1,6);妖城在线论坛  `! Y# D0 ]: m, r# K
ro3 = math.random(1,6);妖城在线论坛2 S- C; Q4 D7 z  C
local roo = ro1+ro2+ro3, m# W! S- v' a# M
local QQ = 10000; --购买数量魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: X* I: r5 Q! D0 t/ e+ o  E) x
local battlePrizeGold = QQ*1.90;--收小费
local battlePrizeGoldb = QQ*4.90;--豹子bbs.mocwww.com! _* p8 S/ ^) x' r+ i- l
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 M, @; I* Y! d/ k& Y
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then6 J$ E  Y! b# {8 l. |% L- t9 u! O
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0
end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート, a, {1 Q# L( {4 b
Char.AddGold(player,-QQ);
bbs.mocwww.com2 j3 |" B: g* D2 `# W* p& U
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ S1 @" ^& @5 B) \
if (ro1 == ro2 and ro2 == ro3) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")妖城在线论坛' k; C3 \+ \# j
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);
end
elseif (roo<10.5) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);
end
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")bbs.mocwww.com2 i3 L1 v$ K# M, [4 h6 h: a8 R
if (msg== "[10000大]") then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 j7 k  l9 X; y! w
Char.AddGold(player,battlePrizeGold);
end
end7 \) v# n0 g( h% {1 [
return 0魔力私服,最新魔力宝贝私服技术交流# a7 c6 e. A! i. P2 ~) x+ M
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