µ½½Òùø¨yo‰ï‚¢z
*ƒ^[ƒ“ ‘S –¡•û:
If ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[™‹“ß] Then
Incr ƒgƒ‰ƒ“ƒUƒ€Ý’è[™‹“ß] -1
If ƒgƒ‰ƒ“ƒUƒ€Ý’è[™‹“ß] <= 0 Then
‘æ‚S¢‘ãƒKƒ“ƒ_ƒ€_ƒgƒ‰ƒ“ƒUƒ€I—¹ˆ— ™‹“ß
Unset ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[™‹“ß]
Unset ƒgƒ‰ƒ“ƒUƒ€Ý’è[™‹“ß]
EndIf
EndIf
If ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[ƒƒbƒNƒIƒ“] Then
Incr ƒgƒ‰ƒ“ƒUƒ€Ý’è[ƒƒbƒNƒIƒ“] -1
If ƒgƒ‰ƒ“ƒUƒ€Ý’è[ƒƒbƒNƒIƒ“] <= 0 Then
‘æ‚S¢‘ãƒKƒ“ƒ_ƒ€_ƒgƒ‰ƒ“ƒUƒ€I—¹ˆ— ƒƒbƒNƒIƒ“
Unset ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[ƒƒbƒNƒIƒ“]
Unset ƒgƒ‰ƒ“ƒUƒ€Ý’è[ƒƒbƒNƒIƒ“]
EndIf
EndIf
If ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[ƒAƒŒƒ‹ƒ„] Then
Incr ƒgƒ‰ƒ“ƒUƒ€Ý’è[ƒAƒŒƒ‹ƒ„] -1
If ƒgƒ‰ƒ“ƒUƒ€Ý’è[ƒAƒŒƒ‹ƒ„] <= 0 Then
#ƒnƒŒƒ‹ƒ„‚ªæ‚Á‚Ä‚¢‚éꇂà‘z’è
‘æ‚S¢‘ãƒKƒ“ƒ_ƒ€_ƒgƒ‰ƒ“ƒUƒ€I—¹ˆ— Pilot(ƒAƒŠƒIƒXƒKƒ“ƒ_ƒ€(‚l‚r))
Unset ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[ƒAƒŒƒ‹ƒ„]
Unset ƒgƒ‰ƒ“ƒUƒ€Ý’è[ƒAƒŒƒ‹ƒ„]
EndIf
EndIf
If ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[ƒeƒBƒGƒŠƒA] Then
Incr ƒgƒ‰ƒ“ƒUƒ€Ý’è[ƒeƒBƒGƒŠƒA] -1
If ƒgƒ‰ƒ“ƒUƒ€Ý’è[ƒeƒBƒGƒŠƒA] <= 0 Then
‘æ‚S¢‘ãƒKƒ“ƒ_ƒ€_ƒgƒ‰ƒ“ƒUƒ€I—¹ˆ— ƒeƒBƒGƒŠƒA
Unset ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[ƒeƒBƒGƒŠƒA]
Unset ƒgƒ‰ƒ“ƒUƒ€Ý’è[ƒeƒBƒGƒŠƒA]
EndIf
EndIf
Exit
Žg—pŒã ™‹“ß ƒgƒ‰ƒ“ƒUƒ€ƒVƒXƒeƒ€:
If Unit(™‹“ß) = ƒ_ƒuƒ‹ƒI[ƒKƒ“ƒ_ƒ€ Then
Transform ƒ_ƒuƒ‹ƒI[ƒKƒ“ƒ_ƒ€(ƒgƒ‰ƒ“ƒUƒ€)
Else
Transform ƒ_ƒuƒ‹ƒI[ƒ‰ƒCƒU[(ƒgƒ‰ƒ“ƒUƒ€)
Set ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[™‹“ß]
Set ƒgƒ‰ƒ“ƒUƒ€Ý’è[™‹“ß] 3
EndIf
Exit
Žg—pŒã ™‹“ß ‚f‚mƒ‰ƒCƒU[ƒ\[ƒh:
‘æ‚S¢‘ãƒKƒ“ƒ_ƒ€_ƒgƒ‰ƒ“ƒUƒ€I—¹ˆ— ™‹“ß
If ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[™‹“ß] Then
UnSet ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[™‹“ß]
Unset ƒgƒ‰ƒ“ƒUƒ€Ý’è[™‹“ß]
EndIf
Exit
Žg—pŒã ™‹“ß ‚f‚mƒ‰ƒCƒU[ƒ\[ƒh(Á–Õ):
SetStatus ™‹“ß ƒgƒ‰ƒ“ƒUƒ€ƒVƒXƒeƒ€[“U’† 3
If ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[™‹“ß] Then
UnSet ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[™‹“ß]
Unset ƒgƒ‰ƒ“ƒUƒ€Ý’è[™‹“ß]
EndIf
Exit
Žg—pŒã ƒƒbƒNƒIƒ“ ƒgƒ‰ƒ“ƒUƒ€ƒVƒXƒeƒ€:
Transform ƒPƒ‹ƒfƒBƒ€ƒKƒ“ƒ_ƒ€(ƒgƒ‰ƒ“ƒUƒ€)
Set ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[ƒƒbƒNƒIƒ“]
Set ƒgƒ‰ƒ“ƒUƒ€Ý’è[ƒƒbƒNƒIƒ“] 3
Exit
Žg—pŒã Pilot(ƒAƒŠƒIƒXƒKƒ“ƒ_ƒ€(‚l‚r)) ƒgƒ‰ƒ“ƒUƒ€ƒVƒXƒeƒ€:
Transform ƒAƒŠƒIƒXƒKƒ“ƒ_ƒ€(ƒgƒ‰ƒ“ƒUƒ€)
Set ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[ƒAƒŒƒ‹ƒ„]
Set ƒgƒ‰ƒ“ƒUƒ€Ý’è[ƒAƒŒƒ‹ƒ„] 3
Exit
Žg—pŒã ƒeƒBƒGƒŠƒA ƒgƒ‰ƒ“ƒUƒ€ƒVƒXƒeƒ€:
If Unit(ƒeƒBƒGƒŠƒA) = ƒZƒ‰ƒ”ƒB[ƒKƒ“ƒ_ƒ€ Then
Transform ƒZƒ‰ƒ”ƒB[ƒKƒ“ƒ_ƒ€(ƒgƒ‰ƒ“ƒUƒ€)
Else
Transform ƒZƒ‰ƒtƒBƒ€ƒKƒ“ƒ_ƒ€(ƒgƒ‰ƒ“ƒUƒ€)
EndIf
Set ‚Æ‚ç‚ñ‚´‚Þ‚Á‚½[ƒeƒBƒGƒŠƒA]
Set ƒgƒ‰ƒ“ƒUƒ€Ý’è[ƒeƒBƒGƒŠƒA] 3
Exit
‘æ‚S¢‘ãƒKƒ“ƒ_ƒ€_ƒgƒ‰ƒ“ƒUƒ€I—¹ˆ—:
#ˆÚ“®•s”\‚܂ő«‚µ‚½‚çAÁ–Õó‘Ô‚æ‚è‚Ђǂ¢ccH
SetStatus Args(1) UŒ‚•s”\ 1
SetStatus Args(1) ƒgƒ‰ƒ“ƒUƒ€ƒVƒXƒeƒ€[“U’† 3
#SetStatus Args(1) ˆÚ“®•s”\ 1
Return
µ½½Òùøyo‰ï‚¢z
‹à‘ò ƒfƒŠƒwƒ‹|ƒfƒŠƒwƒ‹