MEM2TXT

Purpose: Set a text variable from values in memory(x).

Format:    MEM2TXT   text variable     memory location     character count

Notes:     Use this statement to set character count  (maximum 80) memory values (in ASCII form)  starting from the
location specified by memory location  from a text variable.

Examples:

# MEM2TXT Example

clear
$alphabet = "abcdefghijklmnopqrstuvwxyz0123456789"

startpos = 0
num_chars = 36

txt2mem $alphabet startpos num_chars

a = 0
*main
 ch = memory(a)
 print ch
 a = a + 1
if a < num_chars
 goto main
endif

ch = 48
a = 0
loop begin 80
 memory(a) = ch
 ch = ch + 1
 a = a + 1
loop end

# TXT2MEM Example

mem2txt $dest 0 80
print $dest

exit

See Also:  TXT2NUM     TXT2MEM