TI99 Environment

CALL_CHARSET

Syntax

CALL_CHARSET()

Description

The CHARSET function restores the standard ASCII character patterns and standard colors for characters 32 through 127 (The standard TI-99 characters). It also resets the patterns for sprites using the same characters, but not their colors. Custom characters 128 and up, and sprites using those characters are not affected.

Example Code

call_clear()
call_magnify(2)
randomize hitimer()
ti_print(1,"**** HELLO WORLD ****")
call_char(128,rpt$("f",16))           ` Create block for sprite
call_sprite(1,128,7,96,128,rnd(60)-30,rnd(70)-35) ` Display sprite
tiwaitkey()
for i = 33 to 95
    call_char(i,"ff00ff00ff00ff00")   ` Change char pattern
next
for i = 2 to 8
    call_color(i,rnd(14)+2,rnd(14)+2)
NEXT
tiwaitkey()
CALL_CHARSET()
tiwaitkey()
end

The above program redefines ASCII characters 33 to 95 with a custom graphic, assigns random fore and background colors to the corresponding character sets 2 to 8 and displays a moving block sprite (char 128, out of CHARSET range). The printed text will change to the graphic character with random colors. After a key is pressed the Charset() function resets every character except the sprite to their original pattern. The fore and background colors of the chars are also reset. The sprite color remains unchanged.

Go back to ...

TI99E Commands Menu

Main Menu