.rem tele-world用(BM)
.setsys sysdir: a:\ logdir: a:\ tmpdir: a:\ listdir: a:\
.rem baud 1200
.dial 03-3393-3747
.dlst vxy ""
.chk 20 "ＩＤを入力してください : "
.put "guest\n"				.rem put "TEWxxxxx\n"
.chk 20 "パスワードを入力してください :"
.rem put "xxxx\n"
.chk 60 "選択してください :"
.put "A\n"
.chr 600 "選択してください :" "-NUM-"
.rem innext 180
.put "e\n"

.chk 600 "NO CARRIER\n:"
.dlend
.rem disc


.rem 清ねっと用(mmm)
.rem baud 1200

.pot 1
.dial 40-1071
.dlst kyo ""
.chk 20 "ID :"
.put "guest\n"			.rem put "kiy00282\n"
.chk 20 "Password :"
.rem put "XXXX\n"
.mailr
.put "talk\n"
.chk 20 TALK)
.put "N\n"
.nr 600 "\nTALK)" "-- Room" /l
.put "Q\n"
.chk 20 "\nMAIN>>"
.put "readnews -n\n"
.chr 600 "\nMAIN>>" Subject
.put "N -n\n"
.chr 600 "\nMAIN>>" Note
.put "log\n"
.chk 600 "\nMAIN>>"

.put "off\n"

.chk 600 "NO CARRIER\n:"
.dlend
.disc
.eof