l Primer: 100 I-1 110 PRINT " " l20 HIRES 0,1 130 FOR X-0 TO 320 STEP 0.5 140: Ysl00-00S (X/33)x90 450: PIOT X,X,1 160: S-TEST (X,100) 170: IF S-l1 THEN GOSUB 1000 180: PLOT X,101,1 190 NEXT X 200 PAUSE 30 210 END | 1000 REM 4444444 PODPROGRAM ttttta4 1010 N(I)<INT X) 1020 IF N(I)<N(I-1) THEN RETURN O | 1030 PRINT " TOÄKA NE OBSTAJA NA X-"; N(I) 1040 IsIt1l | 1050 RETURN 5.9. LINE â Format: LINE ĹĄ,I,Xl, Ti, Namen: Risanje Ärte Delovanje: Z ukazom LINE riĹĄemo Ärte, katere zaÄetek oz- naÄujeta spremenljivki X in Y, konec pa spre- menljivki Xl in Yl. Spremenljivka T doloÄa bar- vo toÄke. Primer: 100 HIRES 1,6 110 FOR X-0 TO 320 STEP 8 120: M:-100/320xX 130: LINE 320-X,M,X,1004M1 140 NEXT X 150 GO TO 150 Le 5.10. CIROLE Format: CIROLE X,Y,X1,Y1,1 Namen: Risanje kroĹžnih oblik Delovanje: Z ukazom CIRCOLE riĹĄemo kroĹžne oblike na ekra- .o nu. Spremenljivki X in Y nam doloÄata srediĹĄÄe lika, Xl in Yl pa doloÄata radijusa. Vidimo torej, da nam ta ukaz v osnovi riĹĄe elipso. Äe Ĺželimo narisati kroĹžnico, potem moremo upoĹĄte- vati naslednje popravke radijev: HIRES grafika Xl < 1,15xY1 MULTI grafika Xl - 0,575xY1 TISKALNIK kl is JI] |Âť/.