Returning to basic do not run PRINT.(*solved*)

I was testing an attr routine. I launch it with pokeing it and randomize usr 60000.
When returns to basic, the problem is if I put a single print, then returns out of memory.
Not this if I put a print at.
I think the compiler affects to variables ch add or something.

  Code:

 Sub GetAddrTileFull(y, x, buf)
      Dim attraddr as UInteger
      attradr = AttrAddr(y, x)
      POKE buf,peek(attradr-32)
      POKE buf+1,peek(attradr-31)
      POKE buf+2,peek(attradr-30)
      POKE buf+3,peek(attradr+2)     
      POKE buf+4,peek(attradr+34)
      POKE buf+5,peek(attradr+34+32)
      POKE buf+6,peek(attradr+34+31)
      POKE buf+7,peek(attradr+34+30)
      POKE buf+8,peek(attradr+34+29)
      POKE buf+9,peek(attradr+2+29)
      POKE buf+10,peek(attradr-1)
      POKE buf+11,peek(attradr-33)
  End Sub
 Dim x,y as uinteger
 x=peek 23421
 y=peek 23422
 GetAddrTileFull(y,x,23400)


command line:
zxb attr1a.bas -T -B -a -Z -O1 --org 32768

Regards.

[boriel]

Please, copy & paste the code here using the "Code" button above. You can also send it to my by email.
I'm currently rather busy, and there is another bug fix pending.

The problem is using in basic.
The routine seems to go on.
The problem are the effects in print or others.
I posted the code above.

[boriel]

The compiler returns "Out of Screen" (not Out of Memory). This bug is due to PRINT coordinates changed by the PRINT routine system. I will fix it as soon as possible (still busy!)

[boriel]

Okay, seems to be fixed. Please download latest version (1.2.8s703) and tell me if it worked!

Okay, fixed now.