利用自动发卡程序的点卡充值传奇脚本

首先：自动售卡 玩家购买到卡密 在游戏输入卡密领取元宝


下面是NPC脚本：


[@main]
<$USERNAME>！这里是点卡充值平台！\
<特别注意:如果错误次数过多，系统将自动给予三天封号处理>\
<金钱比例：1元=1个游戏币> \ \ \
<点这充值/@@InPutString18|Title=请输入您的充值卡密>\
<返回/@MAIN>

[@InPutString18]
#IF
CHECKCODELIST <$STR(s18)> ..\QuestDiary\卡号列表\5.txt
#act
CLEARCODELIST <$STR(S18)> ..\QuestDiary\卡号列表\5.txt
GAMEGOLD + 5
SENDMSG 5 提示：你成功充值了5个游戏币！当前的游戏币数量为:<$GAMEGOLD>
goto  @main
Break www.5uwL.net

#IF
CHECKCODELIST <$STR(s18)> ..\QuestDiary\卡号列表\10.txt
#act
CLEARCODELIST <$STR(S18)> ..\QuestDiary\卡号列表\10.txt
GAMEGOLD + 5
SENDMSG 5 提示：你成功充值了10个游戏币！当前的游戏币数量为:<$GAMEGOLD>
goto  @main
Break

#IF
CHECKCODELIST <$STR(s18)> ..\QuestDiary\卡号列表\50.txt
#act
CLEARCODELIST <$STR(S18)> ..\QuestDiary\卡号列表\50.txt
GAMEGOLD + 50
SENDMSG 5 提示：你成功充值了50个游戏币！当前的游戏币数量为:<$GAMEGOLD>
goto  @main
Break

#IF
CHECKCODELIST <$STR(s18)> ..\QuestDiary\卡号列表\100.txt
#act
CLEARCODELIST <$STR(S18)> ..\QuestDiary\卡号列表\100.txt
GAMEGOLD + 100
SENDMSG 5 提示：你成功充值了100个游戏币！当前的游戏币数量为:<$GAMEGOLD>
goto  @main
Break

#ELSEACT
goto  @main
messagebox 对不起，序列号错误，超过多次错误的将在后台记录您的IP!\