;--------------------------------------------------------------
;  cp3f opcodes for cpu test purposes 
;     runs on cp3f-godil Hardware Board
;    14. Nov. 2021   B.K.
;--------------------------------------------------------------

;        processor cp3f


;        org 0x000            ; Programm Start Adresse
prog_start:
         lak    0             ; lade nibble 0 nach Akku (obere 4 Bit = 0)
         out    0             ; Ausgabe auf Port 0
         lak    0xF
         out    0 
progloop:
         lak    1             ; 
         out    7             ; Ausgabe auf Port 7
firstloop: 
         lal    0xD5          ; a delay
         adl    0x01
         jan    firstloop
 
         lak    0xF
         alf                 ; schiebe um 4 bit nach links 
         out    7
secondloop: 
         lal    0xE5          ; a delay
         adl    0x01
         jan    secondloop
 
         jmp    progloop
 
labeltest: jmp    0x3F6
         eol    55
         lar    3
         lay
       
;--------------------------------------------------------------
;  noch nicht supported
           ;org 0x80 
;indx1:     ddw 0x123456  ; 24-bit constants
;           dw 0x87654321

;parin      equ 0xf00000  ; simple input 
;parout     equ 0xf00004  ; simple output 
;--------------------------------------------------------------
; File: cp3f_testloop.asm
;--------------------------------------------------------------