[futurebasic] Re: Assembler Problem ?

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : February 1998 : Group Archive : Group : All Groups

From: Bill Sanford <bsanford@...>
Date: 06 Feb 98 15:31:53 -0600
sean sharkey wrote:
>Hello All,
>
>I've been trying to use the following bit of inline assembler code in
>one of my FB project. Problem is that I get an "unknow op-code error"
>for the movea instruction. Anyone any thoughts ?
>
>
>            movea   (SCCRd).w,a0   ; best place to get address of SCC
RR0
>            move.b  aCtl(a0),d0      ; modem port--use bCtl for printer
port
>            btst    #3,d0                 ; GPi comes in DCD input--bit
3
>of SCC RR0
>            beq     @GPi0
>

Sean,

If you're trying to get the GPI status, I've figured this out in the
past.  Try this FN:

CLEAR LOCAL MODE
LOCAL FN CheckGPI(port)
  IF port = _printerPort THEN offset = 0 ELSE offset = 2
  serParams& = FN GESTALT(_"ser ")
  LONG IF serParams& AND 5                        ' modem and printer
port gpi available
    gpiState = (PEEK([_SCCrd]+offset) AND 8) <> 8
  END IF
END FN = gpiState

Happy Computing...

Bill Sanford
Sanford Communications