File PLSTR.FT (FORTRAN source file)

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

i~}b|b{izbkm~m-o}y)~Hd.n~}&x&{w&k~Rm_o,ZynHJni}&v&{u&k~Rm_oFZynH8Jnt2HWzh_" f .~bzi| ?d{1r35"|UuwSR_|X
 QI i~}b|b{izbkm~m-o}y)~Hd.xk`Ef'F" 7z`Ffn &*@.m &o &R.SRbS.RRb t," PzJ;Ii;Y_pB mFJ /,;k@pbGZiY7<&siqdi pz /p+"|{+UizKdy0  yfI S(ROTATE*.0174533) DY= 1.5*WIDTH*SIN(ROTATE*.0174533) CHPTR= 1 C 10 CALL CGET(STRING,CHPTR,VAL) IF (VAL.EQ.0) RETURN CALL PLCHAR(CX,CY,WIDTH,HEIGHT,ROTATE,VAL) CHPTR= CHPTR+1 CX= CX+DX CY= CY+DY GOTO 10 END
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