;
; Maciej 'YTM/Alliance' Witkowiak
; 29.1.00
.export gettrse
.importzp ptr4
gettrse:
sta ptr4
stx ptr4+1
ldy #1
lda (ptr4),y
tax
dey
rts