mirror of
https://github.com/irmen/prog8.git
synced 2025-10-25 05:18:38 +00:00
add sorting module to symboldump, moved shared cbm textio routines to shared module
This commit is contained in:
@@ -16,26 +16,6 @@ const ubyte DEFAULT_HEIGHT = 25
|
||||
extsub $FFD2 = chrout(ubyte character @ A) ; for consistency. You can also use cbm.CHROUT directly ofcourse. Note: takes a PETSCII encoded character.
|
||||
|
||||
|
||||
sub clear_screen() {
|
||||
chrout(147)
|
||||
}
|
||||
|
||||
sub cls() {
|
||||
chrout(147)
|
||||
}
|
||||
|
||||
sub home() {
|
||||
chrout(19)
|
||||
}
|
||||
|
||||
sub nl() {
|
||||
chrout('\n')
|
||||
}
|
||||
|
||||
sub spc() {
|
||||
chrout(' ')
|
||||
}
|
||||
|
||||
sub bell() {
|
||||
chrout(7)
|
||||
}
|
||||
|
||||
@@ -15,25 +15,6 @@ const ubyte DEFAULT_HEIGHT = 25
|
||||
|
||||
extsub $FFD2 = chrout(ubyte character @ A) ; for consistency. You can also use cbm.CHROUT directly ofcourse. Note: takes a PETSCII encoded character.
|
||||
|
||||
sub clear_screen() {
|
||||
chrout(147)
|
||||
}
|
||||
|
||||
sub cls() {
|
||||
chrout(147)
|
||||
}
|
||||
|
||||
sub home() {
|
||||
chrout(19)
|
||||
}
|
||||
|
||||
sub nl() {
|
||||
chrout('\n')
|
||||
}
|
||||
|
||||
sub spc() {
|
||||
chrout(' ')
|
||||
}
|
||||
|
||||
sub bell() {
|
||||
; beep
|
||||
|
||||
@@ -17,26 +17,6 @@ const long VERA_TEXTMATRIX = $1b000
|
||||
extsub $FFD2 = chrout(ubyte character @ A) ; for consistency. You can also use cbm.CHROUT directly ofcourse. Note: takes a PETSCII encoded character.
|
||||
|
||||
|
||||
sub clear_screen() {
|
||||
chrout(147)
|
||||
}
|
||||
|
||||
sub cls() {
|
||||
chrout(147)
|
||||
}
|
||||
|
||||
sub home() {
|
||||
chrout(19)
|
||||
}
|
||||
|
||||
sub nl() {
|
||||
chrout('\n')
|
||||
}
|
||||
|
||||
sub spc() {
|
||||
chrout(' ')
|
||||
}
|
||||
|
||||
sub bell() {
|
||||
chrout(7)
|
||||
}
|
||||
|
||||
@@ -15,26 +15,6 @@ const ubyte DEFAULT_HEIGHT = 25
|
||||
extsub $FFD2 = chrout(ubyte character @ A) ; for consistency. You can also use cbm.CHROUT directly ofcourse. Note: takes a PETSCII encoded character.
|
||||
|
||||
|
||||
sub clear_screen() {
|
||||
chrout(147)
|
||||
}
|
||||
|
||||
sub cls() {
|
||||
chrout(147)
|
||||
}
|
||||
|
||||
sub home() {
|
||||
chrout(19)
|
||||
}
|
||||
|
||||
sub nl() {
|
||||
chrout('\n')
|
||||
}
|
||||
|
||||
sub spc() {
|
||||
chrout(' ')
|
||||
}
|
||||
|
||||
sub bell() {
|
||||
chrout(7)
|
||||
}
|
||||
|
||||
@@ -3,6 +3,27 @@ txt {
|
||||
|
||||
%option merge, no_symbol_prefixing, ignore_unused
|
||||
|
||||
sub clear_screen() {
|
||||
chrout(147)
|
||||
}
|
||||
|
||||
sub cls() {
|
||||
chrout(147)
|
||||
}
|
||||
|
||||
sub home() {
|
||||
chrout(19)
|
||||
}
|
||||
|
||||
sub nl() {
|
||||
chrout('\n')
|
||||
}
|
||||
|
||||
sub spc() {
|
||||
chrout(' ')
|
||||
}
|
||||
|
||||
|
||||
asmsub print (str text @ AY) clobbers(A,Y) {
|
||||
; ---- print zero terminated string, in PETSCII encoding, from A/Y
|
||||
; note: the compiler contains an optimization that will replace
|
||||
|
||||
@@ -9,6 +9,7 @@
|
||||
;;%import floats
|
||||
%import math
|
||||
%import prog8_lib
|
||||
%import sorting
|
||||
%import strings
|
||||
%import syslib
|
||||
%import test_stack
|
||||
|
||||
@@ -10,6 +10,7 @@
|
||||
%import graphics
|
||||
%import math
|
||||
%import prog8_lib
|
||||
%import sorting
|
||||
%import strings
|
||||
%import syslib
|
||||
%import test_stack
|
||||
|
||||
@@ -17,6 +17,7 @@
|
||||
%import palette
|
||||
%import prog8_lib
|
||||
%import psg
|
||||
%import sorting
|
||||
%import sprites
|
||||
%import strings
|
||||
%import syslib
|
||||
|
||||
@@ -7,6 +7,7 @@
|
||||
%import cx16logo
|
||||
%import math
|
||||
%import prog8_lib
|
||||
%import sorting
|
||||
%import strings
|
||||
%import syslib
|
||||
%import test_stack
|
||||
|
||||
@@ -10,6 +10,7 @@
|
||||
%import math
|
||||
%import monogfx
|
||||
%import prog8_lib
|
||||
%import sorting
|
||||
%import strings
|
||||
%import syslib
|
||||
%import test_stack
|
||||
|
||||
Reference in New Issue
Block a user