Mercurial > hg > Members > kono > nitros9-code
changeset 3146:e84cb928b2ef
Use modified w1-w6 window definitions on CoCo3FPGA
They are all 80x24 type 2 on this platform.
| author | Bill Pierce <merlinious999@gmail.com> |
|---|---|
| date | Sat, 04 Feb 2017 18:33:07 +0100 |
| parents | 0c5b16b0b65d |
| children | 067978160b7e |
| files | level2/modules/w1.asm level2/modules/w2.asm level2/modules/w3.asm level2/modules/w4.asm level2/modules/w5.asm level2/modules/w6.asm |
| diffstat | 6 files changed, 48 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/level2/modules/w1.asm Sat Feb 04 18:33:07 2017 +0100 +++ b/level2/modules/w1.asm Sat Feb 04 18:33:07 2017 +0100 @@ -22,11 +22,19 @@ rev set $00 * Window descriptor definitions + IFNE CC3FPGA +szx set 80 number of columns for display +szy set 24 number for rows for display +sty set 2 window type +cpx set 0 x cursor position +cpy set 0 y cursor position + ELSE szx set 27 number of columns for display szy set 11 number for rows for display sty set 1 window type cpx set 0 x cursor position cpy set 0 y cursor position + ENDC IFNE ALTCOLOR prn1 set White. foreground color prn2 set Black. background color
--- a/level2/modules/w2.asm Sat Feb 04 18:33:07 2017 +0100 +++ b/level2/modules/w2.asm Sat Feb 04 18:33:07 2017 +0100 @@ -22,11 +22,19 @@ rev set $00 * Window descriptor definitions + IFNE CC3FPGA +szx set 80 number of columns for display +szy set 24 number for rows for display +sty set 2 window type +cpx set 0 x cursor position +cpy set 0 y cursor position + ELSE szx set 12 number of columns for display szy set 11 number for rows for display sty set $FF window type cpx set 28 x cursor position cpy set 0 y cursor position + ENDC IFNE ALTCOLOR prn1 set Blue. foreground color prn2 set Black. background color
--- a/level2/modules/w3.asm Sat Feb 04 18:33:07 2017 +0100 +++ b/level2/modules/w3.asm Sat Feb 04 18:33:07 2017 +0100 @@ -22,11 +22,19 @@ rev set $00 * Window descriptor definitions + IFNE CC3FPGA +szx set 80 number of columns for display +szy set 24 number for rows for display +sty set 2 window type +cpx set 0 x cursor position +cpy set 0 y cursor position + ELSE szx set 40 number of columns for display szy set 12 number for rows for display sty set $FF window type cpx set 0 x cursor position cpy set 12 y cursor position + ENDC IFNE ALTCOLOR prn1 set Green. foreground color prn2 set Black. background color
--- a/level2/modules/w4.asm Sat Feb 04 18:33:07 2017 +0100 +++ b/level2/modules/w4.asm Sat Feb 04 18:33:07 2017 +0100 @@ -22,11 +22,19 @@ rev set $00 * Window descriptor definitions + IFNE CC3FPGA +szx set 80 number of columns for display +szy set 24 number for rows for display +sty set 2 window type +cpx set 0 x cursor position +cpy set 0 y cursor position + ELSE szx set 60 number of columns for display szy set 11 number for rows for display sty set 2 window type cpx set 0 x cursor position cpy set 0 y cursor position + ENDC IFNE ALTCOLOR prn1 set Red. foreground color prn2 set Black. background color
--- a/level2/modules/w5.asm Sat Feb 04 18:33:07 2017 +0100 +++ b/level2/modules/w5.asm Sat Feb 04 18:33:07 2017 +0100 @@ -22,11 +22,19 @@ rev set $00 * Window descriptor definitions + IFNE CC3FPGA +szx set 80 number of columns for display +szy set 24 number for rows for display +sty set 2 window type +cpx set 0 x cursor position +cpy set 0 y cursor position + ELSE szx set 19 number of columns for display szy set 11 number for rows for display sty set $FF window type cpx set 61 x cursor position cpy set 0 y cursor position + ENDC IFNE ALTCOLOR prn1 set Yellow. foreground color prn2 set Black. background color
--- a/level2/modules/w6.asm Sat Feb 04 18:33:07 2017 +0100 +++ b/level2/modules/w6.asm Sat Feb 04 18:33:07 2017 +0100 @@ -22,11 +22,19 @@ rev set $00 * Window descriptor definitions + IFNE CC3FPGA +szx set 80 number of columns for display +szy set 24 number for rows for display +sty set 2 window type +cpx set 0 x cursor position +cpy set 0 y cursor position + ELSE szx set 80 number of columns for display szy set 12 number for rows for display sty set $FF window type cpx set 0 x cursor position cpy set 12 y cursor position + ENDC IFNE ALTCOLOR prn1 set Magenta. foreground color prn2 set Black. background color