Mercurial > hg > Members > kono > nitros9-code
comparison level2/modules/w3.asm @ 3138:2071c1c4b6c8
New ALTCOLOR flag for window descriptors 1-7 & term_win40/80
Allows building with more readable default colors.
author | Bill Pierce <merlinious999@gmail.com> |
---|---|
date | Sat, 04 Feb 2017 02:10:37 +0100 |
parents | b8c7b7fbf3c9 |
children | e84cb928b2ef |
comparison
equal
deleted
inserted
replaced
3137:8418259a032d | 3138:2071c1c4b6c8 |
---|---|
25 szx set 40 number of columns for display | 25 szx set 40 number of columns for display |
26 szy set 12 number for rows for display | 26 szy set 12 number for rows for display |
27 sty set $FF window type | 27 sty set $FF window type |
28 cpx set 0 x cursor position | 28 cpx set 0 x cursor position |
29 cpy set 12 y cursor position | 29 cpy set 12 y cursor position |
30 IFNE ALTCOLOR | |
31 prn1 set Green. foreground color | |
32 prn2 set Black. background color | |
33 prn3 set Black. border color | |
34 ELSE | |
30 prn1 set Black. foreground color | 35 prn1 set Black. foreground color |
31 prn2 set Cyan. background color | 36 prn2 set Cyan. background color |
32 prn3 set Blue. border color | 37 prn3 set Blue. border color |
38 ENDC | |
33 | 39 |
34 mod eom,name,tylg,atrv,mgrnam,drvnam | 40 mod eom,name,tylg,atrv,mgrnam,drvnam |
35 | 41 |
36 fcb READ.+WRITE. mode byte | 42 fcb READ.+WRITE. mode byte |
37 fcb HW.Page extended controller address | 43 fcb HW.Page extended controller address |