打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 I7 k$ X8 ^, p# Y
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 G: a0 C  p# R4 M" I$ c' V
1这个开奖会公告发出来

2不会借用论坛骰子脚本做出骰子图像.
+ G6 G1 `& e/ M
3不能定时开奖 (譬如2分钟一次)
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 J/ ]" a6 S# M( s' A: W
4不会判断豹子

7 K- a) k+ e6 ]- w: h3 {( @) o
第一次动手做的lua,老手别见怪.

function ng_TalkEvent(player,msg,color,range,size)
1 W; x# H- z0 H4 H
                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);妖城在线论坛" R9 n) y8 P- k/ V. N/ k
                              ro2 = math.random(1,6);妖城在线论坛$ [  v; h: a( w: p0 e( n( n
                              ro3 = math.random(1,6);bbs.mocwww.com$ j- P& U/ [; `) |
                              local roo = ro1+ro2+ro3
                              local QQ = 10000; --购买数量
                              local battlePrizeGold = QQ*1.90;--收小费bbs.mocwww.com1 |# C7 B% m+ u* x4 c2 u$ f2 Q, d0 \
                              if msg== "[10000小]"  then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 a" t. f, J$ S
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 07 x9 Z# R2 d* z: X% ]6 J4 n
                              end
                              Char.AddGold(player,-QQ);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート1 z+ v1 e1 U3 i
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo>11) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート$ m/ M5 c6 e1 Y  T, n
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
                                    return 0. b' ^- r5 b7 n. q; q) r; O
                              end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 ~2 s! C2 l# p, a: l/ F
                              Char.AddGold(player,battlePrizeGold);* C4 ?6 U1 U9 h; X# n0 d7 r% P
            end妖城在线论坛2 {, U) F# d6 W9 F; ?' B' D1 Q$ W
                                    if msg== "[10000大]"  then妖城在线论坛% ~5 O" {) u% W6 c( R
                              if (shenshang<QQ) then魔力私服,最新魔力宝贝私服技术交流- j. f! S$ C& g* D( ?7 \3 m+ B
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")妖城在线论坛* F9 b, C" e8 h$ M/ p
                                    return 0bbs.mocwww.com( g' Y3 g6 Q: N. q; m# U1 ?9 r" P# u0 r
                              end
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);  u  ]9 c, E! f( h8 F" c
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")妖城在线论坛% P# N& {4 I; }" y+ l! X& {
                                    return 0
                              end
                              Char.AddGold(player,battlePrizeGold);                               bbs.mocwww.com4 c7 a9 P: x0 M; L0 c
            end                                     魔力私服,最新魔力宝贝私服技术交流( ]) t, X7 z2 P( L
            bbs.mocwww.com& f) C4 y$ O$ U4 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 只看该作者

整理了一下顺序魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# S$ K0 c0 d+ I3 t) ~

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

local shenshang =Char.GetData(player, %对象_金币%) —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' }" ~  g; ~0 Y/ k$ c
ro1 = math.random(1,6);
ro2 = math.random(1,6);" z/ p. N# p: k! A) l- C  k
ro3 = math.random(1,6);bbs.mocwww.com' X+ ^1 ~8 s/ |8 ?4 o
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 n; H1 W5 ~: ?9 j- q
local battlePrizeGold = QQ*1.90;--收小费
魔力私服,最新魔力宝贝私服技术交流% R* E" Y; }' Z8 `8 k
if (shenshang<QQ) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 {$ Y; M$ N" T  E# V
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! ]: [$ h' |: \1 b
end魔力私服,最新魔力宝贝私服技术交流8 [& J; `1 t7 E2 v! Q) U/ f
Char.AddGold(player,-QQ);妖城在线论坛6 Q0 Y+ I$ Y  m' c  b8 S- E5 R
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート. L9 I( l; }, G! U* I/ Q
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! x, q. Y+ e7 x. m& [" J( Q
bbs.mocwww.com1 J9 r, \. {# B. H- p
if msg== "[10000小]"  then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート: @- d* K( |" t1 d, w5 D9 f3 u: e
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")+ B$ w& y. t2 ?+ V
return 0
end
endbbs.mocwww.com- A/ b$ p% O' s/ V" [% C
魔力私服,最新魔力宝贝私服技术交流) P9 ]6 ^8 s6 z5 I- f  G
if msg== "[10000大]"  then bbs.mocwww.com2 W5 @! M: G2 }8 u6 l! o8 p+ c: p
if (roo<10.5) then魔力私服,最新魔力宝贝私服技术交流* I0 _$ @) c/ w% X. L
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
return 0
end
end
Char.AddGold(player,battlePrizeGold);
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート$ @4 Y# Q& B- F) A" P
$ z2 P. q1 [7 ?
function ng_TalkEvent(player,msg,color,range,size)
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: R3 L0 o& m+ X: ^7 ?: A/ m# O
local shenshang =Char.GetData(player, %对象_金币%)
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;--收小费妖城在线论坛0 I$ ~2 Z0 y& r, D$ V% `
local battlePrizeGoldb = QQ*4.90;--豹子—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート  m* G. m2 C) T  y- Y1 u

if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表8 k5 l. B! ?% q$ M" b& Q
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート6 |7 Q% U' f) D, @7 C
endbbs.mocwww.com- D4 H% c- @9 p& ]2 P
Char.AddGold(player,-QQ);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! ~+ u. x1 ^! a% \" I" |. D: r" p
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート, b4 v& M4 G9 u
妖城在线论坛$ ]7 S" o/ p! a9 X
if (ro1 == ro2 and ro2 == ro3) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")妖城在线论坛' `) ]" i* G( J) S
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);
end
elseif (roo<10.5) thenbbs.mocwww.com6 H1 Z& `: T0 q& K9 j
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート$ _% V# T% C; V
end( a7 ^0 l7 Y& B" R1 K
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")
if (msg== "[10000大]") then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート% d! Z" c2 w) y9 b# Y0 I5 B  P
Char.AddGold(player,battlePrizeGold);
end bbs.mocwww.com+ n: e8 t1 ~7 f' w8 N/ q  j$ X* B
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 发表
没有NPC吗没有NPC吗

现在还是不会怎么建立npc

TOP