PIC_Simulator_Simon/TPicSim Testprogramme/TPicSim5.LST

51 lines
3.0 KiB
Plaintext
Raw Normal View History

00001 ;TPicSim5
00002 ;Programm zum Test des 16F84-Simulators.
00003 ;Es werden die Befehle BCF, BSF, BTFSC und BTFSS gepr<70>ft
00004 ;(c) St. Lehmann
00005 ;Ersterstellung: 23.03.2016
00006 ;
00007 list c=132 ;Zeilenl<6E>nge im LST auf 132 Zeichen setzen
00008
00009 ;Definition einiger Symbole
00010 ;zuerst Hardware-Register
00011 status equ 03h
00012 ra equ 05h
00013 rb equ 06h
00014
00015 ;f<>r den Benutzer frei verwendbare Register
00016 wert1 equ 0ch ;Variable Nr.1
00017 wert2 equ 0dh ;Variable Nr.2
00018 ergeb equ 0eh ;Variable Nr.3
00019
00020 ;Definition des Prozessors
00021 device 16F84
00022
00023 ;Festlegen des Codebeginns
00024 org 0
00025 loop
0000 3011 00026 movlw 11h ;in W steht nun 11h, DC=?, C=?, Z=?
0001 008C 00027 movwf wert1 ;diesen Wert abspeichern, DC=?, C=?, Z=?
0002 018D 00028 clrf wert2 ;W=11h, wert1=11h, wert2=00h, DC=?, C=?, Z=1
0003 178C 00029 bsf wert1,7 ;W=11h, wert1=91h, wert2=00h, DC=?, C=?, Z=1
0004 158C 00030 bsf wert1,3 ;W=11h, wert1=99h, wert2=00h, DC=?, C=?, Z=1
0005 120C 00031 bcf wert1,4 ;W=11h, wert1=89h, wert2=00h, DC=?, C=?, Z=1
0006 100C 00032 bcf wert1,0 ;W=11h, wert1=88h, wert2=00h, DC=?, C=?, Z=1
00033
0007 180C 00034 btfsc wert1,0
0008 0A8D 00035 incf wert2
0009 0A8D 00036 incf wert2
000A 198C 00037 btfsc wert1,3
000B 0A8D 00038 incf wert2
000C 0A8D 00039 incf wert2
000D 1D0C 00040 btfss wert1,2
000E 0A8D 00041 incf wert2
000F 0A8D 00042 incf wert2
0010 1F8C 00043 btfss wert1,7
0011 0A8D 00044 incf wert2
0012 038D 00045 decf wert2 ;in wert2 muss 04h stehen
00046
00047 ende
0013 2813 00048 goto ende ;Endlosschleife, verhindert Nirwana
00049
00050