打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:妖城在线论坛6 _) s! e! C3 y1 }, {, p3 g$ R
% _9 D+ T4 T! A* ~% ~
1这个开奖会公告发出来 5 Q: H1 H' H* B* P7 f

2不会借用论坛骰子脚本做出骰子图像.
魔力私服,最新魔力宝贝私服技术交流! R4 l/ z# p4 T& J2 q* p. M/ Z
3不能定时开奖 (譬如2分钟一次)
妖城在线论坛0 o* t  q2 h, W* A. [8 M
4不会判断豹子
妖城在线论坛5 l% \( J& Q) h& I
2 Q9 Z" J2 Q( ]8 c
第一次动手做的lua,老手别见怪.

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

                              local shenshang =Char.GetData(player, %对象_金币%)                               bbs.mocwww.com/ f& E8 S3 g4 h
                              ro1 = math.random(1,6);
                              ro2 = math.random(1,6);
                              ro3 = math.random(1,6);
                              local roo = ro1+ro2+ro3. \# o& u+ o4 a! X
                              local QQ = 10000; --购买数量妖城在线论坛; i: ~# \" ^, B7 ~5 J
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then& i! S8 [3 m5 D6 c$ }* s- R
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ H, J" j/ e$ K
                              end魔力私服,最新魔力宝贝私服技术交流6 r3 u4 S( o3 @8 Y
                              Char.AddGold(player,-QQ);- M: N% b1 O8 ?* K% v6 ^9 e; K& }
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";bbs.mocwww.com3 L  B. \& T5 ?. [/ m8 o
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo>11) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")魔力私服,最新魔力宝贝私服技术交流# O/ a' s# A9 z: O$ L
                                    return 0
                              endbbs.mocwww.com$ A, p3 Z" Z, F1 X$ x+ p. A- z8 C
                              Char.AddGold(player,battlePrizeGold);bbs.mocwww.com: N2 b( y- U: Z* i" w6 c3 H
            end魔力私服,最新魔力宝贝私服技术交流( N! k' @4 ^# e0 O$ m* {+ P; X
                                    if msg== "[10000大]"  then! u- `( A* B+ D+ M3 T8 e
                              if (shenshang<QQ) then妖城在线论坛" i( q, n/ n8 b8 u4 u+ c
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! j# q5 P) r* j7 s1 t, C" a
                              Char.AddGold(player,-QQ);                               . i; O! }" {  O) d5 Y8 b, j! G
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート8 K) A& k7 C2 q& e
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート, p9 C* j: z6 Z
                                    return 0妖城在线论坛4 K1 H: D& j4 E/ J9 Z+ D9 O
                              endbbs.mocwww.com! t! {6 I6 l! q7 q
                              Char.AddGold(player,battlePrizeGold);
            end                                     妖城在线论坛; c" A* c0 i4 y$ M+ o: W

            end
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表; [; ?) r% `4 b+ ?/ d
[ 本帖最后由 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 只看该作者

整理了一下顺序
妖城在线论坛8 W4 w" I( D4 m6 K* D- H+ N
function ng_TalkEvent(player,msg,color,range,size)

local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);bbs.mocwww.com0 A3 l, b1 U7 A$ c7 [: {* E# p* _
ro2 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表5 q# |# S5 R2 o( f! A
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3bbs.mocwww.com" \; O* ]7 F3 q
local QQ = 10000; --购买数量妖城在线论坛/ k1 i/ {* h; ]3 ]
local battlePrizeGold = QQ*1.90;--收小费妖城在线论坛3 ~' q9 a. F( P& S! D- k, T

if (shenshang<QQ) thenbbs.mocwww.com1 r" Y' e3 B3 A/ \6 k
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ Y( i- {! N* A6 {- g$ c& B; j
return 0
end
Char.AddGold(player,-QQ);
bbs.mocwww.com  V* Q8 v7 v7 r0 Y; O( h
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);! `. T) Q( j. q1 ?9 k! z

if msg== "[10000小]"  then
if (roo>11) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表+ \/ ^$ ^+ o6 p0 @- @
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート+ [+ B+ f: y" c0 J. H' W+ D
return 00 E* b  z$ m! C9 B6 d6 e
end
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表! O4 n9 p) V# `# o( D; w* ^

if msg== "[10000大]"  then 魔力私服,最新魔力宝贝私服技术交流, o5 R# l( C/ `3 S, Z
if (roo<10.5) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")妖城在线论坛2 G: a, e- a8 C: \9 N
return 0
end bbs.mocwww.com6 x" T4 r* S. m
end
Char.AddGold(player,battlePrizeGold);
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的bbs.mocwww.com  T5 e; ~* E. w( k9 z# H% M
妖城在线论坛7 Y  z3 y) k2 F* ~* }. g

function ng_TalkEvent(player,msg,color,range,size) 妖城在线论坛$ m0 r# Z7 h; v' \! I

local shenshang =Char.GetData(player, %对象_金币%) 5 @# R, Z, \/ l0 N: i0 a
ro1 = math.random(1,6);
ro2 = math.random(1,6);妖城在线论坛3 @" o+ z1 m  ?, c) I- i, G
ro3 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート- `9 a; a  y2 p5 K
local roo = ro1+ro2+ro3—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート, d+ j$ y& p1 u" b& t: x6 f1 X
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费
local battlePrizeGoldb = QQ*4.90;--豹子妖城在线论坛) K4 s# X3 a  T% g1 r
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート. \% ?/ N0 \  l' G
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then魔力私服,最新魔力宝贝私服技术交流" V+ V! c7 b) A  ?7 {
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' b; L7 T; M8 T& f9 X% O4 n/ G( t
end
Char.AddGold(player,-QQ);妖城在线论坛1 p0 T: I% x- \+ p  k; n6 Z) b
魔力私服,最新魔力宝贝私服技术交流* y* U, |0 D$ q9 H8 x

if (ro1 == ro2 and ro2 == ro3) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")bbs.mocwww.com% Z2 g- f  t8 v! ^" B: @
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& B7 d+ U4 I2 O
end
elseif (roo<10.5) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then bbs.mocwww.com7 i/ u+ g9 h8 |, j+ F
Char.AddGold(player,battlePrizeGold);
end
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")
if (msg== "[10000大]") then
Char.AddGold(player,battlePrizeGold);
end
end
return 0魔力私服,最新魔力宝贝私服技术交流7 i4 O0 y0 q# ^+ \4 @9 ]
end
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表 ' U4 S7 e3 s1 S: x
没有NPC吗没有NPC吗

现在还是不会怎么建立npc

TOP