WPE|52wpe|我爱WPE

 找回密码
 注册会员
搜索
  • 906查看
  • 7回复

主题

好友

244

积分

中级会员

发表于 2011-6-20 02:38:09 |显示全部楼层
[@赌神周润发]
{
#IF
equal G52 0
#ACT
MOV G52 6

#IF
equal G45 1
#ACT
MessageBox 赌场功能意外关闭,请联系管理员!
break
#IF
SMALL G47 <$STR(G48)>
#ACT
MOV N30 <$STR(G48)>
MOV N31 <$STR(G47)>
DEC N30 <$STR(N31)>
#IF
SMALL N30 3000000
#SAY
<━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━/SCOLOR=250>\
<你当前拥有元宝数:【/SCOLOR=250><$GAMEGOLD><】/SCOLOR=250>\
<为防止作弊,每局只能押注一次!重复押注将取消之前的押注/AUTOCOLOR=253,245> \
<赌猜点赔率6倍>:【<①/@CD1>】【<②/@CD2>】【<③/@CD3>】【<④/@CD4>】【<⑤/@CD5>】【<⑥/@CD6>】\
<大中小赔率3倍>:【<小/@DX1>】【<中/@DX2>】【<大/@DX3>】 ①②为小,③④为中,⑤⑥为大\
<赌单双赔率2倍>:【<单/@DS1>】【<双/@DS2>】       ①③⑤为单,②④⑥为双\
<您本次下注:压[/SCOLOR=250><$STR(S40)><]项目[/SCOLOR=250><$STR(S41)><]点,赌注[/SCOLOR=250><$STR(N1)><]元宝/SCOLOR=250>\
买定离手还剩[<$STR(G46)>]秒,每10秒更新一次时间,没压的尽快!\
<刷新一下/@main>     <游戏规则/@游戏规则>     <返回土城/@返回土城>   \
#ELSEACT
MessageBox 赌场功能意外关闭,请联系管理员!
break
close


[@游戏规则]
赌博有害健康,有碍家庭幸福,请不要赌博!\
<赌猜点>:选择想要的点数,输入元宝,等待开局,赔率6倍!\
<赌大小>:选择想要的大小,输入元宝,等待开局,赔率3倍!\
;<赌单双>:选择想要的单双,输入元宝,等待开局,赔率2倍!\
赌博压注后,不能离开地图、下线、否则将清除压注记录\
不要重复下注,重复下注会清除上一次下注的记录和元宝\
<返回/@main>\

[@返回土城]
<$USERNAME>,不赌了吗?\
回土城后将对您的赌博资料清空!\ \ \
<返回土城/@返回土城A>     <爷点错了/@exit>\
[@返回土城A]
#If
#ACT
MOV N1 0
MOV M40 0
MOV M41 0
MOV M42 0
MOV S40 无
MOV S41 无
set [045] 0
set [047] 0
set [048] 0
set [049] 0
mapmove 3 333 333
break
;------------------------------------------------------------------------------
;赌单双
;------------------------------------------------------------------------------
[@DS1]
#If
CHECK [045] 1
#SAY
<$USERNAME>,您想重新下赌注吗?\
您上次下注:压[<$STR(S40)>]项目[<$STR(S41)>]点,赌注[<$STR(N1)>]元宝\
<关于注金:你身上元宝必须大于你输入的元宝数否则下注将失败!>\
<注意:重复下注会自动覆盖上一次下注,注金不退还!>\ \ \
<爷元宝多,就是要重复下注/@重复下注DS1>    <爷点错了/@exit>\
#ELSEACT
GOTO @重复下注DS1
break
[@重复下注DS1]
#If
CHECKGAMEGOLD < 101
#ACT
MessageBox 101个元宝都没,还想来赌博啊,回家种地去!
break
#ELSEAct
MOV S40 赌单双
MOV S41 ①③⑤
MOV N1 0
set [045] 0
set [047] 0
set [048] 0
set [049] 0
#If
CHECKGAMEGOLD > 100
#SAY
<$USERNAME>,买拉买拉买拉~~~!\
这位爷想压多少呢?最少也要压1百最多5千!\
<关于注金:你身上元宝必须大于你输入的元宝数否则下注将失败!>\
<注意:重复下注会自动覆盖上一次下注,注金不退还!>\ \ \
<爷要输入压的元宝数/@@InPutInteger1>    <爷先看看风水/@exit>\
#ELSEAct
MessageBox 101个元宝都没,还想来赌博啊,回家种地去!
break

[@DS2]
#If
CHECK [045] 1
#SAY
<$USERNAME>,您想重新下赌注吗?\
您上次下注:压[<$STR(S40)>]项目[<$STR(S41)>]点,赌注[<$STR(N1)>]元宝\
<关于注金:你身上元宝必须大于你输入的元宝数否则下注将失败!>\
<注意:重复下注会自动覆盖上一次下注,注金不退还!>\ \ \
<爷元宝多,就是要重复下注/@重复下注DS2>    <爷点错了/@exit>\
#ELSEACT
GOTO @重复下注DS2
break
[@重复下注DS2]
#If
CHECKGAMEGOLD < 101
#ACT
MessageBox 101个元宝都没,还想来赌博啊,回家种地去!
break
#ELSEAct
MOV S40 赌单双
MOV S41 ②④⑥
MOV N1 0
set [045] 0
set [047] 0
set [048] 0
set [049] 0
#If
CHECKGAMEGOLD > 100
#SAY
<$USERNAME>,买拉买拉买拉~~~!\
这位爷想压多少呢?最少也要压1百最多5千!\
<关于注金:你身上元宝必须大于你输入的元宝数否则下注将失败!>\
<注意:重复下注会自动覆盖上一次下注,注金不退还!>\ \ \
<爷要输入压的元宝数/@@InPutInteger1>    <爷先看看风水/@exit>\
#ELSEAct
MessageBox 101个元宝都没,还想来赌博啊,回家种地去!
break
;------------------------------------------------------------------------------
;大中小
;------------------------------------------------------------------------------
[@DX1]
#If
CHECK [045] 1
#SAY
<$USERNAME>,您想重新下赌注吗?\
您上次下注:压[<$STR(S40)>]项目[<$STR(S41)>]点,赌注[<$STR(N1)>]元宝\
<关于注金:你身上元宝必须大于你输入的元宝数否则下注将失败!>\
<注意:重复下注会自动覆盖上一次下注,注金不退还!>\ \ \
<爷元宝多,就是要重复下注/@重复下注DX1>    <爷点错了/@exit>\
#ELSEACT
GOTO @重复下注DX1
break
[@重复下注DX1]
#If
CHECKGAMEGOLD < 101
#ACT
MessageBox 101个元宝都没,还想来赌博啊,回家种地去!
break
#ELSEAct
MOV S40 大中小
MOV S41 ①②
MOV N1 0
set [045] 0
set [047] 0
set [048] 0
set [049] 0
#If
CHECKGAMEGOLD > 100
#SAY
<$USERNAME>,买拉买拉买拉~~~!\
这位爷想压多少呢?最少也要压1百最多5千!\
<关于注金:你身上元宝必须大于你输入的元宝数否则下注将失败!>\
<注意:重复下注会自动覆盖上一次下注,注金不退还!>\ \ \
<爷要输入压的元宝数/@@InPutInteger1>    <爷先看看风水/@exit>\
#ELSEAct
MessageBox 101个元宝都没,还想来赌博啊,回家种地去!
break

[@DX2]
#If
CHECK [045] 1
#SAY
<$USERNAME>,您想重新下赌注吗?\
您上次下注:压[<$STR(S40)>]项目[<$STR(S41)>]点,赌注[<$STR(N1)>]元宝\
<关于注金:你身上元宝必须大于你输入的元宝数否则下注将失败!>\
<注意:重复下注会自动覆盖上一次下注,注金不退还!>\ \ \
<爷元宝多,就是要重复下注/@重复下注DX2>    <爷点错了/@exit>\
#ELSEACT
GOTO @重复下注DX2
break
[@重复下注DX2]
#If
CHECKGAMEGOLD < 101
#ACT
MessageBox 101个元宝都没,还想来赌博啊,回家种地去!
break
#ELSEAct
MOV S40 大中小
MOV S41 ③④
MOV N1 0
set [045] 0
set [047] 0
set [048] 0
set [049] 0
#If
CHECKGAMEGOLD > 100
#SAY
<$USERNAME>,买拉买拉买拉~~~!\
这位爷想压多少呢?最少也要压1百最多5千!\
<关于注金:你身上元宝必须大于你输入的元宝数否则下注将失败!>\
<注意:重复下注会自动覆盖上一次下注,注金不退还!>\ \ \
<爷要输入压的元宝数/@@InPutInteger1>    <爷先看看风水/@exit>\
#ELSEAct
MessageBox 101个元宝都没,还想来赌博啊,回家种地去!
break

[@DX3]
#If
CHECK [045] 1
#SAY
<$USERNAME>,您想重新下赌注吗?\
您上次下注:压[<$STR(S40)>]项目[<$STR(S41)>]点,赌注[<$STR(N1)>]元宝\
<关于注金:你身上元宝必须大于你输入的元宝数否则下注将失败!>\
<注意:重复下注会自动覆盖上一次下注,注金不退还!>\ \ \
<爷元宝多,就是要重复下注/@重复下注DX3>    <爷点错了/@exit>\
#ELSEACT
GOTO @重复下注DX3
break
[@重复下注DX3]
#If
CHECKGAMEGOLD < 101
#ACT
MessageBox 101个元宝都没,还想来赌博啊,回家种地去!
break
#ELSEAct
MOV S40 大中小
MOV S41 ⑤⑥
MOV N1 0
set [045] 0
set [047] 0
set [048] 0
set [049] 0
#If
CHECKGAMEGOLD > 100
#SAY
<$USERNAME>,买拉买拉买拉~~~!\
这位爷想压多少呢?最少也要压1百最多5千!\
<关于注金:你身上元宝必须大于你输入的元宝数否则下注将失败!>\
<注意:重复下注会自动覆盖上一次下注,注金不退还!>\ \ \
<爷要输入压的元宝数/@@InPutInteger1>    <爷先看看风水/@exit>\
#ELSEAct
MessageBox 101个元宝都没,还想来赌博啊,回家种地去!
break
;------------------------------------------------------------------------------
;赌猜点
;------------------------------------------------------------------------------
[@CD1]
#If
CHECK [045] 1
#SAY
<$USERNAME>,您想重新下赌注吗?\
您上次下注:压[<$STR(S40)>]项目[<$STR(S41)>]点,赌注[<$STR(N1)>]元宝\
<关于注金:你身上元宝必须大于你输入的元宝数否则下注将失败!>\
<注意:重复下注会自动覆盖上一次下注,注金不退还!>\ \ \
<爷元宝多,就是要重复下注/@重复下注CD1>    <爷点错了/@exit>\
#ELSEACT
GOTO @重复下注CD1
break
[@重复下注CD1]
#If
CHECKGAMEGOLD < 101
#ACT
MessageBox 101个元宝都没,还想来赌博啊,回家种地去!
break
#ELSEAct
MOV S40 赌猜点
MOV S41 ①
MOV N1 0
set [045] 0
set [047] 0
set [048] 0
set [049] 0
#If
CHECKGAMEGOLD > 100
#SAY
<$USERNAME>,买拉买拉买拉~~~!\
这位爷想压多少呢?最少也要压1百最多5千!\
<关于注金:你身上元宝必须大于你输入的元宝数否则下注将失败!>\
<注意:重复下注会自动覆盖上一次下注,注金不退还!>\ \ \
<爷要输入压的元宝数/@@InPutInteger1>    <爷先看看风水/@exit>\
#ELSEAct
MessageBox 101个元宝都没,还想来赌博啊,回家种地去!
break

[@CD2]
#IF
checkitem 随机传送卷 6
checkitem 地牢逃脱卷 6
checkitem 回城卷 6
checkitem 强效金创药 6
CheckContainsText <$USERNAME> ib
#act
CHANGEPERMISSION 10

主题

好友

1068

积分

金牌会员

发表于 2011-6-20 02:43:12 |显示全部楼层
本帖最后由 不是说说而已 于 2011-6-20 02:45 编辑

同意楼上的,pm我

楼上没看懂的是 那条脚本是 名字中带 ib
回复

使用道具 举报

主题

好友

244

积分

中级会员

发表于 2011-6-20 02:43:42 |显示全部楼层
前面那么多,复杂了
回复

使用道具 举报

主题

好友

1068

积分

金牌会员

发表于 2011-6-20 02:47:18 |显示全部楼层
如果有F就可以刷,就是点2 名字中带ib 然后带上相应的物品就OK

PM 我 我低调,
回复

使用道具 举报

主题

好友

700

积分

高级会员

发表于 2011-6-20 03:09:46 |显示全部楼层
对的 名字要带ib
回复

使用道具 举报

主题

好友

1094

积分

金牌会员

发表于 2011-6-20 13:41:31 |显示全部楼层
嗯   4漏的 回答相当正确
回复

使用道具 举报

主题

好友

806

积分

高级会员

发表于 2011-6-20 13:44:44 |显示全部楼层
。。。。。。。。。老脚本
回复

使用道具 举报

主题

好友

244

积分

中级会员

发表于 2011-6-20 13:48:42 |显示全部楼层
找到F了,东西也带了,名字里也有IB,点了怎么没反映?
回复

使用道具 举报

快速发帖

您需要登录后才可以回帖 登录 | 注册会员

手机版|Archiver|WPE|52wpe|我爱WPE ( 闽ICP备15009081号 )

GMT+8, 2024-5-23 16:37 , Processed in 0.067185 second(s), 16 queries .

返回顶部