打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:
bbs.mocwww.com& z" t' K1 w8 k0 W
1这个开奖会公告发出来妖城在线论坛3 ?5 V: L" a% X! h5 v

2不会借用论坛骰子脚本做出骰子图像.魔力私服,最新魔力宝贝私服技术交流; B3 _- d2 J" o+ ^

3不能定时开奖 (譬如2分钟一次)

4不会判断豹子bbs.mocwww.com) i) G8 X+ q! b, L3 Z4 Q( W

妖城在线论坛1 }) g1 ]$ h( X* N" \/ A; f
第一次动手做的lua,老手别见怪.

function ng_TalkEvent(player,msg,color,range,size)
魔力私服,最新魔力宝贝私服技术交流% M' L8 Z0 u' c5 r3 e) \+ Q
                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);
                              ro2 = math.random(1,6);. S4 m3 Y7 b! T# C
                              ro3 = math.random(1,6);
                              local roo = ro1+ro2+ro3
                              local QQ = 10000; --购买数量
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then
                              if (shenshang<QQ) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ M, [2 q, [/ u% v1 L) Z& w
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート1 j; g& I9 e. ~0 V' g
                                    return 0妖城在线论坛6 m9 _, ?6 i0 T. Q- @5 J0 E
                              end
                              Char.AddGold(player,-QQ);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート( f4 R4 o5 `" W2 f
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力宝贝私服技术交流7 m  Z/ [) F. A% L! q
                              if (roo>11) then魔力私服,最新魔力宝贝私服技术交流/ u  R& B& \& D3 y* I' L
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
                                    return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表  }7 A# d/ u  T  q. N7 T1 O
                              end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表! b( |+ k' {. r8 h' f% K
                              Char.AddGold(player,battlePrizeGold);
            end: g" n6 D- h& K4 r! N5 r# v- f
                                    if msg== "[10000大]"  then
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")bbs.mocwww.com6 j1 \7 `) I% @+ d$ J7 c1 `+ o
                                    return 0
                              end
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo<10.5) thenbbs.mocwww.com0 A2 w# `4 b" Q3 A/ c2 {
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
                                    return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート8 s# M$ h* `( `" l9 {* q. i8 t
                              end
                              Char.AddGold(player,battlePrizeGold);                               魔力私服,最新魔力宝贝私服技术交流8 M2 R1 t; {2 U  ^. B; n  R
            end

            end妖城在线论坛' C1 y7 e" j3 m: X; U, ]! v
" f; t: v; s% N8 W7 E, Q8 z; ?. t
[ 本帖最后由 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.com0 @% R* v( @# J- b8 i  ]
function ng_TalkEvent(player,msg,color,range,size) bbs.mocwww.com' ?) q5 h7 e  q1 A
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' x7 P0 x2 ?0 Z  ~2 u: q1 T7 W' @
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);$ l, y, c8 ~: T( E$ W- E
ro2 = math.random(1,6);5 y' z" B6 O0 {5 w) D
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3魔力私服,最新魔力宝贝私服技术交流- Y  U* @1 D- a! Q1 |& ]0 z% z
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费
5 [" L" D0 r+ g1 c0 N
if (shenshang<QQ) thenbbs.mocwww.com* x+ p5 l: J  \6 |' r
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力宝贝私服技术交流. L/ `' A$ y  _. V4 E4 j! |
return 0' Q% E: E% H3 h
end
Char.AddGold(player,-QQ);妖城在线论坛6 D2 G0 p$ ~# S; Q9 y, D& C
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート* U4 D3 T! b- I' f
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";, E' T. V, M( |5 e- m
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);
- y: b& C8 f9 r) D
if msg== "[10000小]"  then妖城在线论坛0 j8 K! T# U+ L) f5 Y
if (roo>11) then  I. p) `. B) ]3 k+ |
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
return 0
end
end妖城在线论坛8 E; H9 g- Y8 F  x+ o

if msg== "[10000大]"  then bbs.mocwww.com6 l; \+ o! a7 Q1 N( V- u$ M
if (roo<10.5) thenbbs.mocwww.com: c0 K( }0 r1 d0 @
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表! v3 H# H+ x% A; ~8 p
return 0& J6 q. R0 r: \3 g/ X% G
end
end
Char.AddGold(player,battlePrizeGold);
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的* ^- f! y! y- k$ U6 M1 _
妖城在线论坛0 @; u* ?3 d* V* ^( {

function ng_TalkEvent(player,msg,color,range,size)
妖城在线论坛$ F7 R2 b& p' _, R5 x3 m
local shenshang =Char.GetData(player, %对象_金币%) —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# Q1 ^$ u3 j- X4 G
ro1 = math.random(1,6);
ro2 = math.random(1,6);
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3魔力私服,最新魔力宝贝私服技术交流* @$ J2 C) y4 X( k) R
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表, H8 F5 b( d  o4 P' \$ p
local battlePrizeGoldb = QQ*4.90;--豹子

if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ M5 w, g5 ?' G) l) {
if (shenshang<QQ) then妖城在线论坛: b. R7 u6 x1 z0 @6 n9 L
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表4 L1 k) z( e" P2 `" L
return 0
end
Char.AddGold(player,-QQ);
bbs.mocwww.com2 ?8 }8 u- N2 @3 B: M
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート5 |( ]6 i8 H6 p1 P
if (ro1 == ro2 and ro2 == ro3) then2 ]( Q* @" L5 e0 V
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 e  w0 Y* [  c" D3 z& L* y
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);bbs.mocwww.com8 j! c- X+ E9 ~# `, c$ e, i1 c
endbbs.mocwww.com; e9 C6 ~% Z9 C# Z
elseif (roo<10.5) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 Y0 k, z0 `- d; |$ o/ [
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")魔力私服,最新魔力宝贝私服技术交流) G0 K9 O0 e* x) P& B" l' u  m
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: J+ `4 f- L/ w/ G) _/ W
else魔力私服,最新魔力宝贝私服技术交流/ j& J1 S4 V# `# y: I3 t8 Y4 K
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート0 E! [0 G6 V( F5 k7 L0 t
if (msg== "[10000大]") then
Char.AddGold(player,battlePrizeGold);
end 魔力私服,最新魔力宝贝私服技术交流$ D" V5 y  ^8 R; |  R
end0 N2 B3 ~  ~4 N! a+ Q
return 0
endbbs.mocwww.com" M. s1 q' z/ K1 H5 [
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表 1 n g% K, C/ f! H8 W$ e
没有NPC吗没有NPC吗

bbs.mocwww.com: v' O4 S4 [6 h" }" q
现在还是不会怎么建立npc

TOP