打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:bbs.mocwww.com9 @' |& |- a# w% C5 }
魔力私服,最新魔力宝贝私服技术交流  J; g+ u' A& E7 e% K
1这个开奖会公告发出来

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

3不能定时开奖 (譬如2分钟一次)妖城在线论坛# `* v0 R, t2 Y! N

4不会判断豹子
妖城在线论坛7 v# D3 z' u6 ~0 h7 n% K* H- v
妖城在线论坛% l$ I, R) y+ `7 O8 x) J
第一次动手做的lua,老手别见怪.

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

                              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魔力私服,最新魔力宝贝私服技术交流8 ]: X! o4 B1 v# }
                              local QQ = 10000; --购买数量妖城在线论坛' w0 W% r# f: y! @
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then4 y5 a& p- Z% }: b' l0 M' P' J
                              if (shenshang<QQ) thenbbs.mocwww.com: D& P  C3 c/ ^; k& I6 m
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0魔力私服,最新魔力宝贝私服技术交流' o: g, N% l. z
                              end
                              Char.AddGold(player,-QQ);妖城在线论坛9 S; `3 c# x5 S* R9 M% ^. [2 N5 M
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo>11) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
                                    return 0
                              end妖城在线论坛2 x: d; w2 \, @- }/ M' ^
                              Char.AddGold(player,battlePrizeGold);
            end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! l+ [: r# h! b9 c( ~9 p0 I8 R
                                    if msg== "[10000大]"  then
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")bbs.mocwww.com! P' ~& e) H% a
                                    return 0妖城在线论坛% s6 `) z, q/ d6 Z
                              end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表! M' ?+ W% ]( v- s
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";魔力私服,最新魔力宝贝私服技术交流+ G5 U' T; N5 u1 b- G8 |& ?
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);1 a2 j0 `* o8 b% t: p
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
                                    return 0
                              endbbs.mocwww.com  ^4 `9 o0 b8 a* B8 ]
                              Char.AddGold(player,battlePrizeGold);
            end                                     7 \+ z' \. C* {1 z+ g. D% P
            魔力私服,最新魔力宝贝私服技术交流: b/ x9 H# a0 _/ f
            end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表! J! m4 U# K6 h0 o( d' }1 H* _

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

整理了一下顺序

function ng_TalkEvent(player,msg,color,range,size)
% B. n$ s, x% b. ~$ B* B+ X
local shenshang =Char.GetData(player, %对象_金币%) 妖城在线论坛" t/ [! B) ^8 t
ro1 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表! V1 u2 a/ `" i/ x1 t
ro2 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート+ ]6 I* S  z. c
ro3 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流+ x3 z( L! a0 T! {. z+ I
local roo = ro1+ro2+ro37 l' z: B  p1 Q5 G6 e
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート" n& _; m* x9 X" W9 |5 P4 p

if (shenshang<QQ) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表8 m8 `0 o( k! P9 @6 A
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0bbs.mocwww.com7 U5 q* J) o9 p9 f/ _5 x
end
Char.AddGold(player,-QQ);

buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);/ x/ U" ~) _8 c" m% t: Y

if msg== "[10000小]"  then
if (roo>11) then妖城在线论坛' d9 }3 _0 }/ m6 \
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")( r  J! Z! N/ l0 p
return 0& p8 f4 o& Z- \1 ?
end
end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート. K% k1 k# @7 q) ^& w8 g# j

if msg== "[10000大]"  then
if (roo<10.5) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")魔力私服,最新魔力宝贝私服技术交流* H3 [" L6 u  @
return 0
end " O) B$ I" U2 ]  Y5 _
end 妖城在线论坛9 L; e" S- C' J1 s& M
Char.AddGold(player,battlePrizeGold);
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的

魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表& l9 H! j2 y8 I3 U3 O
function ng_TalkEvent(player,msg,color,range,size)

local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);
ro2 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' n( S) T  ?$ g- c* M
ro3 = math.random(1,6);
local roo = ro1+ro2+ro3bbs.mocwww.com, B0 w4 y$ t3 i# |: [' x
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费魔力私服,最新魔力宝贝私服技术交流+ F9 g/ f3 V8 W+ }* D
local battlePrizeGoldb = QQ*4.90;--豹子$ Y+ f2 L/ k/ ^0 g) N
7 U( x1 L- h  q3 \
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then
if (shenshang<QQ) then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表5 j, d1 N5 \1 ]# \
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 x2 {; M5 H2 {; e3 e3 X
return 0魔力私服,最新魔力宝贝私服技术交流+ c7 a0 k2 O6 Y7 \' B" X. o
end
Char.AddGold(player,-QQ);魔力私服,最新魔力宝贝私服技术交流) Z6 o5 r" g" X, v  M2 T4 G
妖城在线论坛9 t: U& \' w$ H8 Y. B, a0 U1 A

if (ro1 == ro2 and ro2 == ro3) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 @" O. w6 f: h5 ?, G8 K
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")
if (msg== "[10000豹子]")  then6 ~7 t" d- n. e4 `( g
Char.AddGold(player,battlePrizeGoldb);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート0 `1 z% N/ \0 [( e2 q  w: B
endbbs.mocwww.com! y4 U) n8 n/ B0 j8 @0 }( l2 d
elseif (roo<10.5) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);  N, {6 X1 A6 H% V( ^' C
end
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")魔力私服,最新魔力宝贝私服技术交流( ]6 t4 ?- Z: J" {) B6 W3 x+ n/ U" m
if (msg== "[10000大]") then
Char.AddGold(player,battlePrizeGold);
end —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート) N8 J0 [- q, X/ s+ J1 Z
end
return 0妖城在线论坛( ]+ v& w- ?& ?2 s: I
end
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表
没有NPC吗没有NPC吗

! v/ I& v% v" |, W7 M
现在还是不会怎么建立npc

TOP