10 GRAPHICS 2:SETCOLOR 2,0,0¢20 DIM A$(100),B$(100)¢30 OPEN #1,8,0,"P:"¢40 ? #6;" VLOZTE PAPIR A STLACTE start"¢50 IF PEEK(53279)<>6 THEN 50¢60 ? #6:? #6;" ⌠Θ≤δ∈⌡"¢70 FOR A=0 TO 9:A$=B$:READ A$¢80 ? #1;A$:LPRINT :LPRINT :NEXT A¢90 ? #6:? #6;" DEKUJI za ≡∩·∩≥∈∩≤⌠"¢100 DATA Mpismo ELITE¢110 DATA Ppismo PICA¢120 DATA W1rozsirene PISMOW0¢130 DATA -1podtrzene pismo-0¢140 DATA Ehorizontalni ZVYRAZNENIF¢150 DATA Gvertikalni ZVYRAZNENIH¢160 DATA horniS0INDEXYT¢170 DATA spodniS1INDEXYT¢180 DATA SIkomprimovane PISMO@¢190 DATA SIW1rozsirene Komprimovane PISMOW0@¢
