summaryrefslogtreecommitdiff
path: root/projects/06/rect/Rect.asm
diff options
context:
space:
mode:
Diffstat (limited to 'projects/06/rect/Rect.asm')
-rw-r--r--projects/06/rect/Rect.asm35
1 files changed, 35 insertions, 0 deletions
diff --git a/projects/06/rect/Rect.asm b/projects/06/rect/Rect.asm
new file mode 100644
index 0000000..6cbbaeb
--- /dev/null
+++ b/projects/06/rect/Rect.asm
@@ -0,0 +1,35 @@
+// This file is part of www.nand2tetris.org
+// and the book "The Elements of Computing Systems"
+// by Nisan and Schocken, MIT Press.
+// File name: projects/06/rect/Rect.asm
+
+// Draws a rectangle at the top-left corner of the screen.
+// The rectangle is 16 pixels wide and R0 pixels high.
+
+ @0
+ D=M
+ @INFINITE_LOOP
+ D;JLE
+ @counter
+ M=D
+ @SCREEN
+ D=A
+ @address
+ M=D
+(LOOP)
+ @address
+ A=M
+ M=-1
+ @address
+ D=M
+ @32
+ D=D+A
+ @address
+ M=D
+ @counter
+ MD=M-1
+ @LOOP
+ D;JGT
+(INFINITE_LOOP)
+ @INFINITE_LOOP
+ 0;JMP