Hero和3K引擎通用pangniu脚本-传奇私服一条龙

默认地图是GA1

如换地图，请自己修改




QM：
[@摇色子]
#if
IsOnMap GA1
#act
MOV d0
playdice 1 @cube_cds-1
#say
.正在摇骰子....
[@cube_cds-1]
#IF
check [030] 1
equal d0 1
LARGE N1 0
#ACT
set [030] 0
MUL N12  285
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break

#IF
check [030] 1
equal d0 2
LARGE N1 0
#ACT
set [030] 0
MUL N12  285
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break


#IF
check [030] 1
equal d0 3
LARGE N2 0
#ACT
set [030] 0
MUL N12  285
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break


#IF
check [030] 1
equal d0 4
LARGE N2 0
#ACT
set [030] 0
MUL N12  285
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break

#IF
check [030] 1
equal d0 5
LARGE N3 0
#ACT
set [030] 0
MUL N12  285
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break

#IF
check [030] 1
equal d0 6
LARGE N3 0
#ACT
set [030] 0
MUL N12  285
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break

#IF
check [032] 1
equal d0 1
LARGE N5 0
#ACT
set [032] 0
MUL N12  190
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break

#IF
check [032] 1
equal d0 2
LARGE N4 0
#ACT
set [032] 0
MUL N12  190
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break

#IF
check [032] 1
equal d0 3
LARGE N5 0
#ACT
set [032] 0
MUL N12  190
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break

#IF
check [032] 1
equal d0 4
LARGE N4 0
#ACT
set [032] 0
MUL N12  190
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break

#IF
check [032] 1
equal d0 5
LARGE N5 0
#ACT
set [032] 0
MUL N12  190
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break

#IF
check [032] 1
equal d0 6
LARGE N4 1
#ACT
set [032] 0
MUL N12  190
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break



本帖隐藏的内容

#IF
check [031] 1
equal d0 1
LARGE N6 0
#ACT
set [031] 0
MUL N12  570
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break


#IF
check [031] 1
equal d0 2
LARGE N7 0
#ACT
set [031] 0
MUL N12  570
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break

#IF
check [031] 1
equal d0 3
LARGE N8 0
#ACT
set [031] 0
MUL N12  570
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break


#IF
check [031] 1
equal d0 4
LARGE N9 0
#ACT
set [031] 0
MUL N12  570
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break


#IF
check [031] 1
equal d0 5
LARGE N10 0
#ACT
set [031] 0
MUL N12  570
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break

#IF
check [031] 1
equal d0 6
LARGE N11 0
#ACT
set [031] 0
MUL N12  570
Div N13  100
GAMEGOLD +
GuildNoticeMsg 254 249 【%s】在赌博过程中，用个元宝赢得了个元宝.
sendmsg 7 恭喜你用个元宝赢得了个元宝.
goto @再接再厉
break

#ELSEact
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0
MOV N5 0
MOV N6 0
MOV N7 0
MOV N8 0
MOV N9 0
MOV N10 0
MOV N11 0
MOV N12 0
MOV N13 0
set [030] 0
set [031] 0
set [032] 0
sendmsg 7 很遗憾,没有摇到你需要的点数.你可以重新下注了！
break
close

[@再接再厉]
#ACT
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0
MOV N5 0
MOV N6 0
MOV N7 0
MOV N8 0
MOV N9 0
MOV N10 0
MOV N11 0
MOV N12 0
MOV N13 0
set [030] 0
set [031] 0
set [032] 0
sendmsg 5 您当前的元宝为：个.你可以继续押注了.
break
close

NPC脚本

(@@InPutInteger)
[@main]
#IF
ISADMIN
#say
-------------------拥有元宝数{}-----------------

：【】【】【】【】【】【】
：【】【】【】 ①②为小,③④为中,⑤⑥为大
：【】【】   ①③⑤为单,②④⑥为双
说明：点击您要竞猜的数字，输入您要下注的金额，按确定..
压住离手还剩下秒,请要下注的朋友速度哦
  
#elsesay
-------------------拥有元宝数{}-----------------

：【】【】【】【】【】【】
：【】【】【】 ①②为小,③④为中,⑤⑥为大
：【】【】   ①③⑤为单,②④⑥为双
说明：点击您要竞猜的数字，输入您要下注的金额，按确定..
压住离手还剩下秒,请要下注的朋友速度哦
  


[@土城]
#act
mapmove 3 333 332
[@游戏规则]
.
.
押注数额是1-20000元宝
每次猜中扣除5%的手续费
所有在这个地图的人摇的点数都是一样的
[@InPutInteger1]
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
Goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger1
[~InPutInteger1]
#IF
LARGE N1 20000
#ACT
MOV N1 0
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
SMALL N1 1
#ACT
MOV N1 0
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
CHECKGAMEGOLD <
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD -
set [030] 1
sendmsg 4 [%s]压小[元宝]，赔率3倍
break
close
;=======================================小==============================================
[@InPutInteger2]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger2
[~InPutInteger2]
#IF
LARGE N2 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
SMALL N2 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
CHECKGAMEGOLD <
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD -
set [030] 1
sendmsg 4 [%s]压中[元宝]，赔率3倍
break
close
;=======================================中==============================================

[@InPutInteger3]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger3
[~InPutInteger3]
#IF
LARGE N3 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
SMALL N3 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
CHECKGAMEGOLD <
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD -
set [030] 1
sendmsg 4 [%s]压大[元宝]，赔率3倍
break
close
;=======================================大==============================================
[@InPutInteger4]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger4
[~InPutInteger4]
#IF
LARGE N4 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
SMALL N4 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
CHECKGAMEGOLD <
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD -
set [032] 1
sendmsg 4 [%s]压双[元宝]，赔率2倍
break
close
;=======================================双==============================================

[@InPutInteger5]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger5
[~InPutInteger5]
#IF
LARGE N5 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
SMALL N5 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
CHECKGAMEGOLD <
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD -
set [032] 1
sendmsg 4 [%s]压单[元宝]，赔率2倍
break
close
;=======================================单==============================================
[@InPutInteger6]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger6
[~InPutInteger6]
#IF
LARGE N6 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
SMALL N6 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
CHECKGAMEGOLD <
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD -
set [031] 1
sendmsg 4 [%s]压数字①[元宝]，赔率6倍
break
close
;=======================================数字1==============================================
[@InPutInteger7]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger7
[~InPutInteger7]
#IF
LARGE N7 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
SMALL N7 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
CHECKGAMEGOLD <
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD -
set [031] 1
sendmsg 4 [%s]压数字②[元宝]，赔率6倍
break
close
;=======================================数字2==============================================
[@InPutInteger8]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger8
[~InPutInteger8]
#IF
LARGE N8 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
SMALL N8 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
CHECKGAMEGOLD <
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD -
set [031] 1
sendmsg 4 [%s]压数字③[元宝]，赔率6倍
break
close
;=======================================数字3==============================================
[@InPutInteger9]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger9
[~InPutInteger9]
#IF
LARGE N9 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
SMALL N9 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
CHECKGAMEGOLD <
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD -
set [031] 1
sendmsg 4 [%s]压数字④[元宝]，赔率6倍
break
close
;=======================================数字4==============================================
[@InPutInteger10]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger10
[~InPutInteger10]
#IF
LARGE N10 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
SMALL N10 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
CHECKGAMEGOLD <
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD -
set [031] 1
sendmsg 4 [%s]压数字⑤[元宝]，赔率6倍
break
close
;=======================================数字5==============================================
[@InPutInteger11]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger11
[~InPutInteger11]
#IF
LARGE N11 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
SMALL N11 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK

#IF
CHECKGAMEGOLD <
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD -
set [031] 1
sendmsg 4 [%s]压数字⑥[元宝]，赔率6倍
break
close
;=======================================数字6==============================================
[@押注作废]
#act
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0
MOV N5 0
MOV N6 0
MOV N7 0
MOV N8 0
MOV N9 0
MOV N10 0
MOV N11 0
MOV N12 0
MOV N13 0
set [030] 0
set [031] 0
set [032] 0
goto @main
机器人脚本：
1：AutoRunRobot.txt 文档下

#AutoRun NPC SEC 64 @开始赌博A
#AutoRun NPC SEC 1 @押注倒计时A

2：RobotManage.txt 文档下

[@开始赌博A]
#act
MOV G203 60
MOV G204 1
break
[@押注倒计时A]
#if
EQUAL G203 0
EQUAL G204 1
#act
MOV G204 0
movr G198 1 7
Gmexecute StartQuest @摇色子
break
#if
EQUAL G204 1
#act
DEC G203 1
break