📄 gepe456.lst
字号:
MPASM 02.30 Released GEPE456.ASM 1-25-2001 12:25:31 PAGE 1
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
00001 ; CONVERTED TASM PIC16F877 C:\PIC\GEPE456.ASM TO MPASM C:\ASMCNV\GEPE456.ASM 01-22-2001 22:15:32
00002
00003 list p=16F877,r=dec
00004 ;GEPE456.ASM 07SEP00 - JOHN BECKER - EPE LCD GRAPH DEMO 2 (MAIN DEMOS)
00005
00006 #DEFINE PAGE0 BCF H'03',5;STATUS bit 5
00007 #DEFINE PAGE1 BSF H'03',5;STATUS bit 5
00008
00000000 00009 INDF EQU H'00' ;page 0, 1, 2, 3
00000001 00010 OPSHUN EQU H'01' ;page 1, 3
00000002 00011 PCL EQU H'02' ;page 0, 1, 2, 3
00000003 00012 STATUS EQU H'03' ;page 0, 1, 2, 3
00000004 00013 FSR EQU H'04' ;page 0, 1, 2, 3
00014
00000005 00015 PORTA EQU H'05' ;page 0
00000005 00016 TRISA EQU H'05' ;page 1
00000006 00017 PORTB EQU H'06' ;page 0, 2
00000006 00018 TRISB EQU H'06' ;page 1, 3
00000007 00019 PORTC EQU H'07' ;page 0
00000007 00020 TRISC EQU H'07' ;page 1
00000008 00021 PORTD EQU H'08' ;page 0
00000008 00022 TRISD EQU H'08' ;page 1
00000009 00023 PORTE EQU H'09' ;page 0
00000009 00024 TRISE EQU H'09' ;page 1
0000000B 00025 INTCON EQU H'0B' ;page 0, 1, 2, 3
0000000C 00026 EEDATA EQU H'0C' ;page 2
0000000C 00027 EECON1 EQU H'0C' ;page 3
0000000D 00028 EEADR EQU H'0D' ;page 2
00029
00000020 00030 LOOPB EQU H'20' ; general loop
00000021 00031 LOOPC EQU H'21' ; general loop
00000022 00032 LOOPD EQU H'22' ; general loop
00000023 00033 LOOPE EQU H'23' ; general loop
00000024 00034 STORE1 EQU H'24' ; temp store
00000025 00035 TEMPA EQU H'25' ; temp store
00000026 00036 CLKCNT EQU H'26' ; counter for PAUSE val
00000027 00037 ADRLSB EQU H'27' ; low address
00000028 00038 ADRMSB EQU H'28' ; high address
00000029 00039 ATTRIB EQU H'29' ; ATTRIBUTE value
0000002A 00040 BITVAL EQU H'2A' ; val of bit to be set/reset
0000002B 00041 RDBYTE EQU H'2B' ; byte read from screen
0000002C 00042 COUNT EQU H'2C' ; counter for BIRD loop, used also for waveform
0000002D 00043 COLUMN EQU H'2D' ; column length holder
0000002E 00044 QCKCOL EQU H'2E' ; quack bill column
0000002F 00045 PEAKLO EQU H'2F' ; waveform peak lo (demo 11)
00000030 00046 PEAKHI EQU H'30' ; waveform peak hi (demo 11)
00000031 00047 LOBIT EQU H'31' ; waveform section (demo 11)
00000032 00048 LOOPLO EQU H'32' ; waveform section (demo 11)
00049
00000034 00050 JOIN00 EQU H'34' ; 1st store for BIRD roll-over join (right-hand edge bit)
00051 ; extends to $50 for JOIN32, used also for waveforms
00052 ; (64 for scope style)
00053
MPASM 02.30 Released GEPE456.ASM 1-25-2001 12:25:31 PAGE 2
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
00054 ;........FIXED VALUES FOR COMMANDS
00055
00000040 00056 TXHOME EQU H'40' ; text home address command
00000041 00057 TXAREA EQU H'41' ; text area (columns) address command
00000042 00058 GRHOME EQU H'42' ; graphics home address command
00000043 00059 GRAREA EQU H'43' ; graphic area (columns) address command
000000B0 00060 AWRON EQU H'B0' ; autowrite on command
000000B2 00061 AWROFF EQU H'B2' ; autowrite off command
00000022 00062 OFFSET EQU H'22' ; offset command
00000024 00063 ADPSET EQU H'24' ; address set command
000000E0 00064 PEEK EQU H'E0' ; screen peek command
00000021 00065 CSRPOS EQU H'21' ; set cursor position ommand
00066
00067 ;........BIT VALUES
00068
00000000 00069 W EQU 0 ; working reg
00000001 00070 F EQU 1 ; file reg
00000002 00071 Z EQU 2 ; zero status
00000000 00072 C EQU 0 ; CARRY status
00000005 00073 RP0 EQU 5 ; STATUS bank reg
00000006 00074 RP1 EQU 6 ; STATUS bank reg
00000000 00075 RD EQU 0 ; EEPROM read flag
00000007 00076 EEPGD EQU 7 ; EECON1 reg
00000000 00077 FS EQU B'00000000' ;FS mode set by bit 5: 1 = 6x8, 0 = 8x8
00078 ;8x8 needed for EPE demos
00079
00080 ;..........
00081
0000 00082 ORG 0
0000 2805 00083 GOTO 5
00084
0005 00085 ORG 5
00086
0005 1283 00087 BCF STATUS,RP0
0006 1303 00088 BCF STATUS,RP1
0007 0185 00089 CLRF PORTA
0008 0186 00090 CLRF PORTB
0009 300F 00091 MOVLW B'00001111' ; FS low, RST low, CD CE RD WR high
000A 0087 00092 MOVWF PORTC
000B 0188 00093 CLRF PORTD
000C 0189 00094 CLRF PORTE
000D 1683 00095 PAGE1
000E 30FF 00096 MOVLW 255
000F 0085 00097 MOVWF TRISA ; PORTA as input
0010 0186 00098 CLRF TRISB ; PORTB as output
0011 3000 00099 MOVLW FS
0012 0087 00100 MOVWF TRISC ; PORTC as output GRAPHIC LCD control/FS
0013 0188 00101 CLRF TRISD ; PORTD as output GRAPHIC LCD D0-D7
0014 0189 00102 CLRF TRISE ; PORTE as output
0015 3086 00103 MOVLW B'10000110' ; pull-up Rs off (bit 7 hi), timer 1/25 sec
0016 0081 00104 MOVWF OPSHUN ; (for 3.2768MHz xtal)
0017 1283 00105 PAGE0
0018 301F 00106 MOVLW B'00011111' ; FS low, RST CD CE RD WR high
MPASM 02.30 Released GEPE456.ASM 1-25-2001 12:25:31 PAGE 3
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
0019 0087 00107 MOVWF PORTC
00108
001A 256D 00109 CALL PAUSIT
001B 28F0 00110 GOTO GRAPHIC
00111
001C 0782 00112 TABLE1 ADDWF PCL,F
001D 3447 00113 RETLW 'G'
001E 3452 00114 RETLW 'R'
001F 3441 00115 RETLW 'A'
0020 3450 00116 RETLW 'P'
0021 3448 00117 RETLW 'H'
0022 3449 00118 RETLW 'I'
0023 3443 00119 RETLW 'C'
0024 3420 00120 RETLW ' '
0025 344C 00121 RETLW 'L'
0026 3443 00122 RETLW 'C'
0027 3444 00123 RETLW 'D'
0028 3420 00124 RETLW ' '
0029 3444 00125 RETLW 'D'
002A 3445 00126 RETLW 'E'
002B 344D 00127 RETLW 'M'
002C 344F 00128 RETLW 'O'
00129
002D 3445 00130 RETLW 'E'
002E 3450 00131 RETLW 'P'
002F 3445 00132 RETLW 'E'
0030 3420 00133 RETLW ' '
0031 3453 00134 RETLW 'S'
0032 3448 00135 RETLW 'H'
0033 344F 00136 RETLW 'O'
0034 3457 00137 RETLW 'W'
0035 3453 00138 RETLW 'S'
0036 3420 00139 RETLW ' '
0037 3459 00140 RETLW 'Y'
0038 344F 00141 RETLW 'O'
0039 3455 00142 RETLW 'U'
003A 3420 00143 RETLW ' '
003B 3448 00144 RETLW 'H'
003C 344F 00145 RETLW 'O'
003D 3457 00146 RETLW 'W'
003E 3421 00147 RETLW '!'
00148
003F 3454 00149 RETLW 'T'
0040 3448 00150 RETLW 'H'
0041 3449 00151 RETLW 'I'
0042 3453 00152 RETLW 'S'
0043 3420 00153 RETLW ' '
0044 3449 00154 RETLW 'I'
0045 3453 00155 RETLW 'S'
0046 3420 00156 RETLW ' '
0047 3450 00157 RETLW 'P'
0048 3441 00158 RETLW 'A'
0049 3447 00159 RETLW 'G'
MPASM 02.30 Released GEPE456.ASM 1-25-2001 12:25:31 PAGE 4
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
004A 3445 00160 RETLW 'E'
004B 3420 00161 RETLW ' '
004C 3432 00162 RETLW '2'
00163
004D 3451 00164 RETLW 'Q'
004E 3455 00165 RETLW 'U'
004F 3441 00166 RETLW 'A'
0050 3443 00167 RETLW 'C'
0051 344B 00168 RETLW 'K'
00169
0052 0782 00170 AMPLIFIER ADDWF PCL,F
0053 3480 00171 RETLW H'80' ; amp top left + first slope down (1
00172
0054 3483 00173 RETLW H'83' ;amp input (2
0055 3486 00174 RETLW H'86' ;cap top
0056 3483 00175 RETLW H'83' ;amp input
0057 3483 00176 RETLW H'83' ;amp input
0058 3481 00177 RETLW H'81' ;amp left
0059 3482 00178 RETLW H'82' ;amp slope down
005A 3483 00179 RETLW H'83' ;amp output
005B 3486 00180 RETLW H'86' ;cap top
005C 3483 00181 RETLW H'83' ;amp output
00182
005D 348B 00183 RETLW H'8B' ;word IN (3
005E 3487 00184 RETLW H'87' ;cap bot
005F 3489 00185 RETLW H'89' ;resistor top
0060 3400 00186 RETLW H'00'
0061 3481 00187 RETLW H'81' ;amp left
0062 3484 00188 RETLW H'84' ;amp slope up
0063 3400 00189 RETLW H'00'
0064 3487 00190 RETLW H'87' ;cap bot
0065 348C 00191 RETLW H'8C' ;1st part OUT
0066 348D 00192 RETLW H'8D' ;2nd part OUT
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -