※ [本文转录自 SYSOP 看板]
作者: chungkai (苦闷的灵魂) 看板: SYSOP
标题: [问题] 请教melix的问题？
时间: Thu Jun 8 01:44:47 2006
※ [本文转录自 PttCurrent 看板]
作者: chungkai (苦闷的灵魂) 看板: PttCurrent
标题: [问题] 请教melix的问题？
时间: Thu Jun 8 01:43:25 2006
因常常上PTT....
喜欢的版有近百个之多....
常常一口气看下来，也去掉半条命...
每天看，更是不可能...
希望能将其所有喜欢的文章(包含推文)，抓到自己的电脑内在慢慢看...
之前在此版曾问过有关于转信的事宜...
但结论是，PTT有些版不支援转信，且我并非版主...
所以没办法解决，此问题。
近来，我找到一个程式，是之前唐宗汉先生于2001年所写的melix
他的ptt.bbs路径太旧了(ptt.csie.ntu.edu.tw)
我将其改为ptt.cc
改后结果如下...
# $File: //depot/OurNet-BBSAgent/BBSAgent/ptt.bbs $ $Author: autrijus $
# $Revision: #3 $ $Change: 2216 $ $DateTime: 2001/10/27 06:01:01 $
# Contributed by Smartboy <kcwu@ck.tp.edu.tw>
PTT
ptt.cc:3003
load maple2.board
load maple2.session
setv postsign 1
但仍无法顺利连线，
而我利用他来撷取椰林风情可以...
但不良牛又不行了....
(是否跟最后三行程式有关呢？...我看每个*.bbs的文档内都不相同）
如ZOO是：
load maple2.board
setv moretail m/\[q\]\e\[30m结束\e\[201m/
setv cursor →
=login
wait 注册
send $[username]\n$[password]\nn\nq\x20q\x20q\x20q\x20q
goto main
ntu是：
Taiwan University Computer Center
bbs.ntu.edu.tw
setv headansi 0;47;34m
setv headansiend 44;37m
=login
wait 代号：
send $[username]\n
doif $[password]
wait 密码：
send $[password]\nn\n
endo
send \n\n\n\n
=main
send qqqqqqee
wait 主功能表
till Pager
=logoff
call main
send q\n\n\n\n
exit
=board
call main
send s\n
wait 名称
send $[board]\n$\x20\x20
wait 板主：
wait 文 章 标 题
=board_list_last
call board $[board]
send 1\n\x24h\x20 # 1, $, h, space
wait 板主：
wait \x0d>
till /
exit
=board_article_fetch_first
call board $[board]
send $[article]\n\n
wait \e[2J
till \e[0;37;44m 浏览
or \e[37;44m 文章选读
till 求助
or 回应
wait ←(q)\e[30m结束\x20\e[m
or 搜寻作者\x20\e[0m
exit
=board_article_fetch_next
send \x20
till \e[0;37;44m 浏览
or \e[37;44m 文章选读
till 求助
or 回应
wait ←(q)\e[30m结束\x20\e[m
or 搜寻作者\x20\e[0m
exit
=board_article_fetch_last
send c
till 板主：
exit
唐宗汉先生请我来此请教，是否众高手们能帮我解决此问题...
相关程式说明如下网址：http://search.cpan.org/dist/OurNet-BBSAgent/BBSAgent.pm
（我的是XP版）
谢谢～！