打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:妖城在线论坛* P3 N$ m5 G% E- J
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 j$ c( t% N7 k' O- d) w2 q
1这个开奖会公告发出来

2不会借用论坛骰子脚本做出骰子图像.魔力私服,最新魔力宝贝私服技术交流: O. a. ~. b- b: J! g5 a5 \4 u5 h& Z

3不能定时开奖 (譬如2分钟一次)
魔力私服,最新魔力宝贝私服技术交流+ I! h5 E5 V* u% ?
4不会判断豹子

第一次动手做的lua,老手别见怪.bbs.mocwww.com0 b+ j$ _6 d! \
妖城在线论坛5 d' q( E* r( b- S7 @  X
function ng_TalkEvent(player,msg,color,range,size)       魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表4 u; v# j/ T9 _9 l& v- S
魔力私服,最新魔力宝贝私服技术交流9 C+ }: s- e0 H" d
                              local shenshang =Char.GetData(player, %对象_金币%)                               bbs.mocwww.com2 L$ \% s; F6 z. J; Y; e: p
                              ro1 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート7 I) G2 h, J9 E/ k# u, f1 _/ _3 _
                              ro2 = math.random(1,6);
                              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
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end
                              Char.AddGold(player,-QQ);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート. r) q8 g! T5 B+ |* J
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo>11) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" j# D8 H+ ?9 I
                                    return 0
                              end
                              Char.AddGold(player,battlePrizeGold);
            end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! Q7 N+ d3 V2 B" L' ~/ K
                                    if msg== "[10000大]"  then妖城在线论坛$ ?/ ]+ \1 w7 g) y5 m/ \' T& N
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 U9 F# V1 D+ ]- x2 ]8 Y0 E
                                    return 0
                              end" g' L$ m. O, G, k+ d) e9 K
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")妖城在线论坛& N# v  i' K- A5 N/ e1 `0 G
                                    return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート: W6 g2 _4 k7 s5 A
                              end
                              Char.AddGold(player,battlePrizeGold);                               0 P1 C( T* f. x" g4 U
            end                                     魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ r# O+ B: q' _: A+ t! r) ~3 F* u* h
            bbs.mocwww.com9 S7 ?( j8 N$ e  [0 T
            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 显示全部帖子

整理了一下顺序妖城在线论坛8 X" I6 Y4 E9 ?: v
bbs.mocwww.com. I& ]3 _7 J  S
function ng_TalkEvent(player,msg,color,range,size) bbs.mocwww.com1 U% p/ f" J7 |" X4 j6 W
8 d9 B& z( ]3 C% P+ v4 W
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魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表  j/ _# z1 f; S! Y' Z' A4 @1 F
local QQ = 10000; --购买数量魔力私服,最新魔力宝贝私服技术交流7 {( e9 M8 C% `3 I% o7 n
local battlePrizeGold = QQ*1.90;--收小费bbs.mocwww.com1 S! o: O' _  W( E' w! z  H+ ^; G

if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0魔力私服,最新魔力宝贝私服技术交流( }% N2 j+ K) ?1 Y. r% M
endbbs.mocwww.com" V: }4 U6 X- r8 ^& [. s4 K0 R
Char.AddGold(player,-QQ);
3 J9 x( }( v8 ]- b0 Z% A) H" ~$ t
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";: {( G, j0 N5 ?2 D# t- k( m
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);妖城在线论坛7 T4 O- |8 n' {/ f( h8 m
bbs.mocwww.com6 j8 \4 v& I; S+ X
if msg== "[10000小]"  then
if (roo>11) thenbbs.mocwww.com- ?$ [8 m3 ]9 c0 e
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")% k5 F$ ~5 m! v0 a5 i
return 0妖城在线论坛. Q, A) Z6 [( m3 d$ }$ _+ q. Q- h
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( |' I; M( e- i7 M' l( `/ C  q
end

if msg== "[10000大]"  then
if (roo<10.5) then
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
return 0( X& b3 z. G6 O
end
end —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート9 |) U* v$ z- u% f( M3 w+ _! f$ l. l9 h
Char.AddGold(player,battlePrizeGold); 6 m& X) L$ W# _6 {. F
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表  J3 U2 I) ]; i, u, y8 {

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

local shenshang =Char.GetData(player, %对象_金币%) 魔力私服,最新魔力宝贝私服技术交流9 u$ Y4 K2 d" G1 r5 Q& E  ^- n, o
ro1 = math.random(1,6);
ro2 = math.random(1,6);  u/ g7 C/ S8 [$ E" n' W  d
ro3 = math.random(1,6);bbs.mocwww.com3 m- _+ B+ A# K0 R& r) X
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费
local battlePrizeGoldb = QQ*4.90;--豹子
魔力私服,最新魔力宝贝私服技术交流% i) Y4 d/ o1 X; r' H' [
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") thenbbs.mocwww.com+ o. Z* [: j% N
if (shenshang<QQ) then- V9 Y& J& z5 Z) H+ E3 |
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0妖城在线论坛8 A5 x1 Y0 U  A* R: I. |6 W2 `
end
Char.AddGold(player,-QQ);

魔力私服,最新魔力宝贝私服技术交流/ L, S# ~% [2 ^
if (ro1 == ro2 and ro2 == ro3) thenbbs.mocwww.com! t6 U$ q# t' c
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")
if (msg== "[10000豹子]")  then# {  |7 T6 {! v/ O9 f* O
Char.AddGold(player,battlePrizeGoldb);魔力私服,最新魔力宝贝私服技术交流6 K& |& Y7 M) Y* r9 E
end
elseif (roo<10.5) then
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")妖城在线论坛$ y, H8 U8 r- u
if (msg== "[10000小]")  then 妖城在线论坛1 l& y& k. W3 y: B6 k. K/ e( j4 A" s
Char.AddGold(player,battlePrizeGold);魔力私服,最新魔力宝贝私服技术交流! i7 {" y& ~! M# ?
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# @# J$ D4 t* s
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")/ X  @  ^1 Z, `/ n1 S/ U. }/ n
if (msg== "[10000大]") then  n# o5 R0 q% N
Char.AddGold(player,battlePrizeGold);
end 妖城在线论坛) @) o% m# [, Y8 r- P1 W2 s
endbbs.mocwww.com0 T# R# F7 _" F; w( {4 O
return 0
endbbs.mocwww.com1 k! I+ y9 m0 V
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

地板大中小发表于 2017-3-26 18:32 显示全部帖子

引用:

原帖由 cststttt 于 2017-3-26 11:26 发表
5 }+ ^% K- }2 A9 F没有NPC吗没有NPC吗

bbs.mocwww.com- n6 S) _( E) y! Y4 [( j
现在还是不会怎么建立npc

TOP