send_gps.mac

来自「reading gps data from serial」· MAC 代码 · 共 58 行

	NOLIST
; PicBasic Pro Compiler 2.44, (c) 1998, 2003 microEngineering Labs, Inc. All Rights Reserved. 

LABEL?L macro Label
        RST?RP
    ifdef PM_USED
        LALL
Label
        XALL
    else
Label
    endif
    endm

END? macro
    local loop
loop    sleep
        L?GOTO  loop
    endm

GOTO?L macro Label
        L?GOTO  Label
    endm

PAUSE?C macro Cin
    if (high (Cin) == 0)
        MOVE?CA Cin
        L?CALL  PAUSE
    else
        MOVE?CB high (Cin), R1 + 1
        MOVE?CA low (Cin)
        L?CALL  PAUSEL
    endif
    endm
PAUSE_USED = 1

SEROUT2DPIN?T macro Regin, Bitin
        BIT?R1  Regin, Bitin
    endm

SEROUT2MODE?C macro Cin
        MOVE?CW Cin, R5
    endm

SEROUT2PACE?C macro Cin
        MOVE?CW Cin, R7
    endm

SEROUT2?C macro Cin
        MOVE?CA Cin
        L?CALL  SEROUT2
    endm
SEROUT2_USED = 1


	LIST