?: This is a simple example which prints "HELLO WORLD" on the screen
?: using the new string support and text engine.

?: Include all include files necessary for text.
include: general.inc
include: clrscr.inc
include: text.inc

?: Two string variables
?: I'm only using 7 bytes because that's all that is needed, but strings can be up to 15 bytes long.
hello_string = var: 7
world_string = var: 7

?: Variables for data handler
string_ptr = var: 1

?: Arguments for data handler
args: string, string_ptr, string_ptr

sub: main
   init
   set speed: fast
   call: clrscr

   ?: Load data into the strings
   prepare: string, #hello_string, ~HELLOba
   prepare: string, #world_string, ~WORLDba

   ?: Print HELLO WORLD on the screen
   call: print, #hello_string
   call: print, #world_string

   ?: Exit when a key is pressed
   label: loop
      if:<>:p3, #$ff
         end
      else
         goto: loop
      end if
end sub