打印

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

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

lua-买大小的脚本

缺点有:

1这个开奖会公告发出来

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

3不能定时开奖 (譬如2分钟一次)
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表7 ~1 D! \% ^: U8 w7 O. j6 x
4不会判断豹子魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* A1 a' }# I$ q0 Y  K: O" W$ F
bbs.mocwww.com+ g7 X  e3 Q2 I7 Y9 _; F0 l
魔力私服,最新魔力宝贝私服技术交流0 {- k6 v& I1 m1 }
第一次动手做的lua,老手别见怪.妖城在线论坛& v+ I1 K* ?! O# s+ U' B1 Z
妖城在线论坛9 [3 F" l9 ?7 B. R, Y! d+ Z7 o
function ng_TalkEvent(player,msg,color,range,size)

                              local shenshang =Char.GetData(player, %对象_金币%)
                              ro1 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流; W+ v; [$ N$ q3 Y; L
                              ro2 = math.random(1,6);
                              ro3 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 ^8 Z1 U3 g) k  j+ H( U( A
                              local roo = ro1+ro2+ro3
                              local QQ = 10000; --购买数量—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート+ K4 X6 U. m/ N! y
                              local battlePrizeGold = QQ*1.90;--收小费
                              if msg== "[10000小]"  then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 L2 D# J$ l; z  {6 b$ w
                              if (shenshang<QQ) then
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")魔力私服,最新魔力宝贝私服技术交流/ i* ?0 n+ x) z2 R
                                    return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート% [/ b: Z% `% S9 \/ \
                              end
                              Char.AddGold(player,-QQ);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! v2 p6 F3 E) D7 {+ E+ U
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 n: D: D% p- d5 B
                              if (roo>11) thenbbs.mocwww.com1 [% C1 w. D4 G$ }; f
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
                                    return 0
                              end
                              Char.AddGold(player,battlePrizeGold);
            end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表4 z# i$ r& L- U9 @, B0 _" ~7 X
                                    if msg== "[10000大]"  then妖城在线论坛; x) q" q5 X) X* J& O( i9 y+ D
                              if (shenshang<QQ) then/ e3 u$ p5 ~3 i+ P
                                    NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
                                    return 0
                              end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( D1 N3 b, _8 S$ O1 q( u
                              Char.AddGold(player,-QQ);
                              buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";bbs.mocwww.com5 J2 Y4 K- R* Q9 f
            NLG.TalkToCli(-1,_MeIndex,buf,4,0);
                              if (roo<10.5) then
                                    NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
                                    return 0
                              end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 i$ h! {0 e, @0 W& f6 G* Y
                              Char.AddGold(player,battlePrizeGold);                               bbs.mocwww.com9 |. y. A' O" C8 Q. d5 q, N
            end                                     魔力私服,最新魔力宝贝私服技术交流: i4 z/ w4 w2 ~7 u8 c! |

            endbbs.mocwww.com: }% c7 z" u  A0 [) m

[ 本帖最后由 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)
1 H% k% m* r- t9 K
local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート6 v) r% O* M8 ]! H- L( |: y% t5 h$ z
ro2 = math.random(1,6);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 f1 D9 Z9 l  K5 E3 J2 Y% _+ ?6 C, j
ro3 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流6 D0 e0 O: V; g* S1 N, d+ n
local roo = ro1+ro2+ro3魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ _; N2 b- A2 L8 r! M) F
local QQ = 10000; --购买数量
local battlePrizeGold = QQ*1.90;--收小费bbs.mocwww.com5 Q6 Y  n: I4 j0 L4 N# o

if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート  _0 s; l0 }- c/ _# n
end
Char.AddGold(player,-QQ);
魔力私服,最新魔力宝贝私服技术交流7 ^% x# g) J2 R8 b3 R( u2 O  v& T
buf = "本次趣味骰子的结果是［"..ro1.."］［"..ro2.."］［"..ro3.."］，共［"..roo.."］点";
               NLG.TalkToCli(-1,_MeIndex,buf,4,0);
魔力私服,最新魔力宝贝私服技术交流( j5 f' _* L% |, W  R
if msg== "[10000小]"  then魔力私服,最新魔力宝贝私服技术交流  u- ]+ m7 |+ G5 s% D" K( N! Q/ b
if (roo>11) then妖城在线论坛% Y# |& o0 y" i6 G8 n" d
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，大！！！欢迎下次购买！")
return 0
end
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表, Q; z( n3 t4 e. w7 \( O0 L0 R6 {+ K

if msg== "[10000大]"  then . U: l# p$ Y4 J, D; O  f4 G6 Z
if (roo<10.5) then妖城在线论坛6 g. R0 x' [& w. a( L  a# c# |
NLG.SystemMessage(player, "[系统]    今次开["..roo.."]点，小！！！欢迎下次购买！")
return 0
end 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: z: r" ~8 p. i) Z$ B" {
end
Char.AddGold(player,battlePrizeGold);
end

TOP

vcamed

小妖

Rank: 1

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

妖城妖精勋章

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

这是GA的bbs.mocwww.com- v5 j4 U' A% X: I; k: n1 `7 @' q
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表8 P' ^3 ]; }7 B# `

function ng_TalkEvent(player,msg,color,range,size) bbs.mocwww.com; D, d' z- D* @! H% ~9 C) w& l

local shenshang =Char.GetData(player, %对象_金币%)
ro1 = math.random(1,6);魔力私服,最新魔力宝贝私服技术交流8 W2 S. g" @7 l/ w: Q0 f- X
ro2 = math.random(1,6);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート- L- y4 Q7 N( f% \8 x/ `
ro3 = math.random(1,6);bbs.mocwww.com/ [3 j. w: t+ r9 J9 o
local roo = ro1+ro2+ro3
local QQ = 10000; --购买数量魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 w4 j) ~0 u* x( x
local battlePrizeGold = QQ*1.90;--收小费—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 G& _8 x8 F+ ?1 H
local battlePrizeGoldb = QQ*4.90;--豹子妖城在线论坛5 \+ n# M5 B9 |( {/ o  s
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表6 |4 g5 `6 W+ `5 P4 D% `& b
if (msg=="[10000小]" or msg=="[10000大]" or msg == "[10000豹子]") then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# O" O- _* T$ D+ I! [' I& v
if (shenshang<QQ) then
NLG.SystemMessage(player, "[系统] 魔币不足["..QQ.."]，无法使用！")
return 0
endbbs.mocwww.com& X, f2 @1 R& M- X
Char.AddGold(player,-QQ);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート8 g$ Y# o' [- C% L$ j) P

魔力私服,最新魔力宝贝私服技术交流; F6 S, R: b. e* l0 E2 C$ t
if (ro1 == ro2 and ro2 == ro3) then魔力私服,最新魔力宝贝私服技术交流* [5 K( q# O" K. J/ l
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点豹子！！！欢迎下次购买")
if (msg== "[10000豹子]")  then
Char.AddGold(player,battlePrizeGoldb);
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 R& V/ v/ }) d
elseif (roo<10.5) thenbbs.mocwww.com; G0 L2 P+ {$ ?/ \7 g! r" B( T
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点小！！！欢迎下次购买")
if (msg== "[10000小]")  then
Char.AddGold(player,battlePrizeGold);
end
else
NLG.SystemMessage(player, "[系统] ["..ro1.."]["..ro2.."]["..ro3.."] ，共［"..roo.."］点大！！！欢迎下次购买")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ y- R/ ~9 u: A3 A$ @4 D! Q+ H
if (msg== "[10000大]") then
Char.AddGold(player,battlePrizeGold);bbs.mocwww.com$ v1 u2 D' ?8 |" i
end —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート( n/ g! ]$ r5 n
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 发表
- s+ J% t% Z6 _) B$ o妖城在线论坛没有NPC吗没有NPC吗

现在还是不会怎么建立npc

TOP