This repository has been archived by the owner. It is now read-only.
Permalink
Branch: master
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
28 lines (21 sloc) 505 Bytes
org 00000h
start:
ld a, 055h ;; 01010101
out (0h), a ;; Address doesn't matter
ld d, 0
loop: ;; FOR d = 0 to 200 : NEXT
inc d
ld a, d
sub 200
jr c, loop
;; again but different
ld a, 0AAh ;; 10101010
out (0h), a ;; Address _still_ doesn't matter
ld d, 0
loop2: ;; FOR d = 0 to 200 : NEXT
inc d
ld a, d
sub 200
jr c, loop2
;; back to the start
jr start