aboutsummaryrefslogtreecommitdiff
path: root/projects/06/rect
diff options
context:
space:
mode:
Diffstat (limited to 'projects/06/rect')
-rw-r--r--projects/06/rect/Rect.asm35
-rw-r--r--projects/06/rect/RectL.asm32
2 files changed, 67 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
diff --git a/projects/06/rect/RectL.asm b/projects/06/rect/RectL.asm
new file mode 100644
index 0000000..e97c09b
--- /dev/null
+++ b/projects/06/rect/RectL.asm
@@ -0,0 +1,32 @@
+// 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/RectL.asm
+
+// Symbol-less version of the Rect.asm program.
+
+@0
+D=M
+@23
+D;JLE
+@16
+M=D
+@16384
+D=A
+@17
+M=D
+@17
+A=M
+M=-1
+@17
+D=M
+@32
+D=D+A
+@17
+M=D
+@16
+MD=M-1
+@10
+D;JGT
+@23
+0;JMP