Iterators: Difference between revisions

Content added Content deleted

Inline

@@ Line 27: / Line 27: @@
 .loop:
      LEA Days_Of_The_Week,A0
+     LEA Colors,A1
      MOVE.W D1,D2
      LSL.W #2,D2
      MOVEA.L (A0,D2),A3
      JSR PrintString          ;unimplemented hardware-dependent printing routine
+     MOVEA.L (A1,D2),A3
+     JSR PrintString
      ADDQ.W #1,D1
      DBRA D7,.loop
@@ Line 36: / Line 39: @@
 Part2:
      LEA Days_Of_The_Week,A0
+     LEA Colors,A1
      MOVEA.L (A0),A3
      JSR PrintString
@@ Line 41: / Line 45: @@
      JSR PrintString
      MOVEA.L (16,A0),A3
+     JSR PrintString
+     MOVEA.L (A1),A3
+     JSR PrintString
+     MOVEA.L (12,A1),A3
+     JSR PrintString
+     MOVEA.L (16,A1),A3
      JSR PrintString
 Part3:
      LEA Days_Of_The_Week,A0
+     LEA Colors,A1
      MOVEA.L (24,A0),A3
      JSR PrintString
@@ Line 50: / Line 61: @@
      JSR PrintString
      MOVEA.L (8,A0),A3
+     JSR PrintString
+     MOVEA.L (20,A1),A3
+     JSR PrintString
+     MOVEA.L (8,A1),A3
+     JSR PrintString
+     MOVEA.L (4,A1),A3
      JSR PrintString
@@ Line 78: / Line 95: @@
 Saturday:
     DC.B "Saturday",0
-    EVEN</lang>
+    EVEN
+Colors:
+    DC.L Red,Orange,Yellow,Green,Blue,Purple
+Red:
+    DC.B "Red",0
+    even
+Orange:
+    DC.B "Orange",0
+    even
+Yellow:
+    DC.B "Yellow",0
+    even
+Green:
+    dc.b "Green",0
+    even
+Blue:
+    dc.b "Blue",0
+    even
+Purple:
+    dc.b "Purple",0
+    even</lang>
 =={{header|BASIC256}}==