# $File: //depot/OurNet-BBSAgent/BBSAgent/ofo.bbs $ $Author: autrijus $
# $Revision: #6 $ $Change: 2829 $ $DateTime: 2002/01/10 14:54:36 $
# Contributed by Vgod <vgod@kimo.com.tw>
# zh_TW.Big5: ¥¼¨Ó³Ì¤p´Ì
Oldest Future Object
ofo.twbbs.org
setv headansi 1;43;33m
setv headansiend 46;37m
load maple2.board
setv cursor ¡¹
setv morehead m/\e\[([\d;]+)m\x20\x20ÂsÄý\x20P./
setv moretail \e[30mµ²§ô\x20\x20\e[0m
setv pager ³q°T¾¹
=login
wait ¦WºÙ
send \n$[username]\n$[password]\nn\n\n\nqq\nqqq
goto main
# ª`·N: ofo ¦³®É post ¨ì¤@¥b·|¶] message box ¥X¨Ó!
=article_edit_author
send \x24E\x19\x19\x19\x19
# 1 empty 2-4 from,origin 5 --
send \x14\x19\x19\x19\x19\x19
send \x18s\n\x20
wait ¤å³¹¿ïŪ
exit
=message
wait \e[1;37;46m\x20
till \x20\e[4;33;40m\x20
till \x20\e[0m
exit
=talk
call main
send t\n
wait ¬P¥ú©@°Ø
till ³q°T¾¹
=talk_users
call talk
send u\n
wait ¥ð¶¢²á¤Ñ
or ¦n¤Í¦Cªí
till (TAB/f)
=query_user
call talk_users
send /
wait ©m¦W¡G
send $[id]\n
send q
wait ¬PÄ¥ÃѧOID¡n
till Ä~Äò
send \x20
exit
=main
send \e[D\e[D\e[D\e[D\e[D\e[D
wait ¥D¥\¯àªí
till ³q°T¾¹
=talk_users_refresh
send \x15
wait ¥ð¶¢²á¤Ñ
or ¦n¤Í¦Cªí
till (TAB/f)
exit
=message_send
call talk_users
send /
wait ©m¦W¡G
send $[receiver]\n
wait $[receiver]
send w
wait Call-In¡G
send $[message]\n
wait [Y]
send \n
exit