prog8/examples/test.p8

41 lines
805 B
Plaintext
Raw Normal View History

%import test_stack
%import textio
2021-01-10 04:04:56 +00:00
%import diskio
%import string
%zeropage basicsafe
2020-12-08 00:02:38 +00:00
%option no_sysinit
main {
sub start() {
2021-01-10 14:15:00 +00:00
str s1 = "12345 abcdef..uvwxyz ()!@#$%;:&*()-=[]<>\xff\xfa\xeb\xc0\n"
str s2 = "12345 ABCDEF..UVWXYZ ()!@#$%;:&*()-=[]<>\xff\xfa\xeb\xc0\n"
str s3 = "12345 \x61\x62\x63\x64\x65\x66..\x75\x76\x77\x78\x79\x7a ()!@#$%;:&*()-=[]<>\xff\xfa\xeb\xc0\n"
2021-01-08 21:43:01 +00:00
2021-01-10 14:15:00 +00:00
txt.lowercase()
2021-01-10 14:22:21 +00:00
txt.print(s1)
txt.print(s2)
txt.print(s3)
string.lower(s1)
string.lower(s2)
string.lower(s3)
txt.print(s1)
txt.print(s2)
txt.print(s3)
string.upper(s1)
string.upper(s2)
string.upper(s3)
2021-01-10 14:15:00 +00:00
txt.print(s1)
txt.print(s2)
txt.print(s3)
2021-01-08 15:56:17 +00:00
txt.nl()
2021-01-10 14:15:00 +00:00
}
2021-01-10 04:04:56 +00:00
2020-08-27 17:47:50 +00:00
}