Hi Strahinja,
On 2021-12-25 11:04:05, you wrote to All:
RTS_Check
move.l 4,a6
move.l $2a(a6),a0
RTS_Check1
move.l 336(a0),d0 ; cmpi.w #$002,$0002(a0)
cmp.l #$0c680002,d0
bne RTS_CheckFALSE
clr.l d0
move.w 340(a0),d0
cmp.w #$0002,d0
bne RTS_CheckFALSE
move.w 342(a0),d0 ; bne.b $xxxxxx
cmp.w #$6610,d0
bne RTS_CheckFALSE
move.w 1278(a0),d0 ; jsr (a5)
cmp.w #$4e95,d0
bne RTS_CheckFALSE
RTS_CheckOK
move.w #$4e75,342(a0) ; put RTS (1)
move.w #$4e75,1278(a0) ; put RTS (2)
rts
RTS_CheckFALSE
rts
Wow, I haven't seen any 68K assembler in like 3 decades! ;-)
Bye, Wilfred.
--- FMail-lnx64 2.1.0.18-B20170815
* Origin: FMail development HQ (39:150/200)