?=2KP BAHPRH4DH3LXLH $FX88 FH %D (L$PKDO 5D
RTJ?IJ%
D%2/"R9WQI<+($>UTR?JJI
%%D/2R"W9IQ+<$(U>RTJ?IJ%
D%2/"R9WQI<+($>UTR?JJI
%%D/2R"W9IQ+<$(U>RTJ?IJ%
D%2/"R9WQI<+($^L[:"X65E0-+B)S
DS.6.]-HU:[X"560E+-)B
SSD6..-]UH[:"X65E0-+B)S
DS.6.]-HU:[X"560E+-)B
SSD6..-]UH[:"X65E0-+B)S
DS.6.]-HU:[X"2Z?6LA%KUZ2J,F?!Y(AB[?[&0)0?0<1I1"!V7!$89?O? +YHNOS[SOS[S/SSS:/S[SIK9FIK8DKS*VNZJ[J]J
SXF1F;K
J=KVR1SDKDL]LKI=2AI?
?2K%IE*?0&O>O=>(/Y I >(K:K=Y[ 9O88H?X/7K5YGI > **K5YG 4<(+PK3> *!K2IGYG;&XQ 4<(+MK1> *, 4X]H]K0=H+SK/=H+AI==H+MK?=+M:H][!PQ*2K!C.9F8F8F[!/-;[!/-K6YG**8A<(+^I<> +M 4K,> +Y*2 4;*2O,C0R2.2?H/9S*+E=WRJ??6=P=RF=DRJJF3!>2E>$T.>>E?&2AMG2IQGK?<(*AK>.K=XPI[8A
SX[K *^K:XSLTZ)PT 9+AA;I:=I9I8% Z)9%%HVXV8DHUJ)XUPQ*XHVA7\WPWHV%&HU%$C\WPW*RK8
7Y\YS:AXZXUK6X 5 5I > /4: HU> /3: XX: X(IOXZIN
7/2HO:?H/9O8T,?*.^ !MAB
PQ!+.?7B = I6
?O>C=> /< ;O:<(8A
:Z,K
XYI5XIK9Z[ 8A4I3"W*RXRHR.[HRK7> .W"W"WHYK6> PK5Z+O4%ID/3O2?/1 02C/4"[X\"[X]"[8F8FC
H\FHR8J8J8HC
H]F*4\IPY/FPK
XYI5XI/FO:>(//O.[Z2B%J"HH?R,W.W:
"-&>>AD=& T53Z3BVQ0>$ CQ O?
>O=> /<
;K:XPI5XIK9XHYTYUYVO8C7> /6YNYMYP: YQ: YRYOYSYB 5<(*^A4I3XRHR\HHRK4<(/3K29K1(*^/)IN9HIP>8/)QNYP*^IN> +ZQR/)IP> /)*^QQ/)+V/Z[*O-[)/Z[)I<[*X\
,/""A8?EVKX$"XJ? ZT=& "G >$6W?UZ[-
>AZ\!NYYYXYWQPIN> *]IB> *[ITK?<(*W?*Z9 > =IMIOYM/(+
8IM<(+N?+A 7QMB*79 6 6 6 6ILK5YL >: IMYM*7ILC4> /9K3XQ9 6PQ+UQRK2IL9D9FITYT 1/09F8F8FPSK1=+$[T9P8DST+* 0/W(/>"YJ^XIK=XPR[.HPK<> "Y/; :=?G? .YIT8HYTIU8HYUIV8HYV9.!IV8DYVIU8DYUIT8DYT.-;ZAT> .8"-: ILYL*9"-ITY
IUY[IVY\"-"-IVI\YV:DIUI[YU:DITIZYT/B;IVIYYV8DIUIXYU8DITIWYT/X
9O&8 [7S&O99H
9O88H
8S7+,9O9/&0:0;\PT.+?U-(>;K?YZITK>=YT: =QZ*DITA7YT.YANPRP=*XQA8!YNP+,NPRP[ZNPRP[[NPRPK<+/I276I27 I>8F8D:PI3X+]IA> ;&J9 I8 > *4IA> *5KZ7K[7+K\7479+R;V767:?H/8.PIA>(K7J90I8 > *49IA>(*5+LRP[+*[[\K+*%+&/ C- BBD\AHZ-,? : XXI6
?K>XQY": XVYTK=XWI1XP << QT8!LWPW> XVPP*OI0"3PV*$":YN":8!YOPU *.I\YQI"YRQSQ"PQ*HQ\.XP (/PLSP[+YPS+ 8J8J8J[J: X[KJA;K8=HK7K6PP8SP/PK5<(/)K4J/)(*=PZBZKIA> K?K>X : X(KPXJJZ?I.XX =[MJ?Z*RJ).LKP(/ < K?XKI0X(+A ;:A?P/KLJ/S%&OV[[%$SV/VGGA+)NL TK)G1P1]K)G1PL\K)G1D
K)G1D
^K)G1A)$K)G1A(\P I^: QO;O?8F>X/>*M =A4I3XRHR\HO?C<> *UK;HR>(*YK:HR> *GHR8!YMK9XHI1Y]YTYUYVX[K8YL:IMLH<(+OHRYSO?C<> *5ISK7>(*&ISK6<(/5K4=*&K3=(*&P[+EML]LQL+K9F8F8F]L: X[Q]*& 2*^ 2/1
0 /K.XJK-X XXI6
,I-XQ =\HPQ+ /TAR+L%= C A?!K!MVKZA>;ZT=&= AT6W=6=TP -">$
?K>
=Y]XYI5XIKF-$>EPA+N&8&C&G+PA7.C>."C%)C"C%$AX%%%X&"C%)C"C%CH&X&%%X I]>(*!I,XJI!SI0I,XJLJ\ILJ\ILJ\IPY*F ?IYY]IY9HIZK=HY9D9DXQXY >PQ*GI]< : Y]I]
=I]C(P59O7K5>P+DH5H4X4K4% X5%%9H4X4H4%&H56+P+N?HA?H&ZLI\HPQ*K?XHIQK> =K?XHIQ> K /4IS>(/3K7XHK6 :K8XQK9XH\HPQ*G*HFAAG&KNL]\P$P!N,--!
.AD3?>85OT8\$AB6WYUIU?H*JI*IU?H*[8AYYHU>(+XUIY> K?YU:IY> ;$8AIUYU*BIU8J8HC>Y
IUA<8 Y!K=",K<",8AXUIU.I
YVI!YWI!YXMV8HQW*4(K3K2/4K1K0K/K.K-K,K+K*K)/40?)?6?4?5ADN?9>%.+?-..$Q!
JB.
)
P>F5P4HG?IXSLSPSXPX[ ?*I >*E =/<
;AZA8BWB5CTC3DQD0ENG?+INPUT MUST BE DECTAPE?6 NOT FOUND?*OUTPUT MUST BE DECTAPE?$NO OUTPUT FILE NAMES ALLOWED?-OUTPUT TAPE IS FULL?+DEVICE DOES NOT EXIST?/NO ROOM ON DEVICE?.ERROR CLOSING FILE%SHJ"?(*%SBY^()PD
D
J
P?,DECTAPE SELECT ERROR?6BAD NUMBER?5INPUT ERROR?&OUTPUT FILE ALREADY EXISTSZ;N)8 Z9R)J:9DZ:J;8DZ;R9*/J;.)Z:.IG8 JY
= <*U8!M[> *UIG8 9J8J
;.QG*C/:DTA0B CACBCCCDCECFCGCHCICJCKCLCMCNCOCPCQCRCSCTCUCVCWCXCYCZB$B.B?B0B1B2B3B4B5B6B7B8B9O9> +MK
>K
= A84-%>A-$PA>-Y!NU!U%U$?8 ?K>YKK=
W1O18F8F8FK0Z5O/Z72B%JB?A0B T.-&>>A3Y 0:EH2?07";7CBJ;W6!K!MABB3BK?YCK>YDK=YEK(
=K= :K9 :QC*E.9AIDX!L!C88J8J8JYGMDC78F8F8FIG]EQEMDQDQDC68J]EQEMDC5]EQEL!C;8F8FYGMDQDC48F8F8DIG]EQE.WK3YGMGX\QGMGX]QGMGC29F8FH\"MGC;8J8J8HH]"/CHK1> /ZK0X/Z2A]K2KQK/"B0= C0"(.PQ ? > ? >K=X! ?8 >H$X IEKME?K9K8X%8A >[-MEYGIGC79J8HX\QEMEC68F8F8DH\%(A=8F8DX]IGC5H]]EO4
3X49VO39J?P +[K1X!9V+*:X4K0YGME8!MGH4=+(8!X!S-QG+];K- ; //.:7Z.K]?D)F0:G
?G8CC?]B ;WFB.7C:T ?H!W >K=X" ?K(++O5+.O5<(K2K:X/W= ?0?2Z0:C8DBJBMB0)FB7B/7Z7C
Note: Lines longer than 256 characters were wrapped