# $File: //depot/OurNet-BBSAgent/BBSAgent/firebird2/base.inc $ $Author: autrijus $
# $Revision: #3 $ $Change: 2217 $ $DateTime: 2001/10/27 06:03:10 $
# Contributed by Smartboy <kcwu@ck.tp.edu.tw>
Firebird2 Base
setv statustail °±¯d[
setv afterlogin qqqqqq
=login
wait µù¥U½Ð¿é¤J
send $[username]\n$[password]\n\n\n
send $[afterlogin]
goto main
=main
send \e[D\e[D\e[D\e[D\e[D\e[D
wait ¥D¿ï³æ
till $[statustail]