added txt.rvs_on() and txt.rvs_off(), added txt.color() support for virtual target

This commit is contained in:
Irmen de Jong
2025-08-24 13:29:29 +02:00
parent 8a717c74b9
commit 7b40eade44
7 changed files with 39 additions and 5 deletions

View File

@@ -1,6 +1,6 @@
Prog8 compiler v12.0-SNAPSHOT by Irmen de Jong (irmen@razorvine.net)
Prerelease version from git commit 06e16789 in branch master
Prerelease version from git commit 8a717c74 in branch master
This software is licensed under the GNU GPL 3.0, see https://www.gnu.org/licenses/gpl.html
Compiling program import-all-c128.p8
@@ -785,6 +785,8 @@ txt {
print_uwhex (uword value @AY, bool prefix @Pc) -> clobbers (A,X,Y)
print_w (word value @AY) -> clobbers (A,X,Y)
row (ubyte rownum @A) -> clobbers (A,X,Y)
rvs_off ()
rvs_on ()
scroll_down (bool alsocolors @Pc) -> clobbers (A,X)
scroll_left (bool alsocolors @Pc) -> clobbers (A,X,Y)
scroll_right (bool alsocolors @Pc) -> clobbers (A,X)

View File

@@ -1,6 +1,6 @@
Prog8 compiler v12.0-SNAPSHOT by Irmen de Jong (irmen@razorvine.net)
Prerelease version from git commit 06e16789 in branch master
Prerelease version from git commit 8a717c74 in branch master
This software is licensed under the GNU GPL 3.0, see https://www.gnu.org/licenses/gpl.html
Compiling program import-all-c64.p8
@@ -898,6 +898,8 @@ txt {
print_uwhex (uword value @AY, bool prefix @Pc) -> clobbers (A,X,Y)
print_w (word value @AY) -> clobbers (A,X,Y)
row (ubyte rownum @A) -> clobbers (A,X,Y)
rvs_off ()
rvs_on ()
scroll_down (bool alsocolors @Pc) -> clobbers (A,X)
scroll_left (bool alsocolors @Pc) -> clobbers (A,X,Y)
scroll_right (bool alsocolors @Pc) -> clobbers (A,X)

View File

@@ -1,6 +1,6 @@
Prog8 compiler v12.0-SNAPSHOT by Irmen de Jong (irmen@razorvine.net)
Prerelease version from git commit 06e16789 in branch master
Prerelease version from git commit 8a717c74 in branch master
This software is licensed under the GNU GPL 3.0, see https://www.gnu.org/licenses/gpl.html
Compiling program import-all-cx16.p8
@@ -1382,6 +1382,8 @@ txt {
print_uwhex (uword value @AY, bool prefix @Pc) -> clobbers (A,X,Y)
print_w (word value @AY) -> clobbers (A,X,Y)
row (ubyte rownum @A) -> clobbers (A,X,Y)
rvs_off ()
rvs_on ()
scroll_down () -> clobbers (A,X,Y)
scroll_left () -> clobbers (A,X,Y)
scroll_right () -> clobbers (A,X,Y)

View File

@@ -1,6 +1,6 @@
Prog8 compiler v12.0-SNAPSHOT by Irmen de Jong (irmen@razorvine.net)
Prerelease version from git commit 06e16789 in branch master
Prerelease version from git commit 8a717c74 in branch master
This software is licensed under the GNU GPL 3.0, see https://www.gnu.org/licenses/gpl.html
Compiling program import-all-pet32.p8
@@ -503,6 +503,8 @@ txt {
print_uwbin (uword value @AY, bool prefix @Pc) -> clobbers (A,X,Y)
print_uwhex (uword value @AY, bool prefix @Pc) -> clobbers (A,X,Y)
print_w (word value @AY) -> clobbers (A,X,Y)
rvs_off ()
rvs_on ()
scroll_down () -> clobbers (A,X)
scroll_left () -> clobbers (A,X,Y)
scroll_right () -> clobbers (A,X)

View File

@@ -1,6 +1,6 @@
Prog8 compiler v12.0-SNAPSHOT by Irmen de Jong (irmen@razorvine.net)
Prerelease version from git commit 06e16789 in branch master
Prerelease version from git commit 8a717c74 in branch master
This software is licensed under the GNU GPL 3.0, see https://www.gnu.org/licenses/gpl.html
Compiling program import-all-virtual.p8
@@ -526,6 +526,7 @@ txt {
chrout (ubyte char)
clear_screen ()
cls ()
color (ubyte txtcol)
column (ubyte col)
height () -> ubyte
home ()
@@ -548,6 +549,8 @@ txt {
print_uwbin (uword value, bool prefix)
print_uwhex (uword value, bool prefix)
print_w (word value)
rvs_off ()
rvs_on ()
setchr (ubyte col, ubyte row, ubyte char)
spc ()
uppercase ()