-----Original Message-----
From: John Cooper [mailto:robots@jpsc.co.uk]
Sent: Thursday, May 06, 1999 6:07 AM
To: Ralph Hempel
Subject: IR mode
> > Have you had any thoughts about IRMode() yet?
>
> Not yet. I've GOT to get MARKET going and then implement my changes for
> compacting the image.
I wonder if these will work?
;------------------------------------------------------------------------------
; IRMODE_HI ( -- )
M_CODE(9,``"IRMODE_HI"'',IRMODE_HI,_SLINK)
MOV.W rTOS,@-rDSP ; Save the TOS
MOV.W #0x1770,rTOS ; Set up the flag
MOV.W #0x3250,rA
JSR RCXcall1
MOV.W @rDSP+,rTOS ; Restore the TOS
M_NEXT()
;------------------------------------------------------------------------------
; IRMODE_LO ( -- )
M_CODE(9,``"IRMODE_LO"'',IRMODE_LO,_SLINK)
MOV.W rTOS,@-rDSP ; Save the TOS
MOV.W #0x1770,rTOS ; Set up the flag
MOV.W #0x3266,rA
JSR RCXcall1
MOV.W @rDSP+,rTOS ; Restore the TOS
M_NEXT()
;------------------------------------------------------------------------------
--
John Cooper, Wallington, UK
|
