;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@Mir3GuideBook]
{
#ACT
  Mov     A7  ""
  FormatStr "FLD_CHARACTER='%s'" %USERNAME
  ReadValueSql  "TBL_INTEGRAL"  %A9  "FLD_CHARACTER,FLD_INTEGRAL" [@Mir3GuideBook_Int]

[@Mir3GuideBook_Int()]
#ACT
   Mov    D2      %ARG(2)
  FormatStr "FLD_CHARACTER='%s'" %USERNAME
  ReadValueSql  "TBL_CHARACTER"  %A9  "FLD_CHARACTER,FLD_PKPOINT" [@Mir3GuideBook_PK]

[@Mir3GuideBook_PK()]
#IF
   Checkfame               ;This puts the qty of fame points into P9
#ACT
   Mov    D8      %P9
   Mov    D3      %ARG(2)
#SAY
{FCOLOR/10}============[ Sting 3G - 3.55 ]========={FCOLOR/12}\\
{FCOLOR/1}<$USERNAME>'s{FCOLOR/12} Information : \
Integral_:__{FCOLOR/1}<$OUTPUT(D2)>{FCOLOR/12} \
Fame Points_:__{FCOLOR/1}<$OUTPUT(D8)>{FCOLOR/12}\  ;This SHOULD show you P9!!
Popularity_:__{FCOLOR/1}<$HLPOPULARITY>{FCOLOR/12}\
Reincarnation level_:__{FCOLOR/1}<$HLREINCARNATION>{FCOLOR/12}\
IP Address_:__{FCOLOR/1}<$HLUSERIP>{FCOLOR/12}\
PK Points_:__{FCOLOR/1}<$OUTPUT(D3)>{FCOLOR/12}\\
{FCOLOR/10}============[ Sting 3G - 3.55 ]========={FCOLOR/12}\\
<[ Dead? ]/@DeadRevive>\
<[ Kill Pets ]/@KillsPets>\

#IF
CheckLevel 50
CheckJob   Taoist
#SAY
<[ TaoGriffon ]/@TaoGriffon>\

#IF
Checklevel 60
CheckJob   Taoist
#SAY
<[ TaoProtector ]/@TaoProtector>\

#IF
Checklevel 70
CheckJob   Taoist
#SAY
<[ DevineTaoist ]/@DevineTaoist>\


#IF
Check  [400]  1
#SAY
\
<[ Allow Level Up Shout ]/@ShowLevelUpOn>\
#ELSESAY
\
<[ Hide Level Up Shout ]/@ShowLevelUpOff>\

#IF
Check  [402]  1
#SAY
<[ Allow Death Shout ]/@ShowDeathOn>\
#ELSESAY
<[ Hide Death Shout ]/@ShowDeathOff> - Costs 50 Million!\

#IF
Check  [401]  1
#SAY
<[ Allow Log in Shout ]/@ShowLogOn>\\
#ELSESAY
<[ Hide Log in Shout ]/@ShowLogOff> - Costs 50 Million!\\

#IF
ISADMIN
#SAY
< [ Admin Menu ]/@CALLAdminMenu>\\

#IF
#SAY
<[ Exit ]/@exit>\\
{FCOLOR/10}============[ Sting 3G - 3.55 ]========={FCOLOR/12}\\


[@DeadRevive]
#CALL [HLSCRIPT\CALLDieScript.txt] @CALLDieScriptExec


[@KillsPets]
#IF
#ACT
KillSlave
Close
Break

[@TaoGriffon]
#ACT
Set  [105]  0
Set  [106]  1
Goto @Mir3GuideBook

[@TaoProtector]
#ACT
Set  [105]  1
Set  [106]  0
Goto @Mir3GuideBook

[@DevineTaoist]
#ACT
Set  [105]  1
Set  [106]  1
Goto @Mir3GuideBook



[@ShowLevelUpOn]
#IF
#ACT
Set  [400] 0
goto @Mir3GuideBook

[@ShowLevelUpOff]
#IF
#ACT
Set  [400] 1
goto @Mir3GuideBook

[@ShowDeathOn]
#IF
#ACT
Set  [402] 0
goto @Mir3GuideBook

[@ShowDeathOff]
#IF
CheckGold 50000000
#ACT
Take Gold 50000000
Set  [402] 1
goto @Mir3GuideBook

[@ShowLogOn]
#IF
#ACT
Set  [401] 0
goto @Mir3GuideBook

[@ShowLogOff]
#IF
CheckGold 50000000
#ACT
Take Gold 50000000
Set  [401] 1
goto @Mir3GuideBook


[@MGBNPCFinder]
;#CALL [System\NPCFinder.txt] @NPCFinder

[@CALLAdminMenu]
#CALL [System\AdminScript.txt] @AdminAdminScript


}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;