1 REM NTHIERRY CREE LES PLUS BEAUX DESSINS ET BROUILLE COMME A PLAISIR LES BITS.

10 HGR:POKE-16302,0:HCOLOR=7:FOR T=0TO60STEP.314:HPLOTCOS(T)*2*T+140,GTOCOS(T)*T+140,G:G=G+1:NEXTT:FORT=125TO155:HPLOT140,0TOT,191:NEXTT:FORT=0TO 191STEP3:HPLOTO,TTO279,T:NEXTT:FORT=0TO279STEP3:HPLOTT,0TO T,191:NEXT
20 FOR T=0TO120STEP4:HPLOT0,191TOT,0:HPLOT 279,191 TO 159+T,0:NEXT:POKE232,0:POKE233,3:POKE768,1:POKE770,4:POKE771,0:FORT=0TO139:POKE772+T,5:NEXT:POKE912,0:POKE913,0:FORT=0TO191:XDRAW1AT0,T:XDRAW1AT140,T:NEXT:GOTO 20