;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@MIR3G_1]
{
#if

#say
{FCOLOR/14}<$USERNAME>{FCOLOR/12}\
I am the KnowItall Shop, All Requests must pass through me.\\
<Use Service/@takewst>\\
<Exit/@exit>


[@takewst]
#say
{FCOLOR/10}<$USERNAME>{FCOLOR/12}\
I provide many a Serice, how can I help you?\\
<[TownTeleport  600 Gold]/@buything(TownTeleport,600)>\
<[RandomTeleport    120 Gold]/@buything(RandomTeleport,120)>\
<[Talisman(M) 3500 Gold]/@buything(Talisman(M),3500)>\
<[HPPotion(L)  600 Gold]/@buything(HPPotion(L),600)>\
<[MPPotion(L)  600 Gold]/@buything(MPPotion(L),600)>\
<[HPPotion(XL) 1400 Gold]/@buything(HPPotion(XL),1400)>\
<[MPPotion(XL) 1400 Gold]/@buything(MPPotion(XL),1400)>\
<[Ginseng     2500 Gold]/@buything(Ginseng,2500)>\
<[SunPotion(M)     1200 Gold]/@buything(SunPotion(M),1200)>\
<[GreyPoison(L)  3500 Gold]/@buything(GreyPoison(L),3500)>\
<[RedPoison(L)  3500 Gold]/@buything(RedPoison(L),3500)>\
<[DarkTalisman(M) 700 Gold]/@buything(DarkTalisman(M),700)>\
<[Talisman(GE-S) 700 Gold]/@buything(Talisman(GE-S),700)>\
<[Talisman(IG-S) 700 Gold]/@buything(Talisman(IG-S),700)>\
<[Talisman(FU-S) 700 Gold]/@buything(Talisman(FU-S),700)>\
<[Talisman(VE-S) 700 Gold]/@buything(Talisman(VE-S),700)>\
<[HolyTalisman(M) 1000 Gold]/@buything(HolyTalisman(M),1000)>\
<[SoulTalisman(M) 1100 Gold]/@buything(SoulTalisman(M),1100)>\\
<[Gate of the space and time]/@skzm>\
<[Passes through the space and time]/@skzm1>\
<[Returns to the home page]/@TAKEWST>\
<[Exit]/@exit>\

[@buything()]
#IF
checkbaggage
#ACT
Mov     A3   %ARG(1)       ;;Ʒ
Mov     D3   %ARG(2)       ;;Ǯ
#SAY
{FCOLOR/10}<$USERNAME>{FCOLOR/12}\
How Many Do you Need{FCOLOR/10} <$OUTPUT(A3)> {FCOLOR/12} is required:\\
<Input purchase quantity/@@> (Max Quantiy 500)\\
<[Return]/@TAKEWST>\
<[Exit]/@exit>\
#ELSESAY
Before you can Use, check your Bag othwise it will drop to floor.\\
<[Return]/@TAKEWST>\
<[Exit]/@exit>\ 

[@@] 
#IF
#ACT
mov D4 %INPUTSTR
Mov S1 3
#IF 
Small D4 1 
#SAY
{FCOLOR/10}<$USERNAME>{FCOLOR/12}\
How many do you need {FCOLOR/10} <$OUTPUT(A3)> {FCOLOR/12}?\\ 
Quantity {FCOLOR/10}1 to 500{FCOLOR/1}\
<[Return]/@TAKEWST>\
<[Exit]/@exit>\
#ACT 
break 

#IF 
Large D4 500 
#SAY 
{FCOLOR/10}<$USERNAME>{FCOLOR/12}\
Quantity {FCOLOR/10} 500 {FCOLOR/12} Max!\\ 
<[Return]/@TAKEWST>\
<[Exit]/@exit>\
#ACT 
break 

#IF
#ACT
MOV P1 %D3
MOV P2 %D4
MUL P1 P2
MOV D2 %P9

#IF 
#SAY
{FCOLOR/10}<$USERNAME>{FCOLOR/12}\
{FCOLOR/10}<$OUTPUT(D4)> {FCOLOR/12}-{FCOLOR/10} <$OUTPUT(A3)> {FCOLOR/12}Price is{FCOLOR/10} <$OUTPUT(D2)> {FCOLOR/12}Gold.\
Before you Use, make sure your Bag is not full or items will fall to ground.\\
<[Buy]/@й>\
<[Return]/@TAKEWST>\
<[Exit]/@exit>\
#ACT 
break

[@й]
#IF
equal   S1 3
checkgold   %D2
#ACT
give   %A3 %D4
take Gold %D2
Mov   S1 0
#SAY
{FCOLOR/10}<$USERNAME>{FCOLOR/12}\
You spent{FCOLOR/1} <$OUTPUT(D2)> {FCOLOR12}Gold and bought{FCOLOR/10} <$OUTPUT(D4)> {FCOLOR/12}-{FCOLOR/10} <$OUTPUT(A3)> {FCOLOR/12}.\\
<[Return]/@TAKEWST>\
<[Exit]/@exit>\
#ELSESAY
{FCOLOR/10}<$USERNAME>{FCOLOR/12}\
You have {FCOLOR/10}<$OUTPUT(D2)>{FCOLOR/12} Gold, Unable to buy{FCOLOR/10} <$OUTPUT(D4)> {FCOLOR/12}-{FCOLOR/10} <$OUTPUT(A3)> {FCOLOR/12}.\\
<[Return]/@TAKEWST>\
<[Exit]/@exit>\

[@skzm]
#if
#say
{FCOLOR/14}<$USERNAME>{FCOLOR/12}\
Do you want to Teleport to Space & Time?\\
<Teleport/@takewskm>\\
<Exit/@exit>\

[@takewskm]
#if
#act
HLSCRIPTCMD MAPSAVE
SysMsg "Telported to Space & Time"
#say
{FCOLOR/14}<$USERNAME>{FCOLOR/12}\
Telported to Space & Time\\
<Exit/@exit>\
[@skzm1]
#if
#act
HLSCRIPTCMD MAPMOVE
SysMsg "You have been Teleported to this Magical Place."
#say
{FCOLOR/14}<$USERNAME>{FCOLOR/12}\
You have been Teleported to this Magical Place.\\
<Exit/@exit>\


}
[@MIR3G_2]
{
#if
#act
hlscriptcmd mapsave
#say
Gate of the space and time already opened!\\
<Exit/@exit>\
}


[@MIR3G_3]
{
#if
#act
hlscriptcmd mapmove
#say
You already shuttled back and forth the space and time, returns to place which you was familiar with!\\
<Exit/@exit>\
}



[@MIR3G_4]
{
#IF
#ACT
#SAY
Please input your solution to lock the password, carries on character's solution lock\
Under the fixed condition, how won't you be able to do operate\
1.Walks\
2.Moves\
3.Attack\
4.Throws\
5.Black magic\
6.Chats\
7.Use goods\
8.Throws the goods\
9.Transaction\
<Input password/@@*11_Input_PassWord>\


[@@*11_Input_PassWord]
#IF
#ACT
mov  A0  %PASSWD(9)
mov  A1  %INPUTSTR

#IF
equal A0 %A1
#ACT
HLSCRIPTCMD UNLOCKUSER
#SAY
{FCOLOR/10}The password is correct, your character already solved the lock.{FCOLOR/12}\\
<Exit/@exit>\\

#ELSESAY
{FCOLOR/1}Password mistake.{FCOLOR/12}\ \
<Exit/@exit>

}





}



[@MIR3G_5]
{
#IF
checkmonrecall
#ACT
monrecall Witch 7 3

#ELSESAY
You already have a Pet out..\\
<Exit/@exit>\
}




[@MIR3G_6]
{
#if
#say
Uses @NewOrder3 Command\
<Exit/@exit>\
}

[@MIR3G_7]
{
#if

#say
The use goods spring dialog box\
<Exit/@exit>\
}


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;