File GRAPH.SV (save files (Executable program)

Directory of image this file is from
This file as a plain text file

?=2CKLAHDGH
:0JQZQRR*E.DJSZW8NTRTZ"NTRTXGJSZ%JTZ&8LG*	D9=H81XQXPXR8HXVK>XW2I
=	<  \DJ6Z:8N7R7[B: N7R7XH8LHXG: LHXHJ62I
;J7
:/9HP9HXPHQ8HXQHR8HXR:D2I
=/N/VFLD2IO8< K72I
8  G:2IO([^S(O([
 [BY2IM\;(+$?8 PD[DODNGFGEBOUA$GRHZ <B,F>>G2I<<JF2J%LI,)X)2LIJYC2C-EB2I2B,
D02I2B,$D=P%2I,%P)2I,)2I2B,1DL2I2B,6DA2I2B,;D[F>IOLIBRLLAB8RLFTNLIBRLLIB8RLB(?1= HB?YIJKU?UJ=FZK(FBDD?:?F$?<=AGIUF1LAKLB0 B>">&G8???0/G <%E DHGD,=?=DI?AF5MNFGFLJEZNJFZO;X*PDNZEJNZS8NOROXG: NOROXHJM2I
?2IO>>(+W&B+UHXJEXXHW<(*;8!HY=*;ZEHS9HXSHT8HXTHU8HXURE*/+C8 ZEHYXW+A&ARE+HV?+H;&&DHX?H&D&HP?+R;&&D;XXV2I
=&C+%HG[/.< JEC-2I
>.2I
<.2I
;: [-ZE;VJN[+8.O??8LH/.K2ZNK3ZO;([-*PRQGEPM(HGZC8LH"\XSHW< RXYHVXXLHXTLHXU2IO?"\XP[E2IO>XQO=XR.Z)J)8H8JC<XW;XB)XVJ)C;.\HR9DXRHQ8DXQHP8DXP.*9HRHUXR:DHQHTXQ:DHPHSXP.5MNM)HPK:?H+N	CPW+GKE>(+XPR+XPQ+XPP[E+GHW=(+1XW;&HP? +"*: +XHW9D8F=H/DHPHV2I
?HQ
>HR
=/F:XRXQ+*/2W18/0?8GC?RQPDJZD8NARAZNNAXGJZXJAZY8LGPGZ: LGXHJZ7*DJXZ\8NYRYZ7: NYXH2IO?"62I
?O>"62I
>O="62I
=RY;VJXZ48.Y8\H.6&IX D2IO?	<XP2IO>XQHWK;=++K:XT	9PT+KHV8DHQ<X8!XV2I
?
>
=HV   DK[[K\[$ [BS2IK[Z<;VK\Z=*> [BY2IH:;(+S
42I.0N&MOA2>(MN?==4F\RQPF5MNLFGFJ;M(JHDJG^FJHZN8NIRIXG: NIRIXH&C*]HVHXXVHWHYK?XWHPXXHQXYHRXZXPK>ZN&AHX8HXXHY8HXYHZ8HXZ<X&RN*(&D  P$IVZDJE^FJ;[A8N<R<XG: N<R<XH&C+2HVHXXVHY8!HWK=XWXZK<[A;XSHP?H+\&B&HZ8DXZHY8DXYHX8DXX	;SA+VHXXPHYXQHZXR&D  J [BY2IJ9;(2I
:+0PF*?A??%=?K?ZQ;&ZR2INQ8 <X9A^Q:0JQZQRR*E.DJSZW8NTRTZ"NTRTXGJSZ%JTZ&8LG*	D9=H81XQXPXR8HXVK>XW2I
=	<  \DJ6Z:8N7R7[B: N7R7XH8LHXG: LHXHJ62I
;J7
:/9HP9HXPHQ8HXQHR8HXR:D2I
=/N/VFLD2IO8< K72I
8  G:2IO([^S(O([
 [BY2IM\;(+$?8 PD[DODNGFGEBOUDZAJFZK8NGRGZRNGRGZ)8N)"W  %Z)K?ZC9DZJA9DZA<XJ)JRC*[.WPX$IVZD=*/RB8!ZAZCJ)Z38N*R*Z:N*R*ZF8NF<(.&=+BRB8!9DRC=+B9HZDJD8!ZFJC8 ZCJCZEZJAJFRC<H+9P=H9ZAJ8DZJA9D<P+RJD+S:JB8H:ZBJ<X8!  ZD:S.S.REJA=HJD<H9HRE+7  [:!TS:!?4DJZD8NARAZKNAR
ZQ8NQ=H8!  $D>DRRRR  & [BY2IN	;(  ZDZQ2I
?
>
=JQ  FNADZ0J0=H8 ^1;$J3XHJ2Z>8LHC<>(+HLH[[LHZ*8 Z/LH[
LHZ)LHZ+LHZ,J2[LHZ-HH8AZ3R/+
: 8N*< 	38N)K;Z.8J+^-R-J0?HJ.9DJ.J,^-;VJ2[18.3NWSH(F 04?\%*Y;??ARQPA$GRHZ <B,F>>G2A<<JF2J%LU",)X)2LIJYC2C-EB2A2B,
D02A2B,$D=P%2A,%P)2I,)2A2B,1DL2A2B,6DA2A2B,;D[F>2J%LI,)X)2LIJYC2C-EBGYJOPQRB(?1= HB?YIJKU?UJ=FZK(FBDD?:?F$?<=AGIUF1LAKLB0 B>">&G8???0/G <%E DHGD,=?=DP2A2A2A2A2I2I2I2I2I2I2I2A2A2A2A2A2I2I2A2I2A2A2A2A2A2A2I2I2I2I2A2A2I2I2A2A2I2I2I2I2IA?X)N-X7L7XGLG

2LH]Z**)X)N.X7L7XG2LH\ZV2ILG8

2L2I*IX)N/X7L7X-L-Z(2LH]Z*P-L-

8P78H),72-7X)2LH\X-OIKH-\7P7H[8A\7*HX)OJKL7K9Z*P7L7X7**F?[ X[L[BKNZ(J(KGZ*2CN([[N*<(+]X7/K2J	HGAX%K!!E2J	HH2J	NA+<[:K,,%:9F8FA52I2J	NBP)K-YRK:ZN: YOK YP+7JF!EQO*X%RBL?<H)CRN: JMYNJ[YOIP=H*&:QNMNC<9DIP8F8FYPMN+U]N9P*!ZFJ)!ER;QT*;%Q"L)CR3WS3S&*-)C*;+S+PJF8F
FZFJFC<MM]MJF8F8FC<MS]SJ/Z;QS+UISYMQSJF]SP))CK
YTJ2YSJ/Z;/W9?HH>2J&LCP)K%Z3W[%O.+5E-2J&LDP)YQ[32J&LK)<L SYNTKL4[ +,KDNDEP
M^HXLSJ;XGVLTL
AZIJHI[7\L6<;]3^^
H 46KN)O-L%H2C7"H<E2<3:1PNFPQP2RQW? 
&YP)[(	LINKE INTERVALLGRENZE:	,F10.3)(	RECHTE INTERVALLGRENZE:	,F10.3)8 [A;F;F;F>HJ [DB2AK>2AJ* [BC2AJQ [BC2I>HA$;F [DB2AK>2AJ; [BC2AJT [BC2I>HCH;F [BD2AJQ+?0&:H<A8 [BE2AJT2IO> [F?H*K/=;F [BD2AJ	 [G [BH2AJK;F [BD2AJ	 [BH2AJH;F [BD2AJH [BH2AJE;F [BD2AJK [B
2AJB;F: 
<2AW<O<8!K;?H/:;F [BI2AJ [BH2AJZ [BD2AJQ [BE2AJT [BH2AJ] [BD2AJZ [BJ2AJ] [BD2AJQ [BH2AJW;F [BK2AJW [BH2AJN;F [BD2AJN [BE2AJB2IO> [F?(/9+?NHNO?JKTP8 [BD2AJN [BH2AJB;F [BD2AJN [BE2AJE2IO> [F?*
 [BD2AJN [BH2AJE>HA8/=;F [BD2AJQ [BE2AJT [BH2AJZ [BD2AJ$ [BJ2AJZ [BH2IB;F [BD2AJB [BE2AJE [BH2AJZ [BD2AJ$ [BJ2AJZ [BH2IBC;F [BD2AJQ [BE2AJ!2IO> [F?(: 
< [BD2AJT [BE2AJ!2IO> [F?: G<>(/;;F+?8JC?<(PPJ L4P8 [BD2AJQ [G [BH2AJW;F [BL2AJW;F;F [BD2AJE [BE2AJ!2IO> [F?(: 
= [BD2AJB [BE2AJ!2IO> [F?: G=>(+B;F [BD2AJE [G [BH2AJW;F [BM2AJW;F;F [N;F [BK2AJQ [BH2AJN;F [FO2AQ<2AJN2AQ;;F: 
:2AW:O:8!K9?H/8;F [BI2AJ [BH2AJZ [BD2AJT [BE2AJQ [BH2AJ]+?66R<O?JAJ P8 [BD2AJZ [BJ2AJ] [BD2AJQ [BH2AJW;F [BK2AJW [BH2AJN;F [BD2AJN [BE2AJE [BP2IBC [BH2AJZ [BQ2AJZ
?;F [FO2AJ2AJA2AS>>HB8/=;F [N;F [FO2AS>2AS>2AS<;F [R;F [RXPH.> +WIZ%?HP*FHSI^<(+ I[XS*<H.> +%IZ%?%1*.IW%?P \S%1.\SI[XH%1IV%?LH<(-U%?+3.%2!4%$ZAQZJA;F?XACHSK?XGJLZTKYXHNM2A\HRMPG*T;F;F;F;F [BS2AUZ [BP2IBC [BH2ATE [BQ2ATEZC;F [N;F [FO2AU>2ATC2AU=;F: ZDRDJD8
K<?H+P;F [FO2ATD2ATC2AU>;F*?;F [N;F  M;F [RUYL%2AX%H%8F8F8FC;< K:X&.
K9[3S2+-S3+-/*?8	9S8+4/%?8MOO?A?>;F?YACHSK?XGJLZTKYXHNM2A\HRMPG*T;F;F;F;F [BS2AWZ [BP2IB [BH2AVE [BQ2AVEZC;F [N;F [FO2AVC2AW>2AW=;F: ZDRDJD8!K<?H+P;F [FO2AVC2AVD2AW>;F*?;F [N;F  L;F [RWYXY:AX+%4K79IX<P+3X[X+HYA^> -"HY9F8DH[XY+!:%(HY/]=H]	6A]UEO?A?>;F?FUNK
K?XGJGZOJ/XHNH2A\HRHPG*O;F;F;FJ0Z
J1Z  [BT2I [BH2AX;F [BD2AX  K;F [RX/NT-9:%3? WRONG VERSION OF CCL-9[S%.[HH"> /FKS0&0!+O:/FCCLSV%3? CCL.SV NOT FOUND-9%*B67-)O<K:?H/9K8	7%*"67-)/$]F\>["X7<9"6>GB?>ZJFZGK>ZH 7ZILGRJ2A^GRGRH*O 7ZDLG=H*->(*&2AO=>(*; [N*;2AO=> *; [W*;:0*	<
=
;
:
9
80,0-0*	<  O2AO;9! 7ZLG<P8!2A
78D
6 7ZLG2A
;O:9! 7ZBLG<P8!2A
5O68D
6 7ZBLG2A
:O79!O5>P+,O7
4O5
7O4
58AG6O3/22AO69HO1+?\&\\\3\2\4\1]D]C\0\/\5\.?:8Z32AN3Z!J4J)Z4N4ZZJ19HZ3J18 Z4R4<H/>J3J2Z3J39 J1>X*!<BJ18!J3Z3"5*O<B*
\$IE\	SO\*	!]Y0+*60.0Y.50^C=K<> .52C/B>SC-/E8 KC[C-/ISD-/O8 KD[D-/SSCO/YSDI/]8 KD[DE/!8 KD[DI/	KC0,KD0-/-2AO;
:+?C>ZGZF?=A?Z98K?2A
> 7]3LG2AW= 2ZG\GW<W>*CO; 7Z\G2AO: 7ZB\G2AO9 7ZD\G  U2AO8
<K7
> 7^^LGR
 2ZG\GW<W>*% 7ZLG2A
;O;0,	6 7ZBLG2A
:O:0-	6  V0*	6
9  N0)	68A
9  WYET IMPLEMENTED-9%<X(%J%4%:=F =  =S ?-8%3? BAD HEIGHT SPECIFIED-9%	\5?<ZF\.]D]CZG]4ZH?:2AW?RLRL<HR!:J!>(;XK>Z2JLK=Z3 [BY2A 2*- 8N5R52A.JGJ+Z4J,Z5*7G:AZ2Z)ZLJ4Z$"["XG8: LG9J8J8HZ!J"2A
<"[]"[V:AZ3
;KU
:  XOJ3R39HKVXG8LG<X+$8J8J8JC92A/W P%K8X**$&?,(2AT1FM0=XS	?	>"+?Q" ?R&?T"]?WB?X"-?Y"? "A"T2A
=	<8 Z
O=C;K:>(	9*	9	8*	9	?K7<(*K6	5*$	4*ASA: K+[+2AO3
ASA	<8!
A;VK+?H*O3[)OA[**	9WA+^;$KA[AS+*	2K)
3K*8!XS: 2AO3>(+\SA:A
ASA: 
A8 [+*-: KA[%2AO%
3*	<[%*PTP-J?=CDR(Y 31W(O	?Y(
.?8?/.] ),*!W	?	>O=
?
=: Z[K<*	K;	:O??(;$K9	:O?=H8! [BZ2A *K8	: [[K8	:*:	?	>Z[O==: 2AO78!I=SO==+O8!	6K5	:O==(+H8 Z\I=8 
>*>K8	:R\<H+D2AW>*<2AO=8!<H:I== 	6R[* *I:K8	:*12AO4=/3Z\>H	:K2R\+Z:O4>(/SK9	:/SATIONCFCICLCESCR /%+O.-E%0-(OE?;+P*, %<HO?8 [N[K [F8 [L8 2A
>:SN<H*7	=	<& ?R&2? &M?U&M?S&K?;&6 O[M [BP2A!/ [BH2A!,KM [\ [BD2A!,SK*MSL.
[K*M: [MSL*<I=<HKK8 	;2IO:<(+H2AW>K92I
:SM+]/88 2AW>+\[K+Y [BP2A!/SK+U+]	; [B]2AA>/7CLCAB8CACLCAB7B8CICNCICTCOCSB8CO$ 0E P/Z,*(8+O%	?2AO>>(*HK="O*"8:*	?	<"O*KK;=HK:K92AO8 [^.O"
I?>(	7.Y2AO>> *-:J2> **"8*$Z22A.
K6"OK5"O.
R2K=C42A.8:J2> *4;Z2AO8 [^C3K2<(*3K19K:<P*9*4.>2IL^9F9DH*8H8X8H\^2A/M2IL^9D9DH*8H8X\^2A/Y:%3? BAD VERSION LETTER>-?3A???J?M, !B A? !W  2.W	?/> [BS2AA>[O[P2IO=<(+M=*RK<SO
=:2IO=K;?*^ [BP2A!/SP*RQ [BH2A!,K:2I
=2AO9K8>(KP8!I==8 	7 [BD2A!,Q2IO=8D?H+IO=9H
=O68H
6O58H
5O=C4O=K3
=*52IO=C2
=2A.2IO=K;?H %<H/Q;$	7: KP[P+RL WIDTH-9CBCLCOCCCKSA>H?6> J??<4,GH?<RQ/Z?: )PD/4 P&. [FR)*HRL  CI?J(*XG> *[: Z)JKZS8NLY>RLNLY?2A.RL;X 7,KDG9F8TZ(;(DG8!RL*P[DKDK?9K><X*>R*:2AN*R*<(*?KD>(*>R**3[D2AN*Z*KD.*8![D*2IO=XUO<XTO;C:XSHS
;**2IO=HU
=8DO<HT
<8DO;HS
;O;9H8JC:K9	8SD+H/E2IO=9D
=O<8D
<O;8D
;2A/*(O0OPQRJ?FHSY=2AO?<(.	> R?((?70&?8(K?:$"?;$A??.- R2AW=.W
?.HS<(:A2A.]"WI?>(	<O;> R.	:I=8![Y"*>OLG<X*98J8J8JC9	8SY*2*,	7[ZOKZ<X+I8A8F8F8F<HLGK6\GSY*>*,I>[WI=KY9HI?XG8/O[Y+! [BJ2A!/SY+]2A/Z:2AO58 [Y+-K4	8SY++	:*C: %</,*%? (8(O?, 2(Y"
,* )I=8 2A
?8 Z=8 2A
>XS2AW?<H*[	=	<0Y? 0J?U0J?S0G MW*JHSR=/;2AW>8! 7A>\G:	:	9*J<XUK8Z=
> 7A>LG=*58!2AW> [BZ2A *XS [[!*2A\U8 HUXUR=HS< *5I=2A
7I=8 J=K6	5PU2ALU=H*$K4	3+OXTHS9FHS8DHTXS2A/W%?M>ZV%>I=XSJV]>/]%3? OLD BASIC-9TH(O0%SD%?<.,	O,*(8+O	NOIOERGXGHG8F8F8DBJUZRJJ0\KD>(0Y8 [R.V5T2&4*4L2-213L4A4=5V5V5V5V5V5V5V0Q*FHG0V:  ^0Y*F;Z*FSC*=KB0&0Y*5BJ0\KD> 0Z0L0I*F[C0N*+C^==7(BMAB 5ZKJ>(+VSJ+]KF*+0Y+X
Z6:*F69+%KJ8![KKJKK9HKG2I	EKH*+6Y+S6Z9HKI2A	E[KKJ8!9HKGZR2IKK<X+:8F8F8F<HNR^R: KJ[J+%C?2ANW>(+V2B2A&X+VB  ^2ANY>(+V2BHGB2A&Z+V*JARFFAQF)GK?0&660Z0V0L [F2A^W^Y  A61/>HGR<*6K=9A8A<P*89DK?66K<>(8 Z<*J??JI0\XG0ZHGK;> MHGK:> +K;&MHG*JHG0!+O0&:/MM*J [BY2A2AQRST
VWXYZC G]BPO3456789:=LE?^
M*+,-./012ADJI[<F!"$%&	();N\HK>=3=6565N2FBJ6A???? ERROR AT LOC GG>JKZP8NLZXRL:0NLXHRL8["LH8D<XS"9HZALHZBLHZPLHZXJ[	?2AO8J8J8JQOQS*)JP8J8JKK>[JX8F8DZXJXKS*9K=XG	<;&	<K">(+^  Y8DBJJTQ/KC;<(*3K:=HK9K8 [^/QG [
2C.MG0!+$  
[O<X+08J8J8JC32A/(?H "X"XB A? ?5MBM?<8<H*3<H*WZC2IO?K>> *2SE[8??3:A2C.=> *2O=8A[O2B2A	P*XW*2J5XOKZXN2ALO<(**ZN\N*"[9L?22C.=;  YZA2A.856A6B7"6P6X8"8>8/2J$DBI?: 2A,H8QDIAGSV$DJX>G,FXA9R: 2AO[S[XO: XNO[S[[-2ALO2A\NS-+&/[8R	.\RS<B"GC8]<B2C0"/=CA9>	,>Z&UM51\)8
& FVOTQDP5/5UUUUPLPNRG;TPFRG;TOT76L OE<KW!O^R^WPO&5OXSO4QL"O=UUMOPLEZ 7:1LG[R2 7:1LG[AR2 [BD2I2IO>?H+M [BE2A:YR8+B [BD2A:Y: JZ2IO>?H+MJ8J?+" [G [BD2A:YK=8:\: J8J>X+5 [BH2A:AK<2I
> [BJ2A:A  8![7+?PLGP8 [BH2A:A [BD2A:A [BP2A:A [BH2A<0 2;8LGW?ZX [BD2A:D2AW>*) [BP2A:AO=8J>P*& [G 2;8,G [BP2A<0JXK<*TEJ3Z;J4Z<:A*=E2A
= 7<;LG[KR< 7<;LG[LR< [BD2I2IO;?H+X [BE2A:VW=8+M [BD2A:V: O=
=2IO;?H+X2AO=8J?+. [G [BD2A:VK:	?:D  TCHH$SHS(	H-TKFPC:;7;8A

Note: Lines longer than 256 characters were wrapped



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search