Skip to content
Snippets Groups Projects
Commit 88024b72 authored by Peter Gerwinski's avatar Peter Gerwinski
Browse files

Beispiel-Programm: Redcode, 18.4.2023

parent b1167b8b
No related branches found
No related tags found
No related merge requests found
;name Cat Can
;author A. Kirchner, F. Uy
;assert 1
;
; Your basic two sweep methodical bomber.
; Fires SPL 0 and JMP -1 at every eight
; addresses, then erases the core with
; DAT bombs.
start mov trap2, < bomb
mov trap1, < bomb
sub # 6, bomb
jmn start, bomb ; trap loop
set mov # -12, bomb
kill mov bomb, @ bomb
djn kill, bomb ; kill loop
reset jmp set, 0
jmp set, 0
dat # 0, # 0 ; buffer
bomb dat # 0, # -1024
trap1 spl 0, 2
trap2 jmp -1, 1
end start
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment