打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:

1这个开奖会公告发出来妖城在线论坛( W* A+ M; l: s0 h! w. ~
8 }6 }) s5 P7 @$ |2 R
2不会借用论坛骰子脚本做出骰子图像.

3不能定时开奖 (譬如2分钟一次)妖城在线论坛( C1 d# t( Y0 g0 ?! e. K

4不会判断豹子魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 {5 ]3 E1 S5 Y7 v$ r

bbs.mocwww.com8 P3 |) d  E" t4 K+ c
第一次动手做的lua,老手别见怪.
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" v5 Y! J) \* W' c; B, d
function ng_TalkEvent(player,msg,color,range,size)

                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);
                              ro2 = math.random(1,6);妖城在线论坛* @1 p8 k  Y6 r9 B3 B4 U8 S9 M
                              ro3 = math.random(1,6);
                              local roo = ro1+ro2+ro3魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* u+ F6 S* u5 t* o
                              local QQ = 10000; --购买数量妖城在线论坛  y0 G  P- Z" v5 k3 w& X# I9 Y
                              local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力宝贝私服技术交流+ @4 r8 e# ~5 Y' G- Q. b6 B3 M
                              if msg== "[10000小]"  then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表, a0 i, g9 F. @( U
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";% D- \+ [; {; Y2 k) v" W
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo>11) thenbbs.mocwww.com5 t0 l7 e7 D. R. e( \' W. W
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")5 ^& r! ?2 M. g! F- j: z" z
                                    return 0魔力私服,最新魔力宝贝私服技术交流4 n+ V: m% {- L# e
                              end妖城在线论坛9 ]3 s- f0 O* {# V" c% q. t
                              Char.AddGold(player,battlePrizeGold);
            end
                                    if msg== "[10000大]"  then魔力私服,最新魔力宝贝私服技术交流$ [+ C% z% f9 k3 V
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表  D7 u4 d  {! a4 `* a0 J
                                    return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 {" u; B9 b2 k2 f2 O; f
                              end
                              Char.AddGold(player,-QQ);                               ) ~* B7 |& C4 K5 u- c9 ]
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";! \( t8 _) h6 v' G2 \: V
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo<10.5) then魔力私服,最新魔力宝贝私服技术交流+ t; F) p8 e6 r+ m; R* `
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")魔力私服,最新魔力宝贝私服技术交流! A9 Y: K, }9 q/ U
                                    return 0
                              end
                              Char.AddGold(player,battlePrizeGold);
            end                                     0 d* x: L4 v! E9 ^- @
            7 S2 j, o" D, Q8 }6 ]1 ]; B
            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 显示全部帖子

整理了一下顺序妖城在线论坛0 U- O% ?( I/ x0 X: b- |' ?

function ng_TalkEvent(player,msg,color,range,size) bbs.mocwww.com- M1 Z, X% w, Y) e

local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表  ^* k1 f; e' v- D; n' n/ K' M
ro2 = math.random(1,6);
ro3 = math.random(1,6);  ^. g5 ], e( x; @8 b5 f4 g3 c& i1 p1 r2 p
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费

if (shenshang<QQ) then魔力私服,最新魔力宝贝私服技术交流0 n) [0 U: I1 Y
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0# \% v; t% _- V! F1 W) W% E& a
end
Char.AddGold(player,-QQ);妖城在线论坛! `$ Q# b$ Y- Y* ~% I4 [
bbs.mocwww.com, x* e0 i0 [* c5 j/ e' L# J
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";) P- k5 G4 ?8 W( r9 S0 f
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);& R( R* q- |8 e# p8 o! i. P$ M5 T
bbs.mocwww.com" t9 N4 G5 s. ?0 M, Z  o
if msg== "[10000小]"  then
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
return 05 \7 X9 n' d5 V; T7 I' O& t" J/ Q) P( q$ @
end
end魔力私服,最新魔力宝贝私服技术交流% q+ I) J/ u. v% E

if msg== "[10000大]"  then
if (roo<10.5) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
return 0妖城在线论坛, k, n* I/ [9 N" P; C
end bbs.mocwww.com0 _" [& G6 H5 _2 j0 R$ z$ U
end bbs.mocwww.com9 B) A! R# z6 V8 R; j  k
Char.AddGold(player,battlePrizeGold); bbs.mocwww.com8 U5 @" G2 _4 K5 |; O& o6 \8 h: L3 t
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的妖城在线论坛. R  _% D6 U# \0 L
+ I5 @" z3 a9 g
魔力私服,最新魔力宝贝私服技术交流4 I, J! M8 B1 l0 ~
function ng_TalkEvent(player,msg,color,range,size) bbs.mocwww.com6 J: w& j+ K/ u  P
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' |9 M: W0 |. f- ?7 |! z% h: H. i
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);
ro2 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表- L% `& G- O, I$ G/ S( ~8 k: Q: E
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3: C: B3 C& W4 D1 l+ I) B% Z& O
local QQ = 10000; --购买数量魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( B" ]. Z: x! C2 f/ Y
local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" Y# N6 b* m3 |! R3 i' y' V
local battlePrizeGoldb = QQ*4.90;--豹子

if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then妖城在线论坛- e' V3 s* ]: k% |* G4 B. j
if (shenshang<QQ) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート, O, x0 K: c8 L" v9 a3 w) l5 v
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' b% a! R" |" y+ {8 [- L' W7 B/ o  |
return 0bbs.mocwww.com# I; _) K$ S" |+ V" ^
end妖城在线论坛9 F+ y/ Q0 P) o; ^' S5 T
Char.AddGold(player,-QQ);bbs.mocwww.com4 E+ ~- O/ d5 k, B2 W

if (ro1 == ro2 and ro2 == ro3) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート  E5 ], C* [7 Y3 e* B
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")妖城在线论坛9 p! H! F4 R5 [8 I6 e; N7 }; M
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: @* e/ j; d* T- p/ s! M
end魔力私服,最新魔力宝贝私服技术交流/ y: `3 g9 U/ h$ F+ u7 @
elseif (roo<10.5) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ o) x& _6 V) |: `, X7 ?
Char.AddGold(player,battlePrizeGold);
endbbs.mocwww.com! d3 I1 \. v- o1 `4 z
else魔力私服,最新魔力宝贝私服技术交流1 m& E6 T5 a9 Z: X1 i- I
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")
if (msg== "[10000大]") thenbbs.mocwww.com9 @$ N4 A' S, l5 j$ l
Char.AddGold(player,battlePrizeGold);
end
end
return 0
end
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

地板大中小发表于 2017-3-26 18:32 显示全部帖子

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" i' S$ F& f, x) N4 p5 V6 L8 B
没有NPC吗没有NPC吗

现在还是不会怎么建立npc

TOP