脚本测试员.txt
资源名称:vbmcrisrc.rar [点击查看]
上传用户:pcw2004
上传日期:2022-02-02
资源大小:743k
文件大小:12k
源码类别:
DirextX编程
开发平台:
Visual Basic
- [@main]
- #IF
- checkpk 200
- #ACT
- say 我不和双手沾满鲜血的人打交道......
- #ELSESAY
- 我是{FCOLOR/1}<$NPCNAME>{FCOLOR/12},欢迎{FCOLOR/10}<$USERNAME>{FCOLOR/12}使用脚本测试。\
- _可以测试如下功能,满足条件会给东西的:
- _<〖我的性别是什么?〗/@asksex>
- _<〖我的职业是什么?〗/@askjob0>
- _<〖移动到比齐(140,240)〗/@movetobiqi>
- _<〖你的金币超过50000了吗〗/@gold50000>
- _<〖你的金币超过10000了吗〗/@gold10000>
- _<〖你的级别超过100了吗〗/@level100>
- _<〖你的级别超过30了吗〗/@level30>
- _<〖你的性别是男士吗〗/@areyouman>
- _<〖你的性别是女士吗〗/@areyouweman>
- _<〖你的职业是战士吗〗/@areyouz>
- _<〖你的职业是法师吗〗/@areyouf>
- _<〖你的职业是道士吗〗/@areyoud>
- _<〖你是男道士吗〗/@areyoumand>
- _<〖你是女道士吗〗/@areyouwemand>
- _<〖产生怪物测试〗/@mobmon>
- _<〖测试跳转语句〗/@testgoto>
- _<〖测试输入字符〗/@inputtest>
- _<〖身上装备特殊修理〗/@SpecialRepairitem>
- _<〖身上装备刻字〗/@writetoitem>
- _<〖拿掉包袱中的装备〗/@@takebagitem>
- _<〖超级传送〗/@supperchangemap>
- _<〖增加声望〗/@addfame>
- _<〖颜色测试〗/@testcolor>
- _<〖个人资料〗/@privateinfo>
- _<+++----About----+++/@aboutme>\
- _<〖测试完毕〗/@exit>
- [@aboutme]
- {FCOLOR/1}D.C.Zhang,City of LiaoCheng,Shan Dong,China.{FCOLOR/12}
- Email: {FCOLOR/10}8ba8ba@sohu.com{FCOLOR/12}
- QQ: {FCOLOR/10}35501728{FCOLOR/12}\
- <Return/@main> <Exit/@exit>
- [@testcolor]
- {FCOLOR/1}■■■■■■■■■■■■■■■■■■■■■--1
- {FCOLOR/2}■■■■■■■■■■■■■■■■■■■■■--2
- {FCOLOR/3}■■■■■■■■■■■■■■■■■■■■■--3
- {FCOLOR/4}■■■■■■■■■■■■■■■■■■■■■--4
- {FCOLOR/5}■■■■■■■■■■■■■■■■■■■■■--5
- {FCOLOR/6}■■■■■■■■■■■■■■■■■■■■■--6
- {FCOLOR/7}■■■■■■■■■■■■■■■■■■■■■--7
- {FCOLOR/8}■■■■■■■■■■■■■■■■■■■■■--8
- {FCOLOR/9}■■■■■■■■■■■■■■■■■■■■■--9
- {FCOLOR/10}■■■■■■■■■■■■■■■■■■■■■--10
- {FCOLOR/11}■■■■■■■■■■■■■■■■■■■■■--11
- {FCOLOR/12}■■■■■■■■■■■■■■■■■■■■■--12
- {FCOLOR/13}■■■■■■■■■■■■■■■■■■■■■--13
- {FCOLOR/14}■■■■■■■■■■■■■■■■■■■■■--14
- {FCOLOR/15}■■■■■■■■■■■■■■■■■■■■■--15\
- <返回/@main> <退出/@exit>
- [@addfame]
- #ACT
- addfame 1
- say 你的声望增加了。
- [@asksex]
- #IF
- checksex 0
- #ACT
- say 你是{FCOLOR/1}男士{FCOLOR/12}。\<返回/@main> <退出/@exit>
- #ELSE
- say 你是{FCOLOR/1}女士{FCOLOR/12}。\<返回/@main> <退出/@exit>
- [@askjob0]
- #IF
- checkjob 0
- #ACT
- say 你是一名{FCOLOR/1}战士{FCOLOR/12}。\<返回/@main> <退出/@exit>
- #else
- goto @askjob1
- [@askjob1]
- #IF
- checkjob 1
- #ACT
- say 你是一名{FCOLOR/1}法师{FCOLOR/12}。\<返回/@main> <退出/@exit>
- #else
- say 你是一名{FCOLOR/1}道士{FCOLOR/12}。\<返回/@main> <退出/@exit>
- [@@takebagitem]
- #IF
- checkbagitem <$INPUTVAL> 1
- #ACT
- take <$INPUTVAL> 1
- say 谢谢你的[<$INPUTVAL>]...\<返回/@main> <退出/@exit>
- #ELSESAY
- 你包袱里面并没有[<$INPUTVAL>],呵呵。\
- <返回/@main> <退出/@exit>
- [@movetobiqi]
- #ACT
- Mapmove 0 140 240
- [@gold50000]
- #IF
- checkgold 50000
- #ACT
- give 铁剑 1
- say 奖励你一点东西...\<返回/@main> <退出/@exit>
- #ELSESAY
- 哈哈,穷鬼。50000金币都没有...\
- <返回/@main> <退出/@exit>
- [@gold10000]
- #IF
- checkgold 10000
- #ACT
- give 木剑 1
- say 奖励你一点东西...\<返回/@main> <退出/@exit>
- #ELSESAY
- 哈哈,穷鬼。10000金币都没有...\
- <返回/@main> <退出/@exit>
- [@level100]
- #IF
- checklevel 100
- #ACT
- give 屠龙 1
- say 奖励你一点东西...\<返回/@main> <退出/@exit>
- #ELSESAY
- 哈哈,笨蛋。100级都没有...\
- <返回/@main> <退出/@exit>
- [@level30]
- #IF
- checklevel 30
- #ACT
- give 半月 1
- say 奖励你一点东西...\<返回/@main> <退出/@exit>
- #ELSESAY
- 哈哈,笑死人。30级都没有...\
- <返回/@main> <退出/@exit>
- [@areyouman]
- #IF
- checksex 0
- #ACT
- give 布衣(男) 1
- say 奖励你一点东西...\<返回/@main> <退出/@exit>
- #ELSESAY
- 哈哈,你不是先生。
- <返回/@main> <退出/@exit>
- [@areyouweman]
- #IF
- checksex 1
- #ACT
- give 布衣(女) 1
- say 奖励你一点东西...\<返回/@main> <退出/@exit>
- #ELSESAY
- 哈哈,你不是女士。
- <返回/@main> <退出/@exit>
- [@areyouz]
- #IF
- checkjob 0
- #ACT
- give 炼狱 1
- say 奖励你一点东西...\<返回/@main> <退出/@exit>
- #ELSESAY
- 哈哈,你不是战士。
- <返回/@main> <退出/@exit>
- [@areyouf]
- #IF
- checkjob 1
- #ACT
- give 魔杖 1
- say 奖励你一点东西...\<返回/@main> <退出/@exit>
- #ELSESAY
- 哈哈,你不是法师。
- <返回/@main> <退出/@exit>
- [@areyoud]
- #IF
- checkjob 2
- #ACT
- give 银蛇 1
- say 奖励你一点东西...\<返回/@main> <退出/@exit>
- #ELSESAY
- 哈哈,你不是道士。
- <返回/@main> <退出/@exit>
- [@areyoumand]
- #IF
- checksex 0
- checkjob 2
- #ACT
- give 银蛇 1
- give 轻型盔甲(男) 1
- say 奖励你一点东西...\<返回/@main> <退出/@exit>
- #ELSESAY
- 哈哈,你不是男道士。
- <返回/@main> <退出/@exit>
- [@areyouwemand]
- #IF
- checksex 1
- checkjob 2
- #ACT
- give 银蛇 1
- give 轻型盔甲(女) 1
- say 奖励你一点东西...\<返回/@main> <退出/@exit>
- #ELSESAY
- 哈哈,你不是女道士。
- <返回/@main> <退出/@exit>
- [@writetoitem]
- 这是一个好办法!不然丢了怎么找回来?
- 刻完字后,把装备取下来,再带上就看到了。
- 请问,你要在什么装备上刻字?\
- <武器/@@write_weapon> <衣服/@@write_clothing> <项链/@@write_necklace> <头盔/@@write_helm> <鞋子/@@write_boot>
- <左手镯/@@write_leftbangle> <右手镯/@@write_rightbangle> <左戒指/@@write_leftring> <右戒指/@@write_rightring>\
- <返回/@main> <不刻了/@exit>
- [@inputtest]
- 点击下面的{FCOLOR/10}输入测试{FCOLOR/12},将会出现一个输入对话框。
- 输入任意字符,将会显示出来。\
- 点击下面的{FCOLOR/10}明码测试{FCOLOR/12},将会出现一个输入对话框。
- 输入{FCOLOR/1}123{FCOLOR/12},将会显示明码码正确。\
- 点击下面的{FCOLOR/10}密码测试{FCOLOR/12},将会出现一个输入对话框。
- 输入{FCOLOR/1}123{FCOLOR/12},将会密码明码码正确。\
- <输入测试/@@inputval>
- <明码测试/@@inputword>
- <密码测试/@@*inputpass>
- [@@inputval]
- 呵呵。你输入了“{FCOLOR/1}<$INPUTVAL>{FCOLOR/12}”,谢谢。\
- <返回/@main> <退出/@exit>
- [@@inputword]
- #if
- equal <$INPUTVAL> 123
- #act
- give 铁剑 1
- say 明码正确。奖励你一点东西...\<返回/@main> <退出/@exit>
- #elsesay
- 呵呵。你输入了“{FCOLOR/1}<$INPUTVAL>{FCOLOR/12}”,明码不对。\
- <返回/@main> <退出/@exit>
- [@@*inputpass]
- #if
- equal <$INPUTVAL> 123
- #act
- give 铁剑 1
- say 密码正确。奖励你一点东西...\<返回/@main> <退出/@exit>
- #elsesay
- 呵呵。你输入了“{FCOLOR/1}<$INPUTVAL>{FCOLOR/12}”,密码不对。\
- <返回/@main> <退出/@exit>
- [@testgoto]
- 下面测试跳转。\
- <向前跳转到《输入测试》/@gotoinputtest>
- [@gotoinputtest]
- #ACT
- goto @inputtest
- [@mobmon]
- 请选择你要生产什么怪物?\
- <稻草人/@mobdcr> <半兽人/@mobbsr> <半兽勇士/@mobbsys>
- <沃玛教主/@mobwmjz> <祖玛教主/@mobzmjz>
- <诺玛抛石兵/@mobnmt> <霸王教主/@mobbwjz>
- <诺玛教主/@mobnmjz> <诺-玛-教-主/@mobnmjz99>\
- <返回/@main> <退出/@exit>
- [@mobdcr]
- #ACT
- mob 稻草人
- say 好好打一架吧!\<返回/@main> <退出/@exit>
- [@mobbsr]
- #ACT
- mob 半兽人 10 10
- say 好好打一架吧!\<返回/@main> <退出/@exit>
- [@mobbsys]
- #IF
- checklevel 15
- #ACT
- mob 半兽勇士
- say 好好打一架吧!\<返回/@main> <退出/@exit>
- #ELSESAY
- 你不到15级,不能使用这个功能。\
- <返回/@mobmon> <退出/@exit>
- [@mobwmjz]
- #IF
- checklevel 25
- #ACT
- mob 沃玛教主
- say 好好打一架吧!\<返回/@main> <退出/@exit>
- #ELSESAY
- 你不到25级,不能使用这个功能。\
- <返回/@mobmon> <退出/@exit>
- [@mobzmjz]
- #IF
- checklevel 35
- #ACT
- mob 祖玛教主
- say 好好打一架吧!\<返回/@main> <退出/@exit>
- #ELSESAY
- 你不到35级,不能使用这个功能。\
- <返回/@mobmon> <退出/@exit>
- [@mobnmt]
- #IF
- checklevel 45
- #ACT
- mob 诺玛抛石兵
- say 好好打一架吧!\<返回/@main> <退出/@exit>
- #ELSESAY
- 你不到45级,不能使用这个功能。\
- <返回/@mobmon> <退出/@exit>
- [@mobbwjz]
- #IF
- checklevel 55
- #ACT
- mob 霸王教主
- say 好好打一架吧!\<返回/@main> <退出/@exit>
- #ELSESAY
- 你不到55级,不能使用这个功能。\
- <返回/@mobmon> <退出/@exit>
- [@mobnmjz]
- #IF
- checklevel 65
- #ACT
- mob 诺玛教主
- say 好好打一架吧!\<返回/@main> <退出/@exit>
- #ELSESAY
- 你不到65级,不能使用这个功能。\
- <返回/@mobmon> <退出/@exit>
- [@mobnmjz99]
- #IF
- checklevel 75
- #ACT
- mob 诺玛教主99
- say 好好打一架吧!\<返回/@main> <退出/@exit>
- #ELSESAY
- 你不到75级,不能使用这个功能。\
- <返回/@mobmon> <退出/@exit>
- [@SpecialRepairitem]
- 请选择要修物品的目录。并且我修的物品必须是要佩戴着的。
- 同{FCOLOR/10}<$NPCNAME>{FOCLOR/12}<对话/@TalkToQuest>
- _<衣服/@SRepairFunc(0)> , <项链/@SRepairFunc(3)> , <头盔/@SRepairFunc(4)> , <鞋/@SRepairFunc(10)>
- _<手镯(左)/@SRepairFunc(5)>, <手镯(右)/@SRepairFunc(6)>
- _<戒指(左)/@SRepairFunc(7)>, <戒指(右)/@SRepairFunc(8)>
- _<武器/@SRepairFunc(1)>\
- _<结 束/@exit>
- [@SRepairFunc(0)]
- 衣服修好了\
- <修理其他装备/@SpecialRepairitem>
- <结 束/@exit>
- [@SRepairFunc(3)]
- 项链修好了\
- <修理其他装备/@SpecialRepairitem>
- <结 束/@exit>
- [@SRepairFunc(4)]
- 头盔修好了\
- <修理其他装备/@SpecialRepairitem>
- <结 束/@exit>
- [@SRepairFunc(10)]
- 鞋子修好了\
- <修理其他装备/@SpecialRepairitem>
- <结 束/@exit>
- [@SRepairFunc(5)]
- 手镯修好了\
- <修理其他装备/@SpecialRepairitem>
- <结 束/@exit>
- [@SRepairFunc(6)]
- 手镯修好了\
- <修理其他装备/@SpecialRepairitem>
- <结 束/@exit>
- [@SRepairFunc(7)]
- 戒指修好了\
- <修理其他装备/@SpecialRepairitem>
- <结 束/@exit>
- [@SRepairFunc(8)]
- 戒指修好了\
- <修理其他装备/@SpecialRepairitem>
- <结 束/@exit>
- [@SRepairFunc(1)]
- 武器修好了\
- <修理其他装备/@SpecialRepairitem>
- <结 束/@exit>
- [@supperchangemap]
- _勇士你好,我可以把你直接传送到怪物老巢!
- _不过我不能保证那里的安全,
- _不过我{FCOLOR/10}可是很贪财的的~~~{FCOLOR/12}\
- _移动可能区域
- _<蚂蚁洞穴东部 [50 万]/@蚂蚁洞穴东部>
- _<比奇洞穴3层 [50 万]/@比奇洞穴3层>
- _<失乐园洞穴3层 [50 万]/@失乐园洞穴3层>
- _<石阁庙3层 [50 万]/@石阁庙3层>
- _<生死关 [100万]/@生死关>
- _<沙漠 [100万]/@沙漠>
- _<沃玛神殿3层 [100万]/@沃玛神殿3层>
- _<潘夜洞穴3层 [100万]/@潘夜洞穴3层>
- _<潘夜神殿5层 [200万]/@潘夜神殿5层>
- _<祖玛神殿5层 [100万]/@祖玛神殿5层>
- _<赤月山谷4层 [200万]/@赤月山谷4层>
- _<潘夜神殿 [200万]/@潘夜神殿>
- _<真天宫5层 [200万]/@真天宫5层>
- _<诺玛遗址5层 [300万]/@诺玛遗址5层>
- _<神舰入口 [200万]/@神舰入口>\
- _<不移动。/@Exit> <返回/@main>
- [@蚂蚁洞穴东部]
- #IF
- checkgold 50
- #ACT
- take 金币 50
- Mapmove D404 9 24
- #ELSESAY
- [@比奇洞穴3层]
- #IF
- checkgold 50
- #ACT
- take 金币 50
- Mapmove D103 231 123
- #ELSESAY
- [@失乐园洞穴3层]
- #IF
- checkgold 50
- #ACT
- take 金币 50
- Mapmove D113 252 234
- #ELSESAY
- [@石阁庙3层]
- #IF
- checkgold 50
- #ACT
- take 金币 50
- Mapmove D703 191 46
- #ELSESAY
- [@生死关]
- #IF
- checkgold 100
- #ACT
- take 金币 100
- Mapmove D805 21 21
- #ELSESAY
- [@沃玛神殿3层]
- #IF
- checkgold 100
- #ACT
- take 金币 100
- Mapmove D503 220 53
- [@潘夜洞穴3层]
- #IF
- checkgold 100
- #ACT
- take 金币 100
- Mapmove D123 266 58
- #ELSESAY
- [@潘夜神殿5层]
- #IF
- checkgold 200
- #ACT
- take 金币 200
- Mapmove D1008 175 175
- #ELSESAY
- [@祖玛神殿5层]
- #IF
- checkgold 100
- #ACT
- take 金币 100
- Mapmove D1105 111 144
- #ELSESAY
- [@赤月山谷4层]
- #IF
- checkgold 200
- #ACT
- take 金币 200
- Mapmove D904 92 284
- #ELSESAY
- [@潘夜神殿]
- #IF
- checkgold 200
- #ACT
- take 金币 200
- Mapmove D1012 54 48
- #ELSESAY
- [@真天宫5层]
- #IF
- checkgold 200
- #ACT
- take 金币 200
- Mapmove D1205 72 297
- #ELSESAY
- [@诺玛遗址5层]
- #IF
- checkgold 300
- #ACT
- take 金币 300
- Mapmove D1505 312 185
- [@神舰入口]
- #IF
- checkgold 200
- #ACT
- take 金币 200
- Mapmove D1401 44 63
- [@沙漠]
- #IF
- checkgold 100
- #ACT
- take 金币 100
- Mapmove D002 125 125
- [@privateinfo]
- 我叫{FCOLOR/1}<$NPCNAME>{FCOLOR/12},我告诉你一些基本情况。\
- 你叫{FCOLOR/1}<$USERNAME>{FCOLOR/12},级别为{FCOLOR/1}<$USERLEVEL>{FCOLOR/12},幸运值为{FCOLOR/1}<$USERLUCKY>{FCOLOR/12}。
- 犯罪值为{FCOLOR/1}<$USERPK>{FCOLOR/12}。你来至于{FCOLOR/1}<$USERIP>{FCOLOR/12}。\
- 报告日期:{FCOLOR/1}<$DATE>,<$TIME>{FCOLOR/12}。
- 服务器已运行了{FCOLOR/1}<$RUNTIME>{FCOLOR/12}。
- [end]