Project state from simon
This commit is contained in:
312
TPicSim Testprogramme/TPicSim10.src
Normal file
312
TPicSim Testprogramme/TPicSim10.src
Normal file
@@ -0,0 +1,312 @@
|
||||
;TPicSim10
|
||||
;Programm zum Test des 16F84-Simulators.
|
||||
;Es wird die richtige Funktionsweise von PCL und PCLATH am Beispiel
|
||||
;eines Tabellenzugriffs getestet
|
||||
;(c) St. Lehmann
|
||||
;19.04.2014
|
||||
|
||||
|
||||
;Definition einiger Symbole
|
||||
indirect equ 0
|
||||
pcl equ 02h
|
||||
status equ 03h
|
||||
fsr equ 04h
|
||||
ra equ 05h
|
||||
rb equ 06h
|
||||
pclath equ 0ah
|
||||
intcon equ 0bh
|
||||
|
||||
;Definition des Prozessors
|
||||
device 16F84
|
||||
;Festlegen des Codebeginns
|
||||
org 0
|
||||
start
|
||||
movlw 0 ;Index f?r Tabellenzugriff in 0FH
|
||||
movwf 0fh
|
||||
movlw 5 ;insgesamt 5 Tabellenzugriffe
|
||||
movwf 0eh
|
||||
movlw 10h ;Ergebnis wird ab 10H abgespeichert
|
||||
movwf fsr
|
||||
loop
|
||||
movlw 1 ;PCLATH setzen, damit auf den Bereich 256-511 zugegriffen werden kann
|
||||
movwf pclath
|
||||
movf 0fh,w
|
||||
call tabelle
|
||||
movwf indirect
|
||||
incf fsr
|
||||
incf 0fh
|
||||
decfsz 0eh
|
||||
goto loop
|
||||
clrf pclath
|
||||
movf 0fh,w
|
||||
call tabelle ;Fehler, der ADDWF PCL kommt nicht in die Tabelle. Grund: in W steht 5
|
||||
;im PC 109 bzw. nach dem Fetch 10A. Zu diesem Wert wird 5 addiert und
|
||||
;die oberen Bits auf 0 gesetzt (PCLATH=0). Damit steht im PC der Wert
|
||||
;0Fh. Dorthin springt der PIC durch den ADDWF-Befehl. Hier verweilt
|
||||
;das Programm w?hrend der Stack immer weiter w?chst.
|
||||
|
||||
|
||||
ende
|
||||
goto ende ;Endlosschleife, verhindert Nirwana
|
||||
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
Tabelle
|
||||
addwf pcl
|
||||
retlw 60h
|
||||
retlw 61h
|
||||
retlw 62h
|
||||
retlw 63h
|
||||
retlw 64h
|
||||
retlw 65h
|
||||
retlw 66h
|
||||
retlw 67h
|
||||
retlw 68h
|
||||
retlw 69h
|
||||
retlw 6Ah
|
||||
|
||||
|
||||
Reference in New Issue
Block a user