Iterators: Difference between revisions

m
No edit summary
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 ⟶ 39:
Part2:
LEA Days_Of_The_Week,A0
LEA Colors,A1
MOVEA.L (A0),A3
JSR PrintString
Line 41 ⟶ 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 ⟶ 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 ⟶ 95:
Saturday:
DC.B "Saturday",0
EVEN</lang>
 
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}}==
1,489

edits