打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:( t& D  K( V4 y( c
妖城在线论坛4 @# k' E. Z- e
1这个开奖会公告发出来 —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート$ J8 Y0 J) D, ~

2不会借用论坛骰子脚本做出骰子图像.—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート; w, D1 |3 i; j- G( z
bbs.mocwww.com" \1 a; k6 Q7 v( r
3不能定时开奖 (譬如2分钟一次)
bbs.mocwww.com* Q8 P1 [% ^: }# P2 D9 z
4不会判断豹子
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 p9 z' T* m% D) i

第一次动手做的lua,老手别见怪.魔力私服,最新魔力宝贝私服技术交流, }. H, Z# `$ b$ m" O5 q  Z

function ng_TalkEvent(player,msg,color,range,size)       bbs.mocwww.com8 y& R, O; g, B4 d4 z

                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);
                              ro2 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流% X2 x$ H2 E1 d
                              ro3 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流* n* T8 S0 j) Z3 x" A7 d/ C# F
                              local roo = ro1+ro2+ro3
                              local QQ = 10000; --购买数量  g% V; f! ]1 f
                              local battlePrizeGold = QQ*1.90;--收小费—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート8 Z' ]3 b# J3 M5 i# J5 `
                              if msg== "[10000小]"  then
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力宝贝私服技术交流+ T" T4 h3 r) M9 s: R
                                    return 06 d4 d$ V# G1 B* O- a6 l6 ]
                              end
                              Char.AddGold(player,-QQ);5 F1 |% m# Z( Y/ _
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート9 {! `& K; h$ K7 Z. l' s
                              if (roo>11) thenbbs.mocwww.com9 ]. K  T8 Z+ ]" @4 H
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
                                    return 0
                              end
                              Char.AddGold(player,battlePrizeGold);3 m' ?. v' [7 `% t9 A2 m+ L
            end
                                    if msg== "[10000大]"  then妖城在线论坛6 v3 L, x  E" l1 |, ?
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end
                              Char.AddGold(player,-QQ);                               bbs.mocwww.com$ Y. g6 F0 L& p( L1 f
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);) J( m/ I# d" S6 O# s9 t, A
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")妖城在线论坛+ C# E/ r& {# m$ D, T* B3 R
                                    return 0妖城在线论坛8 Q8 r$ h$ V+ S7 e) p
                              end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表  y# K9 \. `6 G
                              Char.AddGold(player,battlePrizeGold);                               —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 P1 A5 I$ e& X: I( b* l) i
            end

            endbbs.mocwww.com6 W: Q; C0 o- I2 s+ D$ C

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

整理了一下顺序+ X5 ]5 E) h4 X$ p* `- |1 m

function ng_TalkEvent(player,msg,color,range,size) 妖城在线论坛$ U* u/ h8 k  b% I
bbs.mocwww.com& _. ?* |) g1 b8 [# p
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);
ro2 = math.random(1,6);
ro3 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流; A' k/ R4 D: ]& M) ]9 S5 J" ?
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート: l& H6 H8 P5 ~% A$ N
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")& M" n5 v6 _/ t5 H8 d6 C
return 0
end
Char.AddGold(player,-QQ);
+ [# k, M% M! E* g: p6 F' W
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";魔力私服,最新魔力宝贝私服技术交流3 _- e6 x. i% z' E4 w
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);妖城在线论坛8 K1 ]6 @# J& w4 O7 U

if msg== "[10000小]"  then! P& M" X+ R, I  f
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表) p% M  c- w4 m  B- B
end
end妖城在线论坛8 a7 j! ]6 h9 V- c+ x

if msg== "[10000大]"  then 魔力私服,最新魔力宝贝私服技术交流" g7 T* ^" J5 L) x" q) w& R7 A  e
if (roo<10.5) thenbbs.mocwww.com' e4 y; v% q2 Q2 O! L! `
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
return 0
end
end ' P* H/ ~4 b, a- m% i
Char.AddGold(player,battlePrizeGold);
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的妖城在线论坛5 y3 ]/ O5 w" p5 I' {
bbs.mocwww.com5 a/ o  c! ?8 [2 r1 ?) Y( N

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

local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 `4 d# a0 {8 b( [6 T' H
ro2 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# h; C1 c9 g+ R4 m# e- g. m2 W
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费
local battlePrizeGoldb = QQ*4.90;--豹子
bbs.mocwww.com  o1 f- I, q& {5 Z0 l
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then魔力私服,最新魔力宝贝私服技术交流8 W. e$ z8 r5 o2 d5 M( L
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0魔力私服,最新魔力宝贝私服技术交流. Q5 j2 [4 L( E6 |" K" U, `' `
end魔力私服,最新魔力宝贝私服技术交流$ e; D/ H! B* M9 Z4 t# T
Char.AddGold(player,-QQ);魔力私服,最新魔力宝贝私服技术交流% @; o) N( p! \

if (ro1 == ro2 and ro2 == ro3) then妖城在线论坛, w4 N# p6 x# P8 O( U& b- G
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);
endbbs.mocwww.com9 i, t- S' {$ p* B7 n  H0 F
elseif (roo<10.5) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买"); E3 [9 }1 Q8 f2 i1 G
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);
end
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")
if (msg== "[10000大]") then妖城在线论坛9 p$ z+ j& K, F2 J% Y' M6 w
Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力宝贝私服技术交流" j; x. o+ j; R9 n" S% z
end 魔力私服,最新魔力宝贝私服技术交流7 A+ A! W; u  r3 b! h
endbbs.mocwww.com' x2 }3 h4 q1 ^. k" w0 ~- B, w2 I
return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* d6 g0 k6 t9 ~7 z
end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# ?! R: V8 [% l8 X5 @) X) V/ o, L
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