100 SYMBOL AFTER 0:POKE 0,(HIMEM+1)-INT((HIMEM+1)/256)*256:POKE 1,INT((HIMEM+1)/255)
100 SYMBOL AFTER 0:POKE 0,(HIMEM+1)-INT((HIMEM+1)/256)*256:POKE 1,INT((HIMEM+1)/256)