+:last update 2/17/91W:SKT200.BA (c)89,90,91 by R.H.Pigfordx :min. size, uses GRF200.CO"Wait...":525:260A$:A$""20:D1#A$(A$"a"͊A$"z"A$((A$)223)-A$(32)D1D:1602A$(85)XX1:160/7A$(1)XX12:160H<A$(79)XX1:160aAA$(6)XX12:160zFA$(56)YY1:160KA$(20)YY16:160PA$(75)YY1:160ƤUA$(2)YY16:160ZA$(55)XX1:YY1:160_A$(57)XX1:YY1:160#dA$(74)XX1:YY1:160BiA$(76)XX1:YY1:160YnA$(17)X0:160rsA$(18)X239:160xA$(23)Y0:160}A$(26)Y127:160¥A$"T"A$"t"Ͳ1000,2:190ҥA$"D"495᥌FD1͌515A$(4)Ͳ15000,2:FD0 A$"/"245A$(27)310+X0X0<X239X239IY0Y0ZY127Y127rD1ʹ(X,Y):(X,Y)| 35 C(X6):R(Y8):L(R40)CL1LL$:L$""200ԦL$(13)Ͳ5000,2:35L$(8)230L639L639:225LL1:LL1LL1#@L," ";:2002L639200I@L,L$;:LL1:200R200[ GFl(PF)0410u 35SI$"GRF200":600:100,GF SI$"GRF200":E$(27):600:530@125," "E$"pENTER"E$"q key to continue or..." @205," "E$"pQ"E$"quit"(20: A$"Q"A$"q"350;"A$(13)285Q'305:MSI$:600d,E$(27): 310Ĩ1::"Could NOT loadm "E$"p GRF200.CO "E$"q!":"Hit <"E$"pANY"E$"q> key to BAILOUT!";:20:Ѩ6E$;"W";;:535:@40,"uit"@@80,"ew Sketch":@95,"dit EXIST.CO file."ZE@161,E$"p/"E$"q Screen SAVE + Multiple PRINT Functs."J@201,E$"pT"E$"q Type TEXT at dot then "E$"pENTER"E$"q"۩O@241,E$"pD"E$"q Set 1st dot, "E$"pD"E$"q DRAW LINE to 2nd dot."T@281,E$"pESC"E$"q Erase picture and return here.";UYA$"":20:A("QqNnEe",A$):A1A6345:(A1)2350,355,360^HM256(61748)(61747):256,HM:: or CLEAR256,MAXRAM:MENUcE$;"V";: 25hE$;"V";MmSI$"":::"Need 3840 bytes for new PIX.CO files.":"Have"(0)"now.":"Enter your existing PIX.CO ":"filename (w/o ext.).":SI$:(SI$)0ͱ:310frL(SI$):L6ͱ:310}wN$SI$:465:SI$N$|E$(M):SI$SI$".CO"SI$" Correct? "ϫ20:A$"N"A$"n"365㫋700: NF1310 FZ,,DS 30:"<1> Save Buffer to RAM File."D"<2> Return to EDITING Sketch."s"<3> Go to Main MENU (lose this sketch)."20:A(A$):A1A3ͱ:425:A435,430,310 FZ,,BS:E$;"V";:30::"Free RAM = "(0):"Save Sketch File";:SN$:N$SN$:465SN$A$:SN$".CO";C" Correct? ":20:A$"N"A$"n"435rSX$SN$:T0:T(SX$,"."):TSN$(SX$,T1) 265MSN$,BS,BE1,0A$"":B$"" W1(N$):B$(N$,W,1)̭B(B$)B96 B122 B$((B$) 223)A$A$B$W:N$A$:3FD0X1X:Y1Y:FD1:1047,2:35AX2X:Y2YqD1͒(X1,Y1)(X2,Y2),1:(X1,Y1)(X2,Y2),0FD0:FB0:1760,2:35Z0͵(X1,Y1):(X1,Y1)Z1Z: HM:HH(HM256): 61748,HH:HLHM(256HH): 61747,HL::behind F4(@41,"Newark, DEL. Uses Himem"GF"to"BE;v@0," "E$"pSKT200.BA"E$"q & "E$"pGRF200.CO"E$"q "(171)"1989 R.H.Pigford"|X700] NF1̀bGF(DS3)256(DS4)ȯgPF(DS5)256(DS6)lBS(DS7)256(DS8)qBE(DS9)256(DS10)vFZ(DS11)256(DS12)"{2SS$" "]SP$SI$:T(SP$,"."):TSP$(SP$,T1)SP$(SP$SS$,6):D621336262811:T(D)T160(D3)(SP$)́I26:(D2I)((SP$,I))͂I:DS256(D2)(D1):SP$SP$".CO":NF0:7252D:SP$SP$".CO":SP$" NOT FOUND!";::T1300:T:NF1:730>DSDS6D