E PACK_NNTPV1.020-JAN-1994 12:04DEC C T1.3-005 P # $READONLY$$BSS$$DATA$$LINK$ $LITERAL$il$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_XABTRMSOCKETCONNECTSENDRECVSHUTDOWN INET_ADDR GETHOSTBYNAME 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;=PCTYP @ DECC$STRCPY DECC$STRCHRSYS$GET7PACKASM_SUCCESS RAISE_EXCEPTION7PACKASM_RECVERR=0h;=0CVER 7PACKASM_SENDERR DECC$GSPRINTF=%s  DECC$STRLEN SYS$FLUSHSYS$PUT=0 ;=PNDER 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 0;=SUCH 7DECC$$SHELL_HANDLER= DECC$ATOL7PACKASM_NOXHDRSUP;=0(0 ;=`< 7DECC$$SHELL_HANDLER=GROUP 7PACKASM_NOTEXIST= %d %d %d %s7PACKASM_CONNECTSYS$OPEN SYS$CONNECT7PACKASM_INSVIRMEM= :: DECC$STRSTR;=0(X ;=p 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;=PTICL 0%RECV=0;=0TICL 'SEND=0 ;=PTICL 7DECC$$SHELL_HANDLER=)SHUTDOWN+SOCKET7PACKASM_INVSERVRESP7PACKASM_UNKNOWNHOST=- INET_ADDR=08;=pKNOW< 7DECC$$SHELL_HANDLER=/ GETHOSTBYNAME1 GETSERVBYNAME8OTS$FILL7PACKASM_CONNECTFAIL5CONNECT7PACKASM_SOCKETERR=0;p;;;@; 6=XHDR subject %ld-%ld =tlGkG;FapC;,;HdGk#~^^ ~(08޴@HGG=G# HBTGTGPb@ZkGG2  C8BG#@Zk? âG(BG2@v@0b 6"@Zk4GtGG'  xBCb @C"@ZkGHBPbTG TG'@p@ P" p.SrJr>@ZkGG 8B$ $.Q$J$>#@ZkGG#97C9@8Gh"]] }(C08ݤ@HP#kG#~^^ ~(08޴@HGG=G# 8BTGTG@b@ZkG:# GC (B#@ZkhA ? GA#4GHB8@v HPbxKw@8DA# "A@Zk4GGx" @C"hBGpbC@ZkAG8BTGRH@bCB#q@ q" .TGTJ>@ZkGG? (B"D.GRDJD>#@ZkGG897Cò99@8GX"]] }C(08ݤ@HP#kG#G~tG^^~ (GG BGb""G@ZkBG#@ZkGG BG(bGG@Zk4GtGx@B @C"HbC@Zk0G]]C} (0#kG#G~tG^^~ (GG (BG0b8""G@ZkHBGAG@Zk4GAA`SHhBhA pbGAJ@FAA@ZkG " @C"B4GbGC@ZkXBG`b4G@Zk4GG  @C"BGbC@ZkG]]C} (0#kG#~8^@^H~PX``GG0GhTGa3 H= J!F=B4GbA?"TG@ZkGGG TGBbC@ZkPB "GG@ZkTG @BHb "G@Zk? "/w"""0ByJ8bXKGG?4G@ZkGG4 #".8"QJG'Jx+F #"`B@ZkBG@ZkC7/7"XK?`BGG@ZkBGb4G@ZkG$ X"B 4GBCCb4GGG@Zk TG`HvJF GE.$" %. EJQ %JvJ2Fr@JF .. E/%/JV J FEKY %KC:GC7G`BG@ZkBGbTG4GGtG@ZkGp"G GX "BCb4GC@Zk`B ="GhbtG@ZkGGX"GX"BCbC4G@Zk`8 GGTGG[@ZkG4G"`Bhb@ZkG5@"@GDX"CB4GbGC@Zk<]"pB4GxbtGC@Zk`B @"G@Zk0CG`8]@]H}PX`p#k#~(^0^8~@HP޴X``GG G@TGa3 H= J!F=XB4G`bA?"TG@ZkGTGGG xBCb@ZkB""bGTG@ZkGB( bh"""GGG@ZkGxA"8BG@Zk&&,A$GBG6DCF,ADA@ZkLA9sHBA bG6 JSFCLAy4G@Zk4G 0"GxBG Ad$AbC@ZkphA"8BGG@Zk4GBhA"bAİ@Zk4GG hBGpb@Zk4GG0¤GxBGbC@Zk8¤GGTGƠG[@ZkG4G8B@b@Zk4GtG5@@GD0¤xBbC@Zk,]"HB4GPbtGC@Zk8B @"G@Zk hC`G(]0]8}@HPݤX`p#k#~(^0^8~@HP`GG GTGa3 H= J!F=0""B  GG@ZkBG@ZkG@Q.QJ`.""GUJGJu#U"`@@u"""`F/Gz.tJq#GSzJtFz>.JG`.TGGS`J`>G[@ZkTG&G( [G@ZkG4GBb@Zk4GtGe G8" B(bC@ZkB,"b AD"Ad"A"@""GG@ZkB@"G@ZkCG`(]0]8}@HP`#k#~ ^(^0~8@H޴PX`>h^p`GGGGG8TGp3J]@JPF]BG  bAFGAfGH"@ZkTG0GGG[@ZkGTGNG  [G@ZkG4GF0B8b@Zk,? 4GtG@@ @F"pBxbC@ZkȠGGTGG[@ZkG.GBG@Zk4G =,!="8DGQ1H'J%FD1 0B8b@ZkGTG@B GHb ]!G@Zk0B "G@ZkGGGG[GG@ZkHGGTGG[@ZkGG`G ](]0}8@HݤPX`=h]p#kG`"CG#~(^0^8~@HP޴X`h>p^x`GGGGGGTGp3J]@JPF]B(!bG8""GGtG@ZkTG"GG G[@ZkG TGCG(![G@ZkGG;0""PB$]"Xb }"@ZktGG $}GHD{F D CB@"b@ZkCG GGTGG[@ZkG G@0B@ZkTG(=,)="8DQ1HD'JG%FD G_G[@ZkGGGG`G(]0]8}@HPݤX`h=p]x#k#~ ^(`G;==TGq3 J H1D=;G ](GC0#kG#~ ^(^0~8@`GGGTGa3 H= J!F=""TGGG[@ZkTG0BTG8b@Zk4GBGb@Zk`bG ](]C0}8@P#k#~ ^(^0~8@`GGG8TGa3 H= J!F=0@""TGGG[@ZkA"`B4Ghb@Zk4GPBXbG@Zk``bG ](]C0}8@P#kGP;X;x`[ 8; ;(  ; 2[GCkG( ;;[ ; @;8 0; 2[GCk4pG DECC$STRCHR4b# DECC$STRCHR4@ DECC$STRCHR4G DECC$STRCPY4@ DECC$STRCPY,%GRECV,&b#RECV,%@RECV4G RAISE_EXCEPTION4b#RAISE_EXCEPTION4@ RAISE_EXCEPTION4GP DECC$STRCHR4b# DECC$STRCHR4L@P DECC$STRCHR4`G DECC$STRCPY4|@ DECC$STRCPY4G0 DECC$STRCHR4(b# DECC$STRCHR4,@0 DECC$STRCHR4LGX DECC$STRCPY4T@X DECC$STRCPY,pGSYS$GET,|b#SYS$GET,@SYS$GET4GRAISE_EXCEPTION4b#RAISE_EXCEPTION4@RAISE_EXCEPTION4G DECC$STRCHR4b# DECC$STRCHR4@ DECC$STRCHR4$GH DECC$STRCPY4D@H DECC$STRCPY4 G DECC$GSPRINTF4 b#@ DECC$GSPRINTF4 @ DECC$GSPRINTF4 G DECC$STRLEN4 @ DECC$STRLEN,'GSEND,(b#@SEND,'@SEND4(G<RAISE_EXCEPTION40b#@RAISE_EXCEPTION48@<RAISE_EXCEPTION4 G DECC$GSPRINTF4 b# DECC$GSPRINTF4 @ DECC$GSPRINTF4 G DECC$STRLEN4 @ DECC$STRLEN,GSYS$PUT,b#SYS$PUT,@SYS$PUT4GRAISE_EXCEPTION4b#RAISE_EXCEPTION 4@RAISE_EXCEPTION4 G, SYS$FLUSH4 b# SYS$FLUSH4 (@, SYS$FLUSH4@GTRAISE_EXCEPTION4Hb#RAISE_EXCEPTION4P@TRAISE_EXCEPTION4#G DECC$CALLOC4$b# DECC$CALLOC4#@ DECC$CALLOC4GRAISE_EXCEPTION4 b#RAISE_EXCEPTION4@RAISE_EXCEPTION43G,OTS$FILL43(@,OTS$FILL414GL GETSERVBYNAME428b# GETSERVBYNAME41H@L GETSERVBYNAME4/`G GETHOSTBYNAME40hb# GETHOSTBYNAME4/@ GETHOSTBYNAME4G DECC$STRCPY4@ DECC$STRCPY4 G DECC$STRLEN4 @ DECC$STRLEN4G DECC$STRCPY4@ DECC$STRCPY4-G INET_ADDR4.b# INET_ADDR4-@ INET_ADDR4 G@RAISE_EXCEPTION4,b#RAISE_EXCEPTION4<@@RAISE_EXCEPTION4GOTS$MOVE4@OTS$MOVE,+GSOCKET,,b#SOCKET,+@SOCKET4G,RAISE_EXCEPTION4b#RAISE_EXCEPTION4(@,RAISE_EXCEPTION,5,GHCONNECT,6<b#CONNECT,5D@HCONNECT4`GxRAISE_EXCEPTION4hb#RAISE_EXCEPTION4t@xRAISE_EXCEPTION4G DECC$ATOL4b# DECC$ATOL4@ DECC$ATOL4GRAISE_EXCEPTION4b#RAISE_EXCEPTION4@RAISE_EXCEPTION,!G DISPLAY," b#DISPLAY,! @ DISPLAY4 G DECC$STRCPY4 @ DECC$STRCPY4# G DECC$CALLOC4$ b# DECC$CALLOC4# @ DECC$CALLOC4 G RAISE_EXCEPTION4 b#RAISE_EXCEPTION4 @ RAISE_EXCEPTION4 G DECC$STRSTR4 b# DECC$STRSTR4 @ DECC$STRSTR4  G< DECC$GSPRINTF4  b# DECC$GSPRINTF4 8 @< DECC$GSPRINTF4H GX OTS$MOVE4T @X OTS$MOVE4 h G DECC$STRLEN4  @ DECC$STRLEN4 G SYS$OPEN4 b#SYS$OPEN4 @ SYS$OPEN4 G RAISE_EXCEPTION4 b#RAISE_EXCEPTION4 @ RAISE_EXCEPTION4 G OTS$MOVE4 @ OTS$MOVE4 G SYS$CONNECT4 b# SYS$CONNECT4 @ SYS$CONNECT4$ G4 SYS$CLOSE4, b# SYS$CLOSE40 @4 SYS$CLOSE4D GX RAISE_EXCEPTION4L b#RAISE_EXCEPTION4T @X RAISE_EXCEPTION4 G DECC$ATOL4 b# DECC$ATOL4 @ DECC$ATOL4 G RAISE_EXCEPTION4 b#RAISE_EXCEPTION4 @ RAISE_EXCEPTION,! G DISPLAY," b#DISPLAY,! @ DISPLAY4 G DECC$STRCPY4 @ 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 G DECC$GSSCANF4 b#` DECC$GSSCANF4 @ DECC$GSSCANF4 G DECC$STRCPY4 @ DECC$STRCPY4 G DECC$GSPRINTF4 b# DECC$GSPRINTF4 @ DECC$GSPRINTF4G$ DECC$ATOL4b# DECC$ATOL4 @$ DECC$ATOL4@GPRAISE_EXCEPTION4Db#RAISE_EXCEPTION4L@PRAISE_EXCEPTION4 xG DECC$STRLEN4 @ DECC$STRLEN4G DECC$ATOL4b# DECC$ATOL4@ DECC$ATOL4G DECC$STRCHR4b# DECC$STRCHR4@ DECC$STRCHR4G DECC$STRCPY4@ DECC$STRCPY4 G DECC$GSPRINTF4 b# DECC$GSPRINTF4 @ DECC$GSPRINTF4lG DECC$GSSCANF4tb# DECC$GSSCANF4|@ DECC$GSSCANF4GRAISE_EXCEPTION4b#RAISE_EXCEPTION4@RAISE_EXCEPTION4 G DECC$STRLEN4 @ DECC$STRLEN4)hG|SHUTDOWN4*tb#pSHUTDOWN4)x@|SHUTDOWN4G DECC$FREE4b#p DECC$FREE4@ DECC$FREE48GH SYS$CLOSE4@b# SYS$CLOSE4D@H SYS$CLOSE4LG` DECC$FREE4Pb# DECC$FREE4\@` DECC$FREE ?=/'& PACK_NNTPDEC C T1.3-005 u= 44= __iscntrl4= m0 = 0 = 044= nntp_tcp_read_line04= e  e  s x y         8 $= \4 =  6=  44=!nntp_dnet_read_line4=                >      8 $= 4 =  = 4@4= nntp_tcp_send_line4=5-,       , $= 4 =  =  h44=!nntp_dnet_send_lineh4=ZRQ :  :  C I J J L P, $= 4 =  = 44=nntp_tcp_connect4=" m                            0 $= 4 =  = X 44=nntp_dnet_connectX 4=       '  '  *  /  0  6  7  B % G  G 8 $=  4 =  = "0 4`4=#nntp_select_newsgroup0 4=xpo o   |  T       0 $= h 4 =  = 044= nntp_scan_articles04=~vu          : H $= 4 = P = !44="nntp_extract_article4= K!  Y! a! g! k! k! v! |! |! |! ! ! x!@ $= 4 =  = 44= nntp_cleanup4= !$ $= 4 = ` =  4p4=!nntp_tcp_disconnect4=1)( ! !  !, $=  4 =  = !44="nntp_dnet_disconnect4=1)( ! ! "0 $= 4 =  = #4X4=$load_nntp_tcp_routines4=TLK /" /" 0" 1" 2" 3" 4" = p = $44=%load_nntp_dnet_routines4=TLK Z" Z" [" \" ]" ^" _" = l =