#org $start
checkflag 0x828
if b_false goto $noenter
message $pass
boxset 6
setflag 0x200
applymovement 0x02 $move1
applymovement 0x03 $move2
pausemove 0x0
release
end
#org $noenter
message $nopass
boxset 6
release
end
#org $move1
$move1 ; #binary 0x12 0x11 0x12 0x12 0x12 0x12 0x11 0x11 0x11 0x12 0x12 0x12 0x12 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0xFE
#org $move2
$move2 ; #binary 0x12 0x11 0x11 0x12 0x12 0x12 0x12 0x11 0x11 0x11 0x12 0x12 0x12 0x12 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0xFE
#org $pass
$pass 1 = \c\h01\h02Oh! You're a trainer.\p\c\h01\h05Prof. Basil\c\h01\h02, needs your help.\nHe says it's important.
#org $nopass
$nopass 1 = \c\h01\h02I'm sorry, unless you're a\ntrainer, I'm not allowed to\llet anyone pass.
#org $pass
$pass 1 = \c\h01\h02Oh! You're a trainer.\p\c\h01\h05Prof. Basil\c\h01\h02, needs your help.\nHe says it's important.