打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:

1这个开奖会公告发出来

2不会借用论坛骰子脚本做出骰子图像.

3不能定时开奖 (譬如2分钟一次)魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 O( }3 U, r5 i$ @3 c
bbs.mocwww.com1 m, S8 N3 \6 X0 l  R
4不会判断豹子bbs.mocwww.com8 l) Q4 U, l( {, q: A

妖城在线论坛: N4 W6 {2 D, a/ o& P* y/ d) G- ~8 d
第一次动手做的lua,老手别见怪.—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート7 X- K) C4 d# {

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

                              local shenshang =Char.GetData(player, %对象_金币%)                               魔力私服,最新魔力宝贝私服技术交流2 D1 ~0 I  a- o- G
                              ro1 = math.random(1,6);
                              ro2 = math.random(1,6);
                              ro3 = math.random(1,6);
                              local roo = ro1+ro2+ro3
                              local QQ = 10000; --购买数量
                              local battlePrizeGold = QQ*1.90;--收小费妖城在线论坛" n, z$ C4 g, a& c8 }
                              if msg== "[10000小]"  then
                              if (shenshang<QQ) thenbbs.mocwww.com7 _& J4 h8 Y. C( q
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")bbs.mocwww.com. w/ |0 F; B+ M' k' W
                                    return 0
                              end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" o; l* X1 V7 |- H2 ]
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo>11) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
                                    return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート, g5 {# o; G% z- y! T; S. Y
                              end
                              Char.AddGold(player,battlePrizeGold);
            end
                                    if msg== "[10000大]"  then
                              if (shenshang<QQ) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表& N0 T9 T  G3 U
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")& c3 Z$ q+ }# ~- N9 e1 V- V, s
                                    return 0妖城在线论坛+ _8 s' u3 i/ ]( h
                              end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ m% ?3 r4 `& Z8 ?! C, ~0 @
                              Char.AddGold(player,-QQ);                               魔力私服,最新魔力宝贝私服技术交流' U/ d" r5 t& d: Z0 {, X
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表7 d3 y9 o5 c# w1 D/ c2 ^
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表+ z  g3 [' i* P$ Q" U: k, k* D4 p
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")0 _8 T% j; a2 m$ |+ d; |) I0 ^. d
                                    return 0
                              end妖城在线论坛5 a- u9 x' |6 a2 x" s0 y2 `' u
                              Char.AddGold(player,battlePrizeGold);                               bbs.mocwww.com3 a! D0 x4 e) G8 _2 z# E
            end                                     1 b. o2 Z# S3 `

            endbbs.mocwww.com: O9 j, P& t# P6 k

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

整理了一下顺序
" {% W% k8 E5 Z
function ng_TalkEvent(player,msg,color,range,size) 1 |& `0 J: t# y4 K  O+ ]( P# h
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート% c0 C3 q3 b7 p
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);
ro2 = math.random(1,6);
ro3 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート- ^5 I- H- ]% Z6 `  l4 W
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量妖城在线论坛* X7 ?5 I0 V; b; A
local battlePrizeGold = QQ*1.90;--收小费

if (shenshang<QQ) then妖城在线论坛, [( F2 E3 a3 I
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0魔力私服,最新魔力宝贝私服技术交流. Z. b" U: o$ k# U9 V# R
end妖城在线论坛+ E2 B1 Y! K; g9 M& L$ j
Char.AddGold(player,-QQ);
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 ]$ A% d( Y0 N: x- p8 z! I; O
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);
: M6 D/ a' r6 _8 F& p
if msg== "[10000小]"  then
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 {9 |9 d  s3 i& I
return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" \; Y. f  D# c$ u/ a
end魔力私服,最新魔力宝贝私服技术交流4 p- \# Q7 J+ l# y$ y, D- W0 d) ]
end

if msg== "[10000大]"  then
if (roo<10.5) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& |, x; m# P3 e0 C6 X
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
return 0魔力私服,最新魔力宝贝私服技术交流' a5 f2 b% E* A. E6 ^% r, D" {
end —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート) @0 Y- o) O' @
end 3 Z! u% P. E" Y6 x( k, q
Char.AddGold(player,battlePrizeGold); —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート% n7 p( {+ A; n6 ?
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的0 D4 h' Z% [, N: E6 d7 i4 ]

function ng_TalkEvent(player,msg,color,range,size)
bbs.mocwww.com$ Z  c& A  ]! `6 y7 a6 T6 H% e) u
local shenshang =Char.GetData(player, %对象_金币%) 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 g$ g. g8 Q' F! }0 X6 @4 T
ro1 = math.random(1,6);
ro2 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 i2 e5 x# }9 V' O2 b# g
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3妖城在线论坛3 e, J, |3 a6 M- K6 y1 {
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费
local battlePrizeGoldb = QQ*4.90;--豹子
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート9 n* d, Q: e. E4 H) R6 @' c
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 T- n- [5 r# y. F: O
end魔力私服,最新魔力宝贝私服技术交流/ B2 f# r3 L  D8 j
Char.AddGold(player,-QQ);
) q" H" M8 U7 `; T" D2 o6 U# h
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 u% K0 [3 U7 h" \
if (ro1 == ro2 and ro2 == ro3) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: r- v2 Z- ?% s* J
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")妖城在线论坛9 e2 ]% g# F( Y2 B
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);妖城在线论坛; @8 l% L  ~4 F6 M0 o
end
elseif (roo<10.5) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート( a  P- e: ^; C& t  ~
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 A6 G- g$ h8 g, R9 s+ G( O
Char.AddGold(player,battlePrizeGold);" I& {( I6 ~; b/ X9 D# ~% w; `
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 T" H0 \- K9 z. }
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")" b: B  d$ w4 Q3 F" h. T
if (msg== "[10000大]") then2 v7 W2 F+ d( F! w
Char.AddGold(player,battlePrizeGold);bbs.mocwww.com1 y0 K# P, X$ _; y1 E
end
end
return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 B; g4 K, y' }. p
end
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表 bbs.mocwww.com* g6 Y* K# h0 S( {
没有NPC吗没有NPC吗

/ o3 Y h, Q M, F' I# k
现在还是不会怎么建立npc

TOP