160 lines
2.8 KiB
Plaintext
160 lines
2.8 KiB
Plaintext
GCASM List File (GCBASIC 0.98.04 2018-10-20 (Windows 32 bit))
|
|
|
|
Symbols:
|
|
A EQU 0
|
|
ACCESS EQU 0
|
|
B EQU 1
|
|
BANKED EQU 1
|
|
BASPROGRAMEND EQU 34
|
|
BASPROGRAMSTART EQU 5
|
|
C EQU 0
|
|
DC EQU 1
|
|
DELAYTEMP EQU 12
|
|
DELAYTEMP2 EQU 13
|
|
DELAY_MS EQU 36
|
|
DIREZIONE EQU 16
|
|
DMS_INNER EQU 41
|
|
DMS_OUTER EQU 39
|
|
DMS_START EQU 37
|
|
EEADR EQU 9
|
|
EECON1 EQU 136
|
|
EECON2 EQU 137
|
|
EEDATA EQU 8
|
|
EEIE EQU 6
|
|
EEIF EQU 4
|
|
ELSE1_1 EQU 22
|
|
ENDIF1 EQU 29
|
|
ENDIF2 EQU 21
|
|
ENDIF3 EQU 29
|
|
F EQU 1
|
|
FSR EQU 4
|
|
GIE EQU 7
|
|
INDF EQU 0
|
|
INITSYS EQU 50
|
|
INTCON EQU 11
|
|
INTE EQU 4
|
|
INTEDG EQU 6
|
|
INTF EQU 1
|
|
IRP EQU 7
|
|
LOOP EQU 13
|
|
NOT_PD EQU 3
|
|
NOT_RBPU EQU 7
|
|
NOT_TO EQU 4
|
|
OPTION_REG EQU 129
|
|
PCL EQU 2
|
|
PCLATH EQU 10
|
|
PORTA EQU 5
|
|
PORTB EQU 6
|
|
PS0 EQU 0
|
|
PS1 EQU 1
|
|
PS2 EQU 2
|
|
PSA EQU 3
|
|
RBIE EQU 3
|
|
RBIF EQU 0
|
|
RD EQU 0
|
|
RP0 EQU 5
|
|
RP1 EQU 6
|
|
STARTUP EQU 8
|
|
STATUS EQU 3
|
|
SYSDOLOOP_E1 EQU 34
|
|
SYSDOLOOP_S1 EQU 13
|
|
SYSWAITTEMPMS EQU 14
|
|
SYSWAITTEMPMS_H EQU 15
|
|
T0CS EQU 5
|
|
T0IE EQU 5
|
|
T0IF EQU 2
|
|
T0SE EQU 4
|
|
TMR0 EQU 1
|
|
TRISA EQU 133
|
|
TRISB EQU 134
|
|
W EQU 0
|
|
WR EQU 1
|
|
WREN EQU 2
|
|
WRERR EQU 3
|
|
Z EQU 2
|
|
|
|
Code:
|
|
Loc Obj Code Original Assembly
|
|
|
|
|
|
|
|
|
|
|
|
|
|
000000 2805 GOTO BASPROGRAMSTART
|
|
|
|
000004 0009 RETFIE
|
|
|
|
|
|
|
|
BASPROGRAMSTART
|
|
000005 2032 CALL INITSYS
|
|
|
|
000000 1683 BANKSEL TRISB
|
|
000007 0186 CLRF TRISB
|
|
STARTUP
|
|
000008 3001 MOVLW 1
|
|
000000 1283 BANKSEL DIREZIONE
|
|
00000A 0090 MOVWF DIREZIONE
|
|
00000B 3001 MOVLW 1
|
|
00000C 0086 MOVWF PORTB
|
|
LOOP
|
|
SYSDOLOOP_S1
|
|
00000D 0310 DECF DIREZIONE,W
|
|
00000E 1D03 BTFSS STATUS, Z
|
|
00000F 2816 GOTO ELSE1_1
|
|
000010 0D86 RLF PORTB,F
|
|
000011 3040 MOVLW 64
|
|
000012 0206 SUBWF PORTB,W
|
|
000013 1803 BTFSC STATUS, C
|
|
000014 0190 CLRF DIREZIONE
|
|
ENDIF2
|
|
000015 281D GOTO ENDIF1
|
|
ELSE1_1
|
|
000016 0C86 RRF PORTB,F
|
|
000017 0806 MOVF PORTB,W
|
|
000018 3C01 SUBLW 1
|
|
000019 1C03 BTFSS STATUS, C
|
|
00001A 281D GOTO ENDIF3
|
|
00001B 3001 MOVLW 1
|
|
00001C 0090 MOVWF DIREZIONE
|
|
ENDIF3
|
|
ENDIF1
|
|
00001D 30FA MOVLW 250
|
|
00001E 008E MOVWF SYSWAITTEMPMS
|
|
00001F 018F CLRF SYSWAITTEMPMS_H
|
|
000020 2024 CALL DELAY_MS
|
|
000021 280D GOTO SYSDOLOOP_S1
|
|
SYSDOLOOP_E1
|
|
BASPROGRAMEND
|
|
000022 0063 SLEEP
|
|
000023 2822 GOTO BASPROGRAMEND
|
|
|
|
|
|
DELAY_MS
|
|
000024 0A8F INCF SYSWAITTEMPMS_H, F
|
|
DMS_START
|
|
000025 308E MOVLW 142
|
|
000026 008D MOVWF DELAYTEMP2
|
|
DMS_OUTER
|
|
000027 3001 MOVLW 1
|
|
000028 008C MOVWF DELAYTEMP
|
|
DMS_INNER
|
|
000029 0B8C DECFSZ DELAYTEMP, F
|
|
00002A 2829 GOTO DMS_INNER
|
|
00002B 0B8D DECFSZ DELAYTEMP2, F
|
|
00002C 2827 GOTO DMS_OUTER
|
|
00002D 0B8E DECFSZ SYSWAITTEMPMS, F
|
|
00002E 2825 GOTO DMS_START
|
|
00002F 0B8F DECFSZ SYSWAITTEMPMS_H, F
|
|
000030 2825 GOTO DMS_START
|
|
000031 0008 RETURN
|
|
|
|
|
|
INITSYS
|
|
000032 0185 CLRF PORTA
|
|
000033 0186 CLRF PORTB
|
|
000034 0008 RETURN
|
|
|
|
|