打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:妖城在线论坛' O" A; p3 Q! @; O; w
bbs.mocwww.com, j# x; ?6 R$ h- @  }0 n" N- f
1这个开奖会公告发出来

2不会借用论坛骰子脚本做出骰子图像.  \% f) D- E/ T
妖城在线论坛! S( a6 b) Z0 E3 d! V& A
3不能定时开奖 (譬如2分钟一次)魔力私服,最新魔力宝贝私服技术交流# P2 d4 c6 j8 ^+ L6 h
bbs.mocwww.com# ^6 b4 B% o9 b1 e3 _" u
4不会判断豹子

魔力私服,最新魔力宝贝私服技术交流' d1 d8 ]* u' u2 V% B, C2 t
第一次动手做的lua,老手别见怪.

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

                              local shenshang =Char.GetData(player, %对象_金币%)                               魔力私服,最新魔力宝贝私服技术交流, T  E2 A# M5 l2 G
                              ro1 = math.random(1,6);妖城在线论坛5 _- k# c' Z# H8 E
                              ro2 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. e' M" U: }& A3 |- d" i
                              ro3 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流2 ^4 v( y7 x9 w8 R0 L: ^
                              local roo = ro1+ro2+ro3bbs.mocwww.com- z9 W, k  o! D- h
                              local QQ = 10000; --购买数量
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* r/ V) K- L- P9 d6 L
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo>11) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")1 r6 P& }" s8 Q3 v5 D
                                    return 0魔力私服,最新魔力宝贝私服技术交流5 P: R- o8 U0 b! _9 |) H
                              end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 }% ^5 ~# i$ V" _( A9 A, g
                              Char.AddGold(player,battlePrizeGold);妖城在线论坛8 y3 r6 Q' T# U* ]* Q3 D
            end  s, c* ~1 v* S
                                    if msg== "[10000大]"  then
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")* n6 S6 A' ], `# y1 r
                                    return 0
                              end
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";魔力私服,最新魔力宝贝私服技术交流% p! V: \9 t; ]6 B& _0 S  A* ]
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート% |$ {5 ^0 ]8 A& V  M$ N. r
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")妖城在线论坛/ o: @) r8 y% f) @$ P
                                    return 0魔力私服,最新魔力宝贝私服技术交流) L  t( W! `, l
                              end
                              Char.AddGold(player,battlePrizeGold);
            end

            end

[ 本帖最后由 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 只看该作者

整理了一下顺序6 h5 B, ~0 N0 S0 c- D
妖城在线论坛+ k  J0 ^2 k& H4 t
function ng_TalkEvent(player,msg,color,range,size)
魔力私服,最新魔力宝贝私服技术交流) `; w$ y1 U* ?9 u: _6 q
local shenshang =Char.GetData(player, %对象_金币%) —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 x$ f; O8 Y6 T% t8 z& i
ro1 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流) o/ V$ ~8 `. F. R
ro2 = math.random(1,6);bbs.mocwww.com% r6 S0 N( `8 z$ ~
ro3 = math.random(1,6);妖城在线论坛& m& q8 c) w' @4 i
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力宝贝私服技术交流: I2 q! y) d1 g* A

if (shenshang<QQ) then魔力私服,最新魔力宝贝私服技术交流3 q. M) O/ I( E7 p, |
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表+ T: g; t) {. b8 E
return 0
end
Char.AddGold(player,-QQ);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* s& l8 w2 t/ X) m; I
bbs.mocwww.com- K$ I% O( S/ U$ h6 B" X6 K# R
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);4 e* Q2 @/ \2 ?; G: G. ~* ^7 {

if msg== "[10000小]"  then
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")0 a* p) T4 W6 q) d# D
return 0
end. l0 H- H3 E" _; ^1 I9 U
end
bbs.mocwww.com1 g2 j2 D+ V3 V+ V% L  u
if msg== "[10000大]"  then
if (roo<10.5) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")魔力私服,最新魔力宝贝私服技术交流2 J8 A( _* d' |$ J. Z
return 0
end 魔力私服,最新魔力宝贝私服技术交流8 P- U7 G$ L, o5 f4 E- k
end 妖城在线论坛  u  S$ P* k* J/ J/ _' Z9 n$ ?7 A
Char.AddGold(player,battlePrizeGold);
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& m- P3 I. V, R1 l* R" C" i

魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 \7 q% o, _  g, J7 [- r
function ng_TalkEvent(player,msg,color,range,size)

local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);& h% J( H; [% V9 v& p' k/ \  a
ro2 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# v7 P7 c$ E& B" f! A
ro3 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 ?) D) a4 \+ t3 u  V# v) d
local roo = ro1+ro2+ro3—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート" n7 W' \6 X. A
local QQ = 10000; --购买数量—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ F$ @- y9 \0 H2 _* s+ p
local battlePrizeGold = QQ*1.90;--收小费
local battlePrizeGoldb = QQ*4.90;--豹子
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( O# W. _7 {0 R3 B7 I# V- c  i
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( T" t# k0 n* m7 a+ N
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0bbs.mocwww.com! w* f8 G! P/ i, \
end
Char.AddGold(player,-QQ);bbs.mocwww.com% J0 v, R+ I  @8 E# E! k; X9 o. V: r
妖城在线论坛5 A, n  [  d5 q0 U( p# v

if (ro1 == ro2 and ro2 == ro3) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);bbs.mocwww.com3 I# V9 ?+ I& ]/ r8 o0 g; e
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 {' A: }- k4 X. F1 H
elseif (roo<10.5) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then 魔力私服,最新魔力宝贝私服技术交流% q# W; E+ R3 U" c7 ^, l
Char.AddGold(player,battlePrizeGold);
end妖城在线论坛- k7 J  h* {! B3 y
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")
if (msg== "[10000大]") then
Char.AddGold(player,battlePrizeGold);
end 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表6 k9 a0 [# x/ p4 ^. m  W
end魔力私服,最新魔力宝贝私服技术交流; p# b5 G' Q  P) A- i( k
return 0
end
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表
没有NPC吗没有NPC吗

bbs.mocwww.com9 ^! g6 Q0 N7 u6 r' x+ r K
现在还是不会怎么建立npc

TOP