+30
[@main]
,ʲôΪЧͣҪʦĻʱҡ\
<˽ʦϵͳ֪ʶ/@ask>\
<Ҫʦ/@needteacher>\
<ȡʦ/@cancel>\
<ʦͽϵ/@left>\
<ȡѫ/@get>\
<ѫ/@s_repair>\
<ѯ/@check>\
<뿪/@exit>

[@ask]
27µҿ԰28ϵΪʦ\
ͽܵȼߺʦõӦֵ\
ֵͿһЩȽˡ\
ͽ35Զҵʦעû\
ҵ߻ûʦͽϵǲ\
ͽܵġ˫һʱܰʦ\
<뿪/@exit>

[@needteacher]
<$username>ҪʦĻҪݵʦ\
ġʦѡ\
Է֡\
<ʦ/@inputname>\
<뿪/@exit>

[@inputname]
#if
checkex level > 27
#say
Ѿ˰ʦļ,\
#act
return
#if
hasmaster
#say
Ѿ˰ʦļ,\
Ѱݹʦ!\
#elseact
inputtext ʦ: 16 @postrequest
close
[@postrequest]
#if
humonline $inputtext
#say
ѷ,ĵȴ!\\
#act
showpage $inputtext @checkandrequest1 $username
#elsesay
<$inputtext>ߣ޷İʦ\\
<ر/@exit>
[@error]
ʧܣԭ\
<$_param0>\\\
<ر/@exit>

[@checkandrequest1]
#act
movr requeststudent $_param0
delay 0 @checkandrequest
close

[@checkandrequest]
#if
hasmaster
#act
showpage $requeststudent @error "Էûгʦʦ"
close
#if
checkex level < 28
#act
showpage $requeststudent @error "Էȼʦ"
close
#if
cantakestudent
#elseact
showpage $requeststudent @error "ԷѾͽˣʦ"
close
#end 

#say
<$requeststudent>Ϊʦȷϣ\\
</@acceptrequest&$requeststudent>\
<ܾ/@refuserequest&$requeststudent>\
[@acceptrequest]
#if
addstudent $_param0
#act
showpage $_param0 @requestaccepted $username
#say
<$_param0>ʦɹ\\\
<ر/@exit>
#elseact
showpage $_param0 @error "ʦʧܣ"
#elsesay
<$_param0>ʦʧܣ\\\
<ر/@exit>
[@refuserequest]
#act
showpage $_param0 @error "Էܾ"
#say
Ѿܾ<$_param0>İʦ!\\\
<ر/@exit>
[@requestaccepted]
#say
<$_param0>Ѿİʦ\\\
<ر/@exit> 



[@left]
ͽʦҪң\
ʦͽҪʮҡ\
ǷҪʦͽϵ\
<ǵ/@leftteacher>\
</@main>

[@leftteacher]
<Ҫʦ/@leftmaster>\
<Ҫͽ/@delstudent>\
<뿪/@exit>

[@leftmaster]
#if
checkex gold < 50000
#say
ϵǮ,Ҳܰ!\
#act
return
#if
hasmaster
#act
leaveteacher 
takegold 50000
#say
ʦͽϵɹ!\
#elsesay
ûʦͽϵ\\
<ر/@exit>

[@delstudent]
#if
checkex gold < 100000
#say
ϵǮ,Ҳܰ!\
#elseact
inputtext ͽܵ: 16 @studentname
close

[@studentname]
#if
deletestudent $inputtext
#act
takegold 100000
#say
ʦͽϵɹ!\
#elsesay
ʦͽϵʧ!\\
<ر/@exit>

[@get]
븶ȡѫ£\
ԽõѫµĻԽ\\
<10/@nomedal1>\
<20/@nomedal2>\
<30/@nomedal3>\
<40/@nomedal4>\
<50/@nomedal5>\
</@main>

[@nomedal1]
#if
checkex credit > 9
#act
takecredit 10
goto @givenomedal1
#elsesay
ûҲƭѫ.߿\
</@main>

[@givenomedal1]
#switch
random 2 5
#case:2
give ѫ12 1
#say
ѫ12!\
</@main>
#case:3
give ѫ13 1
#say
ѫ13!\
</@main>
#case:4
give ѫ14 1
#say
ѫ14!\
</@main>
#case:5
give ѫ15 1
#say
ѫ15!\
</@main
#default
give ѫ11 1
#say
ѫ11!\
</@main>
#end

[@nomedal2]
#if
checkex credit > 19
#act
takecredit 20
goto @givenomedal2
#elsesay
ûҲƭѫ.߿\
</@main>

[@givenomedal2]
#switch
random 2 5
#case:2
give ѫ22 1
#say
ѫ22!\
</@main>
#case:3
give ѫ23 1
#say
ѫ23!\
</@main>
#case:4
give ѫ24 1
#say
ѫ24!\
</@main>
#case:5
give ѫ25 1
#say
ѫ25!\
</@main
#default
give ѫ21 1
#say
ѫ21!\
</@main>
#end

[@nomedal3]
#if
checkex credit > 29
#act
takecredit 30
goto @givenomedal3
#elsesay
ûҲƭѫ.߿\
</@main>

[@givenomedal3]
#switch
random 2 5
#case:2
give ѫ32 1
#say
ѫ32!\
</@main>
#case:3
give ѫ33 1
#say
ѫ33!\
</@main>
#case:4
give ѫ34 1
#say
ѫ34!\
</@main>
#case:5
give ѫ35 1
#say
ѫ35!\
</@main
#default
give ѫ31 1
#say
ѫ31!\
</@main>
#end

[@nomedal4]
#if
checkex credit > 39
#act
takecredit 40
goto @givenomedal4
#elsesay
ûҲƭѫ.߿\
</@main>

[@givenomedal4]
#switch
random 2 5
#case:2
give ѫ42 1
#say
ѫ42!\
</@main>
#case:3
give ѫ43 1
#say
ѫ43!\
</@main>
#case:4
give ѫ44 1
#say
ѫ44!\
</@main>
#case:5
give ѫ45 1
#say
ѫ45!\
</@main
#default
give ѫ41 1
#say
ѫ41!\
</@main>
#end

[@nomedal5]
#if
checkex credit > 49
#act
takecredit 50
goto @givenomedal5
#elsesay
ûҲƭѫ.߿\
</@main>

[@givenomedal5]
#switch
random 2 5
#case:2
give ѫ52 1
#say
ѫ52!\
</@main>
#case:3
give ѫ53 1
#say
ѫ53!\
</@main>
#case:4
give ѫ54 1
#say
ѫ54!\
</@main>
#case:5
give ѫ55 1
#say
ѫ55!\
</@main
#default
give ѫ51 1
#say
ѫ51!\
</@main>
#end

[@s_repair]
Ҫѫ\\
< /@main>

[@~s_repair]
ѫѾˣ\\
< /@main> 

[@check]
Ŀǰ<$credit>㡣\\
<뿪/@exit>
