打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:
魔力私服,最新魔力宝贝私服技术交流. ~; x6 y& n. d# P
1这个开奖会公告发出来妖城在线论坛2 K2 v3 k* g, P+ F# E
) g. q. c% t7 Z0 ?6 J
2不会借用论坛骰子脚本做出骰子图像.

3不能定时开奖 (譬如2分钟一次)bbs.mocwww.com2 u) ~6 W0 H" H; M
妖城在线论坛- S! @! T: v/ i6 B
4不会判断豹子
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' f2 p0 r% s' Z3 \: c1 K
bbs.mocwww.com  Z' g# r! s5 k2 |- _
第一次动手做的lua,老手别见怪.—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 Z. ^, \/ y5 f1 h
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート  |- ]  h5 Y# H8 X
function ng_TalkEvent(player,msg,color,range,size)       4 ]) T' u0 {7 T* H, H

                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! m8 E( w" O( B; F. j6 ^3 K# @' ?
                              ro2 = math.random(1,6);4 A( O% \. Q3 ?# u& Q8 t
                              ro3 = math.random(1,6);
                              local roo = ro1+ro2+ro3
                              local QQ = 10000; --购买数量魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. w' d% p9 x) j: i6 y
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0魔力私服,最新魔力宝贝私服技术交流/ b0 Y3 z' B. G1 x( H& n1 W- P
                              end
                              Char.AddGold(player,-QQ);妖城在线论坛5 s+ c0 e0 ]$ _5 K# P0 S& T
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";bbs.mocwww.com5 O: q+ u/ A% b, P
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);bbs.mocwww.com5 p% b# v' y" w" N+ i6 @! Y" [& U
                              if (roo>11) then" }) |, Q% V7 O9 O9 D. m& G: ^
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")bbs.mocwww.com! o) S' F& a9 B0 O
                                    return 08 P3 B6 X) G! f: p9 y7 w9 s' U3 S
                              end
                              Char.AddGold(player,battlePrizeGold);
            end
                                    if msg== "[10000大]"  then
                              if (shenshang<QQ) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート" q, D6 o7 k0 U( l+ h2 r
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表+ g  l4 h5 T) k5 ?3 C5 \
                              end) t. k9 A3 c1 D
                              Char.AddGold(player,-QQ);                               妖城在线论坛: {+ s9 t8 i- ]9 Y* @
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo<10.5) thenbbs.mocwww.com  o, p* R  R( A4 y! X4 j+ _: J9 z: U) P6 L
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")bbs.mocwww.com& O8 L* x& r. h  h) [3 H* W. V- {
                                    return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' z' P* i- T% I  D) J, D$ A
                              end
                              Char.AddGold(player,battlePrizeGold);                               魔力私服,最新魔力宝贝私服技术交流! O; [' N# _  ?, w( B' r
            end

            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 显示全部帖子

整理了一下顺序
bbs.mocwww.com1 ?$ T2 C2 I0 X, p
function ng_TalkEvent(player,msg,color,range,size) & z, u1 M, A) v( e- Y$ M3 z8 d

local shenshang =Char.GetData(player, %对象_金币%) —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート, Y5 J  e+ B$ r0 m
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;--收小费—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 X, |$ f1 `3 ?. Y: b

if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0
end
Char.AddGold(player,-QQ);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. N! n# I" f( V+ ^: I

buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表+ h3 I: a! U5 Q. u+ m4 B+ m
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);, X* c* R1 S$ `* A  p( p8 ]
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート0 @, c! k' n; {& ~
if msg== "[10000小]"  then2 B& J! s6 A" c! d6 F: [2 E3 q
if (roo>11) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")/ i; @7 G9 e  t3 L+ N
return 0( b( b; [, p; ?* F
end
end魔力私服,最新魔力宝贝私服技术交流1 R+ h6 U# ?% N  g  ~$ r# l

if msg== "[10000大]"  then bbs.mocwww.com. |' J. Q& ]' g  [' r! D/ A
if (roo<10.5) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート) N9 F1 ]5 V+ }5 q! v
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")' t. P7 F, M/ l# Y5 S+ X  m5 \5 m7 T
return 0
end —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート) w- E2 J2 o& ~3 Y4 c
end
Char.AddGold(player,battlePrizeGold); bbs.mocwww.com! v5 l7 U5 K" ^" @$ S1 o0 m
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的魔力私服,最新魔力宝贝私服技术交流$ X/ Q- E. `& @1 p! ~/ t' Q! ^

魔力私服,最新魔力宝贝私服技术交流+ \1 i% p: w9 L/ T0 z' a
function ng_TalkEvent(player,msg,color,range,size) —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート7 a+ P" Y1 H/ g3 p) i# }
魔力私服,最新魔力宝贝私服技术交流0 X: F, Q2 m5 _0 M  [
local shenshang =Char.GetData(player, %对象_金币%) 2 `3 U, ~$ p; I5 y, E3 M
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;--收小费魔力私服,最新魔力宝贝私服技术交流& d5 u" g$ X( Z! [0 c4 ]- G9 j  {
local battlePrizeGoldb = QQ*4.90;--豹子魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* z/ Y0 G% K) P) d6 S8 n

if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力宝贝私服技术交流; E" x9 k) ?; h# {
return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表4 l2 p$ L8 |' {* [& V( S" ^
end
Char.AddGold(player,-QQ);bbs.mocwww.com% s/ m: r7 O0 @

if (ro1 == ro2 and ro2 == ro3) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート5 j4 C5 A4 k* m3 Q' P
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 `* N+ s& L+ u: ?: Y
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: C' j# |4 l! T4 k2 V/ S, g
end
elseif (roo<10.5) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表  H: O" y8 u% w9 o& Z
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);
end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート0 A& A# z4 z8 h1 E* m
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")魔力私服,最新魔力宝贝私服技术交流% D* r) |8 x, I* X- _# b
if (msg== "[10000大]") then
Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ N4 h" }. Y$ s7 t
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 发表
没有NPC吗没有NPC吗

现在还是不会怎么建立npc

TOP