E PACK_NNTPV1.020-JAN-1994 11:59DEC C V1.3-000A # $READONLY$$BSS$$DATA$$LINK$ $LITERAL$id$CODE$ $ABS$DECC$GA___CTYPEDECC$GA_STDERR DECC$GA_STDINDECC$GA_STDOUT DECC$GSPRINTF DECC$GSSCANF DECC$ATOL DECC$CALLOC DECC$FREE DECC$STRCHR DECC$STRSTR DECC$STRLEN DECC$STRCPYDECC$GA_RMS_NAMDECC$GA_RMS_FABDECC$GA_RMS_RAB DECC$GA_RMS_XABALL DECC$GA_RMS_XABDAT DECC$GA_RMS_XABFHC DECC$GA_RMS_XABKEY DECC$GA_RMS_XABPRO DECC$GA_RMS_XABRDT DECC$GA_RMS_XABSUM DECC$GA_RMS_XABTRM TCPWARE_INET_ADDRTCPWARE_SOCKETTCPWARE_CONNECT TCPWARE_SOCKET_SEND TCPWARE_SOCKET_RECV TCPWARE_SHUTDOWN TCPWARE_GETHOSTBYNAME TCPWARE_GETSERVBYNAME8JXLOAD_NNTP_TCP_ROUTINES8JLOAD_NNTP_DNET_ROUTINESDISPLAYRAISE_EXCEPTION PACKASM_NOTINSTAL PACKASM_CONFLICT PACKASM_INSVIRMEM PACKASM_INTERNERR PACKASM_INVQUAVAL PACKASM_UNSUPPORTED PACKASM_ERROUTFIL PACKASM_INVARTSPEC PACKASM_NOPACKAGEPACKASM_ABVERB PACKASM_DUPLICATE PACKASM_ERRINFILPACKASM_FALSANS PACKASM_INVALANS PACKASM_INVALDATE PACKASM_INVALIDPART PACKASM_INVEXPPART PACKASM_NOCONFIRMPACKASM_NOMATCHPACKASM_NOPARTS PACKASM_NOTALLPARTS PACKASM_PACKNOTASS PACKASM_PARTNOTEXPPACKASM_PARMDEL PACKASM_UNEXPSTATE PACKASM_ASSEMBLEDPACKASM_DELETE PACKASM_NOPACKFND PACKASM_PROCESSINGPACKASM_SUCCESS PACKASM_AUTHINFOERR PACKASM_CONNECTERR PACKASM_CONNECTFAIL PACKASM_NOXHDRSUP PACKASM_SOCKETERR PACKASM_UNKNOWNHOST PACKASM_UNKNOWNSERV PACKASM_GRPNOTSEL PACKASM_INVSERVRESP PACKASM_NOCURRENT PACKASM_NONEXTART PACKASM_NOSUCHART PACKASM_NOTEXISTPACKASM_RECVERRPACKASM_SENDERRPACKASM_CONNECTHANDLER SYS$CLOSE SYS$CONNECT SYS$FLUSHSYS$GETSYS$OPENSYS$PUT PACK_CONNECTSELECT_ARTICLES SCAN_ARTICLES EXTRACT_ARTICLES CLEANUP_ARTICLES DISCONNECTGBLFLAGS DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER DECC$$SHELL_HANDLEROTS$MOVEOTS$FILL =tcp=nntp== ::"0=NNTP" =0;7DECC$GA___CTYPE=0;=P @ DECC$STRCPY DECC$STRCHRSYS$GET7PACKASM_SUCCESS RAISE_EXCEPTION7PACKASM_RECVERR=0H;=0 7PACKASM_SENDERR DECC$GSPRINTF=%s  DECC$STRLEN SYS$FLUSHSYS$PUT=0 ;=P 7DECC$$SHELL_HANDLER=;7HANDLER=QUIT` DECC$FREE SYS$CLOSE=0 ;=0 7DECC$$SHELL_HANDLER==0(;= 7DECC$$SHELL_HANDLER=%d %d= BODY %d7PACKASM_NOSUCHART DECC$GSSCANF=0 x ;=p 7DECC$$SHELL_HANDLER= DECC$ATOL7PACKASM_NOXHDRSUP;=0( ;=`< 7DECC$$SHELL_HANDLER=GROUP 7PACKASM_NOTEXIST= %d %d %d %s7PACKASM_CONNECTSYS$OPEN SYS$CONNECT7PACKASM_INSVIRMEM=:: DECC$STRSTR;=0(;=`| 7DECC$$SHELL_HANDLER=7PACKASM_CONNECTERR8OTS$MOVEP!DISPLAY# DECC$CALLOC=%s%s%s7DECC$GA_RMS_RAB7DECC$GA_RMS_FAB;;;;`;;;=0;7SELECT_ARTICLES7 SCAN_ARTICLES;7 PACK_CONNECT7 DISCONNECT7CLEANUP_ARTICLES7EXTRACT_ARTICLES=00;=P 0 %TCPWARE_SOCKET_RECV=0;=0 'TCPWARE_SOCKET_SEND=0 ;=P 7DECC$$SHELL_HANDLER= )TCPWARE_SHUTDOWN+TCPWARE_SOCKET7PACKASM_INVSERVRESP7PACKASM_UNKNOWNHOST= -TCPWARE_INET_ADDR=08`;=p< 7DECC$$SHELL_HANDLER= /TCPWARE_GETHOSTBYNAME 1TCPWARE_GETSERVBYNAME8OTS$FILL7PACKASM_CONNECTFAIL 5TCPWARE_CONNECT7PACKASM_SOCKETERR=0;p;;;@; 6=XHDR subject %ld-%ld =GkG;FapC;,;HdGk#~^^ ~(08޴@HGG=GTGHBTGPb@ZkG3# GC 8B#@Zk? _âG(BG7@v@0b 6"G@Zk4GtGG'  xBb @C"C@ZkGHBPbTG TG'@p@ P" p.SrJr>@ZkG 8B .PJ>#@ZkGâ6@8CGh]] }C(08ݤ@HP#k#~^^ ~(08޴@HGG=GTG8BTG@b@ZkG:# GC (B#@ZkhA ? GHB4GPbw@ #AA7@qJ0HFAG@Zk4GGGx"`hBpb @C"C@ZkAG8BTGRH@bCB#q@ q" .TGTJ>@ZkG (B$ $.Q$J$>#@ZkGâ#66@8CGX]] }C(08ݤ@HP#kG#G~tG^^~ GGGBb"""@ZkB="#"@ZkGG B(bGG@Zk4GtGx"@B @C"HbC@Zk0bG]]C} 0#k#G~tG^^~ (GGG(B"0b8""@ZkHB AG"@Zk4GAQtSHhBhA pbG3v@JtFA@ZkGG` "B @C"b4GC@ZkXBG`b4G@Zk4GGG` B @C"bC@ZkG]]C} (0#kG#~8^@^H~PX`cGG0GhTGa3 H=16?J!F=B4GbA?"TG@ZkGG"BTGbC@ZkPB "GG@ZkTG @BHb "G@Zk? w&0BG8b4G5vJB ݲ@ZkG0#,#"#Hx F `B8"@ZkB8"@ZkC7.7"WJ>G`B8"G@ZkB8"b4G@ZkGC$"X"B B4GCbC4GGG@Zk  HP@  =`BsJ2?J$"SF } GG@ZkBGbTG4GGtG@ZkGp" XGBGCbC4G "@Zk`B ="GhbtG@ZkGGX"X"BGCbC4G@Zk`8="GTG`[@Zk4G#`Bhb8"@ZkG@"5@XG D BCbC4GG@Zk<]"pB4GxbtGC@Zk`B @"G@Zk0CGc8]@]H}PX`p#kG#~(^0^8~@HP޴XcGG G@TGa3 H=16?J!F=XB4G`bA?"TG@ZkGTGG"xBbC@ZkB""bGTG@ZkGB("bh"""GG@ZkGx8BA"G@Zk&,A$(#BG("6D,AIJDA@Zk4GLAQtHBA bG_FtFLA@Zk4G 0"GxBG Ad$AbC@ZkphA"8BGG@Zk4GBhA"bA@Zk4GG hBGpb@Zk4GG0GxBGbC@Zk8(="GTGe[@Zk4G 8B@b("@Zk4GtG@5@GD0xBbC@Zk¤,]"HB4GPbtGC@Zk8B @"G@Zk hCGc(]0]8}@HPݤX`#k#~(^0^8~@HPcGG GTGa3 H=16?J!F=0""B  G@ZkBG@ZkG@!.!J@Ga."G TtJJ"T#@@t#"4"` FG.zUJ! PJF>a/aK@.GeGTGR@J@>[@ZkTGe$[(=" @Zk4GB("b@Zk4GtGe 8G B(bC@ZkB,"b AD"Ad"A"@""("G@ZkB@"G@ZkCGc(]0]8}@HP`#k#~ ^(^0~8@H޴PX`>hcGGGGG8TGp3J]26_JPF]BGb "AFGAfH"@ZkTG0 ="Gg[@ZkgGTGI[ ="@Zk4GD0B8b "@Zk,? 4GtG@@ pBxb @F"C@Zkg ="GTG[@ZkG+GB "@Zk4G =,8D "=H%FD/ 0B8b@ZkGTG@BGHb =! "@Zk0B "G@ZkGGG ="[GG@ZkgGTG ="[@ZkGG_Gc ](]0}8@HݤPX`=hp#k`CG#~(^0^8~@HP޴X`h>pc =GGGGGGTGp3J]26_JPF]BGb("8""GtG@ZkTG(="Gh[@ZkGhTG>(="[@Zk0""G8PBXb("$]" }"@ZktGG $}@"HGD{F D BCb@ZkCG_h(="GTG[@Zk G 0B("@ZkTG(=,8DDG=HG%FD (="_[@ZkGGGGc(]0]8}@HPݤX`h=p#kG#~ ^(cG;==TGq3 J!6?H1D=;G ](GC0#kG#~ ^(^0~8@cGGGTGa3 H=16?J!F=B""TGrG[@Zk0BTGTG8b@Zk4GBbG@ZkcbG ](]C0}8@P#kG#~ ^(^0~8@cGGG8TGa3 H=16?J!F=0B@""TGrG[@Zk`BA"hb4G@Zk4GPBGXb@Zkc`bG ](]C0}8@P#kP;X;x`[ 8; ;(  ; 2[GCkG( ;;[ ; @;8 0; 2[GCk4tG DECC$STRCHR4b# DECC$STRCHR4@ DECC$STRCHR4G DECC$STRCPY4@ DECC$STRCPY<%GTCPWARE_SOCKET_RECV<&b#TCPWARE_SOCKET_RECV<%@TCPWARE_SOCKET_RECV4GRAISE_EXCEPTION4b#RAISE_EXCEPTION4 @RAISE_EXCEPTION4GT DECC$STRCHR4b# DECC$STRCHR4P@T DECC$STRCHR4`G DECC$STRCPY4|@ DECC$STRCPY4G( DECC$STRCHR4 b# DECC$STRCHR4$@( DECC$STRCHR4DGP DECC$STRCPY4L@P DECC$STRCPY,`GSYS$GET,hb#SYS$GET,@SYS$GET4GRAISE_EXCEPTION4b#RAISE_EXCEPTION4@RAISE_EXCEPTION4G DECC$STRCHR4b# DECC$STRCHR4 @ DECC$STRCHR4G< DECC$STRCPY48@< DECC$STRCPY4 G DECC$GSPRINTF4 b#@ DECC$GSPRINTF4 @ DECC$GSPRINTF4 G DECC$STRLEN4 @ DECC$STRLEN<'GTCPWARE_SOCKET_SEND<(b#@TCPWARE_SOCKET_SEND<'@TCPWARE_SOCKET_SEND4G$RAISE_EXCEPTION4b#@RAISE_EXCEPTION4 @$RAISE_EXCEPTION4 xG DECC$GSPRINTF4 b# DECC$GSPRINTF4 @ DECC$GSPRINTF4 G DECC$STRLEN4 @ DECC$STRLEN,GSYS$PUT,b#SYS$PUT,@SYS$PUT4GRAISE_EXCEPTION4b#RAISE_EXCEPTION4@RAISE_EXCEPTION4 G  SYS$FLUSH 4b# SYS$FLUSH4 @  SYS$FLUSH4 G4RAISE_EXCEPTION4(b#RAISE_EXCEPTION40@4RAISE_EXCEPTION4#G DECC$CALLOC4$b# DECC$CALLOC4#@ DECC$CALLOC4GRAISE_EXCEPTION4b#RAISE_EXCEPTION4@RAISE_EXCEPTION43GOTS$FILL43@OTS$FILL<1G(TCPWARE_GETSERVBYNAME<2b#TCPWARE_GETSERVBYNAME<1$@(TCPWARE_GETSERVBYNAME</8GXTCPWARE_GETHOSTBYNAME<0@b#TCPWARE_GETHOSTBYNAME</T@XTCPWARE_GETHOSTBYNAME4tG DECC$STRCPY4|@ DECC$STRCPY4 G DECC$STRLEN4 @ DECC$STRLEN4G DECC$STRCPY4@ DECC$STRCPY<-GTCPWARE_INET_ADDR<.b#TCPWARE_INET_ADDR<-@TCPWARE_INET_ADDR4G RAISE_EXCEPTION4b#RAISE_EXCEPTION4@ RAISE_EXCEPTION4(GXOTS$MOVE4T@XOTS$MOVE4+XGxTCPWARE_SOCKET4,`b#TCPWARE_SOCKET4+t@xTCPWARE_SOCKET4GRAISE_EXCEPTION4b#RAISE_EXCEPTION4@RAISE_EXCEPTION45GTCPWARE_CONNECT46b#TCPWARE_CONNECT45@TCPWARE_CONNECT4GRAISE_EXCEPTION4b#RAISE_EXCEPTION4@RAISE_EXCEPTION4 G0 DECC$ATOL4$b# DECC$ATOL4,@0 DECC$ATOL4PGlRAISE_EXCEPTION4Xb#RAISE_EXCEPTION4h@lRAISE_EXCEPTION,!tGDISPLAY,"|b#DISPLAY,!@DISPLAY4G DECC$STRCPY4@ DECC$STRCPY4#4 GL DECC$CALLOC4$< b# DECC$CALLOC4#H @L DECC$CALLOC4` Gp RAISE_EXCEPTION4d b#RAISE_EXCEPTION4l @p RAISE_EXCEPTION4p G DECC$STRSTR4x b# DECC$STRSTR4 @ DECC$STRSTR4  G DECC$GSPRINTF4  b# DECC$GSPRINTF4  @ DECC$GSPRINTF4 G OTS$MOVE4 @ OTS$MOVE4  G DECC$STRLEN4  @ DECC$STRLEN4 G SYS$OPEN4 b#SYS$OPEN4 @ SYS$OPEN40 GL RAISE_EXCEPTION4@ b#RAISE_EXCEPTION 4H @L RAISE_EXCEPTION4T Gh OTS$MOVE4d @h OTS$MOVE4l G SYS$CONNECT4t b# SYS$CONNECT4| @ SYS$CONNECT4 G SYS$CLOSE4 b# SYS$CLOSE4 @ SYS$CLOSE4 G RAISE_EXCEPTION4 b#RAISE_EXCEPTION4 @ RAISE_EXCEPTION4 G DECC$ATOL4 b# DECC$ATOL4 @ DECC$ATOL4 G$ RAISE_EXCEPTION4 b#RAISE_EXCEPTION4 @$ RAISE_EXCEPTION,!, GD DISPLAY,"4 b#DISPLAY,!@ @D DISPLAY4D GT DECC$STRCPY4P @T DECC$STRCPY4 G DECC$STRCPY4 @ DECC$STRCPY4  G DECC$STRLEN4  @ DECC$STRLEN4 G DECC$ATOL4 b#` DECC$ATOL4 @ DECC$ATOL4 G RAISE_EXCEPTION4 b#`RAISE_EXCEPTION4 @ RAISE_EXCEPTION4 G8 DECC$GSSCANF4 b#` DECC$GSSCANF44 @8 DECC$GSSCANF48 GH DECC$STRCPY4D @H DECC$STRCPY4  G DECC$GSPRINTF4  b# DECC$GSPRINTF4 @ DECC$GSPRINTF4HGX DECC$ATOL4Lb# DECC$ATOL4T@X DECC$ATOL4pGRAISE_EXCEPTION4tb#RAISE_EXCEPTION4@RAISE_EXCEPTION4 G DECC$STRLEN4 @ DECC$STRLEN4G DECC$ATOL4b# DECC$ATOL4@ DECC$ATOL4G DECC$STRCHR4b# DECC$STRCHR4@ DECC$STRCHR4G DECC$STRCPY4 @ DECC$STRCPY4 G0 DECC$GSPRINTF4 b# DECC$GSPRINTF4 ,@0 DECC$GSPRINTF4tG DECC$GSSCANF4xb# DECC$GSSCANF4@ DECC$GSSCANF4GRAISE_EXCEPTION4b#RAISE_EXCEPTION4@RAISE_EXCEPTION4 G DECC$STRLEN4 @ DECC$STRLEN<)`GxTCPWARE_SHUTDOWN<*pb#pTCPWARE_SHUTDOWN<)t@xTCPWARE_SHUTDOWN4|G DECC$FREE4b#p DECC$FREE4@ DECC$FREE40GD SYS$CLOSE48b# SYS$CLOSE4@@D SYS$CLOSE4HG\ DECC$FREE l4Pb# DECC$FREE4X@\ DECC$FREE @=0(' PACK_NNTPDEC C V1.3-000A u= 44= __iscntrl4= t0 = 0 = 044= nntp_tcp_read_line04=                4 $= \4 =  #=  44=!nntp_dnet_read_line4=                & ' & )8 $= 4 =  = 4@4= nntp_tcp_send_line4=/'& E  E X $ $= 4 =  =  H44=!nntp_dnet_send_lineH4=VNM        , $= t4 =  n= `44=nntp_tcp_connect`4=              t      ' , , , -4 $= 4 = x = 44=nntp_dnet_connect4= S  _ p r r w x ~    4 $=  4 =  = " 4`4=#nntp_select_newsgroup 4=rji    L      0 $=  4 =  = x 44= nntp_scan_articlesx 4=~vu        #  &  &  5  5  : : / H $=  4 = ( = !44="nntp_extract_article4=             @ $= 4 =  = 44= nntp_cleanup4= $ $= 4 = ` =  4p4=!nntp_tcp_disconnect4=1)( ! !  $!0 $=  4 =  = !44="nntp_dnet_disconnect4=1)( ?! G! R!, $= 4 =  = #4X4=$load_nntp_tcp_routines4=TLK w! w! x! y! z! {! |! = p = $44=%load_nntp_dnet_routines4=TLK ! ! ! ! ! ! ! = l =