[@main]
#IF
CHECKLEVELEX > 0
#ACT
MOV P1 0
ReadRandomStr ..\QuestDiary\数据文件\永恒麻痹神佑.txt S1 0
GETVALIDSTR $STR(S1) | S1 P1
#SAY
<color=ORANGE 国王有令，将他珍藏已久的绝世宝贝“><color=green 永恒麻痹神佑><color=ORANGE ”拍卖>\
<color=ORANGE 给最强悍的勇士才能获得它。[><color=green 合区后系统自动收回重新拍卖><color=ORANGE ]>\
<color=ORANGE 永恒麻痹神佑属性：><@@!PIC2 10,1492><COLOR=red 属性绝对给力！>\
<COLOR=RED 攻:300-500 道:300-500 魔:300-500 魔防300-500 防御300-500>\
<COLOR=FF00FF 隐含属性为:超级麻痹属性，无视对手是否破麻痹，照样麻痹>\
<color=ORANGE 起始价格：[><color=green 100万元宝><color=ORANGE ]。每次加价:[><color=green 50万元宝><color=ORANGE ]>\
<color=ORANGE 当前持有人是:[><$STR(S1)><color=ORANGE ]成交价格是:[><$STR(p1)><color=ORANGE ]>\
<我现在就要拍下此宝贝/@拍下武器> <COLOR=FF00FF 拍成功后，原持有人的神佑收回。>

[@拍下武器]
#ACT
QUERYVAL 0 1 255 @武器 请输入你想成交这件宝贝的价格。[每次加价:500000万元宝]

[@武器]
#IF
CHECKLEVELEX > 0
#ACT
MOV P10 $STR(D0)
#IF
CHECKGAMEGOLD < $STR(D0)
#ACT
SENDMSG 5 对不起，你没有{<$STR(D0)>}个元宝。无法拍下绝世武器<永恒麻痹神佑>，请回吧。
break
#ELSEACT
#IF
SMALL D0 1000000
#ACT
SENDMSG 5 　<你输入的元宝价格不够物品的起始价，更别说想参加拍卖了。>
break
#ELSEACT
#IF
CHECKGAMEGOLD < 1000000
#ACT
SENDMSG 5 　<你的元宝都不够，你还在这里瞎输入干啥？请回吧。>
break
#ELSEACT
ReadRandomStr ..\QuestDiary\数据文件\永恒麻痹神佑.txt S1 0
#IF
EQUAL S1 无
#ACT
takew 永恒麻痹神佑
take 永恒麻痹神佑 60
MOV S8 $USERNAME
INC S8 |
INC S8 1000000
INSERTVARLIST 0 $STR(S8) .\QuestDiary\数据文件\永恒麻痹神佑.txt
GAMEGOLD - 1000000
GIVE 永恒麻痹神佑 1
GMEXECUTE 在线提问 @收取永恒麻痹神佑
GOTO @MAIN
SENDMSG 10 恭喜<$USERNAME>在死水花费了1000000拍卖获得绝世宝贝<永恒麻痹神佑>。我们一起祝贺他。<永恒麻痹神佑>拥有超强属性，请到死水拍卖会查看。
SENDMSG 15 恭喜<$USERNAME>在死水花费了1000000拍卖获得绝世宝贝<永恒麻痹神佑>。我们一起祝贺他。<永恒麻痹神佑>拥有超强属性，请到死水拍卖会查看。
SENDMSG 21 恭喜<$USERNAME>在死水花费了1000000拍卖获得绝世宝贝<永恒麻痹神佑>。我们一起祝贺他。<永恒麻痹神佑>拥有超强属性，请到死水拍卖会查看。 251 221
SENDMSG 21 恭喜<$USERNAME>在死水花费了1000000拍卖获得绝世宝贝<永恒麻痹神佑>。我们一起祝贺他。<永恒麻痹神佑>拥有超强属性，请到死水拍卖会查看。 251 221
SENDMSG 23 恭喜<$USERNAME>在死水花费了1000000拍卖获得绝世宝贝<永恒麻痹神佑>。我们一起祝贺他。<永恒麻痹神佑>拥有超强属性，请到死水拍卖会查看。 251 0
break
#ELSEACT
GETVALIDSTR $STR(S1) | S3 P2
#IF
SMALL D0 $STR(P2)
#ACT
SENDMSG 5 　<你的元宝都不够成交价格，请回吧。>
break
#ELSEACT
#IF
CHECKLEVELEX > 0
#ACT
DEC D0 $STR(P2)
#IF
SMALL D0 500000
#ACT
SENDMSG 5 　<你的元宝都不够,每次成交加价为：500000元宝，请回吧。>
break
#ELSEACT
takew 永恒麻痹神佑
take 永恒麻痹神佑 60
MOV S8 $USERNAME
INC S8 |
INC S8 $STR(P10)
INSERTVARLIST 0 $STR(S8) .\QuestDiary\数据文件\永恒麻痹神佑.txt
GAMEGOLD - $STR(P10)
GIVE 永恒麻痹神佑
GMEXECUTE 在线提问 @收取永恒麻痹神佑
GOTO @MAIN
SENDMSG 10 恭喜<$USERNAME>在死水花费了<$STR(p1)>拍卖获得绝世宝贝<永恒麻痹神佑>。我们一起祝贺他。<永恒麻痹神佑>拥有超强属性，请到死水拍卖会查看。
SENDMSG 15 恭喜<$USERNAME>在死水花费了<$STR(p1)>拍卖获得绝世宝贝<永恒麻痹神佑>。我们一起祝贺他。<永恒麻痹神佑>拥有超强属性，请到死水拍卖会查看。
SENDMSG 21 恭喜<$USERNAME>在死水花费了<$STR(p1)>拍卖获得绝世宝贝<永恒麻痹神佑>。我们一起祝贺他。<永恒麻痹神佑>拥有超强属性，请到死水拍卖会查看。 251 221
SENDMSG 21 恭喜<$USERNAME>在死水花费了<$STR(p1)>拍卖获得绝世宝贝<永恒麻痹神佑>。我们一起祝贺他。<永恒麻痹神佑>拥有超强属性，请到死水拍卖会查看。 251 221
SENDMSG 23 恭喜<$USERNAME>在死水花费了<$STR(p1)>拍卖获得绝世宝贝<永恒麻痹神佑>。我们一起祝贺他。<永恒麻痹神佑>拥有超强属性，请到死水拍卖会查看。 251 0
break