dos33fsprogs/basic/appleiibot/oval.bas

3 lines
263 B
QBasic

1FORI=0TO130:POKE885+I,4*PEEK(2125+I)-204+(PEEK(2256+I/3)-35)/4^(I-INT(I/3)*3):NEXT
2&"/@q<Gcdp[2X<U;3p\rSrY,[3U;_39YJr;S1E22]Tc3;Lq96qZrU,ge5g?\CTe:BS;=5U5Y2\mq`/Ee.[rEe3Kp\nJH(<ak`H(14)36/6879:,7:.8:49:89947725513FM3S+EV%'(_%&,RP\#+-O+KYME486:XH5`BOTD+\V>+5610