Added comments to rectangle prorgam

This commit is contained in:
Mattia Mascarello 2021-09-28 22:57:03 +02:00 committed by GitHub
parent d472caa320
commit bec53bad12
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -1,19 +1,38 @@
OUT I will draw a rectangle\n
#show welcome message
INT w
#initialize width
INT h
#initialize height
IN INT w l
#input height as an int
IN INT h h
#input width as an int
INT wr
#initialize width counter
INT hr
#initialize height counter
SET wr 0
#set width counter to 0
SET hr 0
# set height counter to 0
:wrc
#row label
:wf
#column label
OUT *
#put char
INC wr
#increment width counter
JL wf wr w
#loop until desired width
OUT \n
#put newline char
SET wr 0
# set width counter to 0
INC hr
#increment height counter
JL wrc hr h
#loop until desired height
END
#quit