converting-basic // the above program in Basic // x = 0 // a = x // poke 1024+x,a: // a=1 // poke55296+x,a // x=x+1 // if x <> 256 then 110 // end