DEFINT I:FOR I=0 TO 65535:POKE I,0:NEXT