打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:

1这个开奖会公告发出来

2不会借用论坛骰子脚本做出骰子图像.魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' K9 e/ ]! x" s. j0 a. L2 q

3不能定时开奖 (譬如2分钟一次)—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート) a- I4 r' |$ P  G8 I

4不会判断豹子
- a+ `1 z1 x. |; P7 ~
妖城在线论坛6 M! @2 e0 E% }  E  N3 A
第一次动手做的lua,老手别见怪.7 }) `0 s4 [: {- o7 ?
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表& t, R8 I5 P& w6 f
function ng_TalkEvent(player,msg,color,range,size)
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表; t8 \% z6 X3 q* O7 l
                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);
                              ro2 = math.random(1,6);
                              ro3 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表6 q, S) e: Q. ?  S" s. J
                              local roo = ro1+ro2+ro3bbs.mocwww.com4 n% o% O) j, O8 F* w% y
                              local QQ = 10000; --购买数量bbs.mocwww.com5 W. a$ P& j& }: u9 K
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート" R( v: t8 Y: {8 K; F& C9 H
                              if (shenshang<QQ) then0 _# j3 \1 M$ o  E" E
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end
                              Char.AddGold(player,-QQ);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表- N4 p4 n, Z6 K( y3 O4 b9 p3 [
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";妖城在线论坛8 d3 Q; p7 d, f) W/ v7 L" B
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo>11) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: f9 H4 \$ u" P6 V2 @
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")魔力私服,最新魔力宝贝私服技术交流# X4 H( X% t! y: d* d
                                    return 0
                              end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# @) r/ j* N: c: n3 \! ]
                              Char.AddGold(player,battlePrizeGold);
            end6 `" [( N# \: x+ E' i$ ]* f" _0 M
                                    if msg== "[10000大]"  then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' N( U9 [2 L$ S( Q
                              if (shenshang<QQ) thenbbs.mocwww.com. N" x$ ~! ^9 ?+ _4 h6 @- ?" H
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート: e. x1 y* Y- T7 s  p
                                    return 0
                              end
                              Char.AddGold(player,-QQ);                               bbs.mocwww.com- V3 c5 \9 V5 k8 `, s3 A0 o
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力宝贝私服技术交流5 S: E! ~2 y9 z* a" L
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
                                    return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* |' m7 j. q: @* P
                              end
                              Char.AddGold(player,battlePrizeGold);
            end

            end0 ~- a4 c9 ^) O3 e; E% Y: H

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

整理了一下顺序妖城在线论坛3 C! E3 D4 M7 l& \1 m9 O
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート, W& B  r! e" ^( A" E( j8 y% m
function ng_TalkEvent(player,msg,color,range,size)
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表5 r5 ?0 D5 }. H9 O, }- f* h3 S" ~
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);bbs.mocwww.com5 Z6 I: J7 s( u( u+ V: O' n& O
ro2 = math.random(1,6);
ro3 = math.random(1,6);. B) N0 R; l; V0 b4 x* v
local roo = ro1+ro2+ro3魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. ~! Q- q6 u4 Z; Q0 D
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力宝贝私服技术交流: d- B4 Q; |1 Q  g4 G" u; N

if (shenshang<QQ) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! ]" Z& h& B+ Y: ]2 D
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0
end
Char.AddGold(player,-QQ);

buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";魔力私服,最新魔力宝贝私服技术交流: D0 o: o) e: W1 W* c
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);bbs.mocwww.com! U: i, a' p0 K7 R  _+ n- U2 h5 o
魔力私服,最新魔力宝贝私服技术交流2 o1 l& J3 w5 D2 o4 S7 p
if msg== "[10000小]"  then
if (roo>11) then3 L$ P2 r0 W$ o: x# S
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")& @- C3 O. i0 o" l
return 0
end魔力私服,最新魔力宝贝私服技术交流+ f; K& h, }0 F1 U
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表; R. Y4 |5 F5 U9 s- E, v% N" H$ S8 q

if msg== "[10000大]"  then 妖城在线论坛- [! P( C% b1 B% `
if (roo<10.5) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
return 0
end
end 魔力私服,最新魔力宝贝私服技术交流& e  |# h4 t0 Y, L2 ~
Char.AddGold(player,battlePrizeGold);
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的妖城在线论坛" `1 O/ N* w& c& s

bbs.mocwww.com/ |4 h  z$ @4 y! P
function ng_TalkEvent(player,msg,color,range,size) —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート1 `* d% ^6 r  V# q, h) r% d. T* f
bbs.mocwww.com+ K$ ^  ]# t* B; Y3 Y$ Q) k; p
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);bbs.mocwww.com# E& V3 K' @* f, I0 s
ro2 = math.random(1,6);
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表% W9 t, ?# _/ K& E; y# e
local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表& `6 k  H# E6 z( [' O! S
local battlePrizeGoldb = QQ*4.90;--豹子—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート+ }- F2 }# o( ^" q" Z" {
bbs.mocwww.com" T9 Z9 O0 [& ~
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0
end, {& r  b. W8 m
Char.AddGold(player,-QQ);魔力私服,最新魔力宝贝私服技术交流8 y9 C' }' S5 I: D* y4 |; ?

if (ro1 == ro2 and ro2 == ro3) thenbbs.mocwww.com' T; ^9 m, d# o- u$ D
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")6 Z9 ~: e/ r4 K- m2 ^' o
if (msg== "[10000豹子]")  then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 Y7 y+ \9 D9 C: p% Z
Char.AddGold(player,battlePrizeGoldb);
endbbs.mocwww.com- a6 O  w4 S8 \, K0 Z0 X- W
elseif (roo<10.5) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")$ r8 X# o: l& \) ]3 U. r
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);
end
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( n! [. C/ f$ [0 G2 a4 N
if (msg== "[10000大]") then/ d1 a& }1 ?! X# ~# D: i
Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力宝贝私服技术交流* d& S8 b# V- j* I1 e+ E, c
end ) ^% b" Y8 c* C! h3 C( e" Y9 b
end5 O. ]9 e/ u/ O' k- Q
return 0
end魔力私服,最新魔力宝贝私服技术交流. C3 z6 S# s- ^) n" o- Q4 R& g5 }% N
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表妖城在线论坛, A& T* C) g2 Q( }
没有NPC吗没有NPC吗

妖城在线论坛5 o+ a+ B ]6 P+ i/ \& a2 Q( z! f
现在还是不会怎么建立npc

TOP