[@ղؼ]
{
#IF
  equal A23 
#ACT
  MOV S5 [<ղؼ/FCOLOR=58>]<ţħıȽ϶࣬ȥҸ/FCOLOR=250>
  DELAYGOTO 100 @ʾ
  break
#IF
  equal A23 ָ
#ACT
  MOV S5 [<ղؼ/FCOLOR=58>]<ָ³ıȽ϶࣬ȥҸ/FCOLOR=250>
  DELAYGOTO 100 @ʾ
  break
#IF
  equal A23 ն
#ACT
  MOV S5 [<ղؼ/FCOLOR=58>]<ն7ıȽ϶࣬ȥҸ/FCOLOR=250>
  DELAYGOTO 100 @ʾ
  break
#IF
  equal A23 а
#ACT
  MOV S5 [<ղؼ/FCOLOR=58>]<а³ıȽ϶࣬ȥҸ/FCOLOR=250>
  DELAYGOTO 100 @ʾ
  break
#IF
  equal A23 
#ACT
  MOV S5 [<ղؼ/FCOLOR=58>]<³ıȽ϶࣬ȥҸ/FCOLOR=250>
  DELAYGOTO 100 @ʾ
  break
#ELSEACT
  DELAYGOTO 100 @ʾ
  break

[@ʾ]
#ACT
  CLEARDELAYGOTO
#SAY
귨½װƷ֮޷ҪղЩĶ\
ҲҪѲٵĹ򣬽ָƷҼƷ࣬\
ɫõĶȻ㲻ƵĻرҪһõĶͱ\
Ҫʲôˣ<30ϣһһΣ10-50ң>\ \

<ռװ/@ռװ><$STR(A22)>              ʣ<$STR(G70)>\ \
<$STR(S5)>

[@ռװ]
#IF
  CHECKLEVELEX < 30
#ACT
  MESSAGEBOX ȼ뵽30ſԲ롣
  break
#IF
  small G70 1
#ACT
  MESSAGEBOX ռѾ\ 
  break
#IF
  CHECKVAR HUMAN ղ < 1
#ACT
  MESSAGEBOX Ѿռˣ
  break
#IF
  checkitem <$STR(A23)> 1
#ACT
  take <$STR(A23)> 1
  DEC G70 1
  SET [420] 1
  CALCVAR HUMAN ղ - 1
  SAVEVAR HUMAN ղ ..\QuestDiary\ļ\ղش.txt
  GOTO @ʾ
  GOTO @
  break
#ELSESAY
  ûдҪĶɣ

[@]
#IF
  check [420] 0
#ACT
  AddTextList <$USERNAME> ..\QuestDiary\ļ\.txt
  AddTextList <$IPLOCAL> ..\QuestDiary\ļ\IP.txt
  kick
  SENDMSG 0 [ղؼ]%sʹױץIP⣡
  break
#IF
  check [420] 1
  random 20
#ACT
  SET [420] 0
  GIVE  500000
  SENDMSG 0 [ղؼ]ϲ<$USERNAME>ɽյղ50ң
  break
#IF
  check [420] 1
  random 15
#ACT
  SET [420] 0
  GIVE  400000
  SENDMSG 0 [ղؼ]ϲ<$USERNAME>ɽյղ40ң
  break
#IF
  check [420] 1
  random 10
#ACT
  SET [420] 0
  GIVE  300000
  SENDMSG 0 [ղؼ]ϲ<$USERNAME>ɽյղ30ң
  break
#IF
  check [420] 1
  random 5
#ACT
  SET [420] 0
  GIVE  200000
  SENDMSG 0 [ղؼ]ϲ<$USERNAME>ɽյղ20ң
  break
#IF
  check [420] 1
  random 2
#ACT
  SET [420] 0
  GIVE  100000
  SENDMSG 0 [ղؼ]ϲ<$USERNAME>ɽյղ10ң
  break
#IF
#ACT
  SET [420] 0
  GIVE  100000
  SENDMSG 0 [ղؼ]ϲ<$USERNAME>ɽյղ10ң
  break
}