打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:魔力私服,最新魔力宝贝私服技术交流* @5 j3 b- p  S

1这个开奖会公告发出来 bbs.mocwww.com1 A6 C9 O6 A! a
% x- }; [! ~* M3 k. C
2不会借用论坛骰子脚本做出骰子图像.

3不能定时开奖 (譬如2分钟一次)
妖城在线论坛* L# k* ^' K2 q+ V
4不会判断豹子
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート6 A3 ^2 b; ]4 f9 X8 |& L# L
妖城在线论坛( Z4 k, ?: O( p% D# {6 o. P
第一次动手做的lua,老手别见怪.—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' N& B# c% u! d1 _% P$ ^4 y) M# W0 w
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表5 \4 ^( w( |' u: P0 u, C- ?# f
function ng_TalkEvent(player,msg,color,range,size)

                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);bbs.mocwww.com4 [4 i: X7 q. F$ O) f! L+ B: a
                              ro2 = math.random(1,6);; G) f- m1 O5 |3 u) O, |
                              ro3 = math.random(1,6);
                              local roo = ro1+ro2+ro3* t% v& ?( \2 z7 s' N  _8 `" H
                              local QQ = 10000; --购买数量
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  thenbbs.mocwww.com; I" a3 S  J' x% x4 o" J
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！"), q+ L% z1 T+ [* d$ h
                                    return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 q- F4 q' f* S5 X: i
                              end
                              Char.AddGold(player,-QQ);妖城在线论坛; w/ M) q# K3 n  y4 j
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";% H* x8 w1 Q, u2 G/ c7 `
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo>11) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")bbs.mocwww.com6 N* k% v/ S5 b2 @* b
                                    return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 c; \6 I' _1 u# h4 N' n4 |7 |; z
                              end
                              Char.AddGold(player,battlePrizeGold);
            end
                                    if msg== "[10000大]"  then
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート: m$ p- y( B1 q! f# z7 c' M. z
                                    return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート+ o) Q6 C+ T: ]! x- Y- y
                              end
                              Char.AddGold(player,-QQ);                               5 U9 G) N7 I% w
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo<10.5) thenbbs.mocwww.com) A" `' m" K+ f0 M, ?
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
                                    return 0
                              end
                              Char.AddGold(player,battlePrizeGold);                               ! `0 z+ I5 R, a& X
            end                                     妖城在线论坛. y/ K9 U' S& Y& P2 \/ V9 A
            bbs.mocwww.com& v  @* P$ q: c& n3 E
            end
2 O' y! c: Y0 ]. Y( e3 P: w( [1 V
[ 本帖最后由 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 只看该作者

整理了一下顺序
妖城在线论坛7 R+ G9 n6 C' \2 t8 p& N. n- @( ?
function ng_TalkEvent(player,msg,color,range,size) / n9 Y4 U% q: {  J

local shenshang =Char.GetData(player, %对象_金币%) —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& r1 f0 `+ [8 w" z& q+ q
ro1 = math.random(1,6);
ro2 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート* ?! S* `+ ?2 Z% E: E
ro3 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート- z, \  m- x  ], R! }2 x
local roo = ro1+ro2+ro3bbs.mocwww.com4 {6 H; @1 g# E9 n
local QQ = 10000; --购买数量魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表  g+ a+ @- [' W9 Y6 D: M
local battlePrizeGold = QQ*1.90;--收小费妖城在线论坛7 w5 }. ]' n6 j9 h) z) h& }
魔力私服,最新魔力宝贝私服技术交流/ s2 \6 P% D0 ?; M( O* K2 l, I
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0妖城在线论坛8 W" l0 l. n% {
end魔力私服,最新魔力宝贝私服技术交流) O5 F/ o6 d% g$ l; s. A7 _7 D1 f+ A
Char.AddGold(player,-QQ);8 S$ K  N# M( L3 b3 ^. |( ]7 A7 c

buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);

if msg== "[10000小]"  then妖城在线论坛7 b9 @# ]( ~. @# `, A. r6 |* w
if (roo>11) then妖城在线论坛9 T5 [8 }9 A4 d
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
return 0bbs.mocwww.com6 N- J5 o( ]. T$ G7 U3 {
end妖城在线论坛+ t$ p, X! y' }7 ]* b( W# ?
end妖城在线论坛5 R# x7 I+ l; ~5 X8 m0 C& ]- T- m4 b

if msg== "[10000大]"  then —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート9 m# }" z3 N0 u4 x( f3 H
if (roo<10.5) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
return 0
end bbs.mocwww.com- a. l8 c1 g- W% \# X, x
end . T% S$ A0 ]1 j* S7 s
Char.AddGold(player,battlePrizeGold); 魔力私服,最新魔力宝贝私服技术交流& H) F: v9 u. Q' p9 A: O
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的

function ng_TalkEvent(player,msg,color,range,size) 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表) O7 Z# E- X" o! ~) V6 E. d7 Y
9 `2 F+ Z2 l# D/ J% T+ F. ~/ @# I
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流( v9 d; X' l, E0 I# I" b5 K6 \
ro2 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ }3 s$ I# ?. S6 @& l4 h
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量魔力私服,最新魔力宝贝私服技术交流+ A8 `( E7 @- G) K
local battlePrizeGold = QQ*1.90;--收小费
local battlePrizeGoldb = QQ*4.90;--豹子妖城在线论坛5 q8 a0 A" [! s; S8 \

if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then
if (shenshang<QQ) thenbbs.mocwww.com9 j- P% E* b$ D2 J+ H: U
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート$ X2 C% n& N) ?1 p
return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート  d& |' @( v- g9 R$ j' s# \
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 o8 v9 ]! ]% t, c! M& \  x5 U- @3 c
Char.AddGold(player,-QQ);
bbs.mocwww.com4 V3 Y& e2 X5 H

if (ro1 == ro2 and ro2 == ro3) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")
if (msg== "[10000豹子]")  thenbbs.mocwww.com: e# q; a- v0 u+ I
Char.AddGold(player,battlePrizeGoldb);
end魔力私服,最新魔力宝贝私服技术交流& e# }( r/ w" d& z+ Z
elseif (roo<10.5) then/ d5 ]# m# z+ X) n
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ [1 d; q& n# p* ]* J
end
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")
if (msg== "[10000大]") then
Char.AddGold(player,battlePrizeGold);
end
end妖城在线论坛- b3 H; d4 b8 O1 _0 h! f1 [8 q; z7 I
return 0妖城在线论坛' I; A* s% e* v
end9 f: a6 S  i0 _1 a2 P4 j
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ U3 F9 d9 |5 s s$ h# ~
没有NPC吗没有NPC吗

现在还是不会怎么建立npc

TOP