[@þ]
{
#ACT
  MOV N2 0
  MOV N3 0
  MOV N4 0
#SAY
Ϊ֪Ļþڱˣ\
ԽԽ֪ܣҲңǺǡ\
ھͿȥþڵĹ˫˫ʵģ\
ǻþշǰʱƷѵģÿСʱ֧<$STR(G82)>ҡ\
Թʱ䡣<ʱ/@GOUMAISJ>\
<˵ʱ䰴ӿۣʣʱ´λԼʹá>\ \

<þ/@h2>    þʱ仹У<$HUMAN(ʱ)> \


[@GOUMAISJ]
#SAY
Ҫʱ䣬ÿСʱΪ<$STR(G82)>ң\ \

<ҹþʱ䣺/@@InPutInteger2_ʱ> <$STR(N2)> Сʱ\ \

ιʱã <$STR(N3)> \ \

</@QUEDINGGM>     </@Main>

[@InPutInteger2_ʱ]
#IF
  large N2 0
  small N2 24
#ACT
  MOV N2 N2
  MUL N4 N2 60
  MUL N3 N2 G82
  GOTO @GOUMAISJ
  break
#ELSEACT
  MESSAGEBOX ȷķΧ1-24֮䣡\ 
  break

[@QUEDINGGM]
#IF
  equal G82 0
#ACT
  MESSAGEBOX ܻδţ
  break
#IF
  small N2 1
#ACT
  MESSAGEBOX û빺ʱ䣡
  break
#IF
  checkgold N3
#ACT
  TAKE  N3
  CALCVAR HUMAN ʱ + <$STR(N4)>
  SAVEVAR HUMAN ʱ ..\QuestDiary\ļ\þʱ.txt
  GOTO @þ
  BREAK
#ELSEACT
  MESSAGEBOX ûôң\ 
  break

[@h2]
#IF
  CHECKVAR HUMAN ʱ > 0
#ACT
  ;give سǾ 1
  mapmove H001 73 67
  break
#ELSESAY
û㹻ʱþͼ\
Ŭ׬ǮŶ:)\ \

< /@Main>
}