'Simple demonstration of the Data and Read commands


'The data statement
Data 12,26,3,32

'Variables used to hold the data
day1 var byte
day2 var byte
day3 var byte
day4 var byte

clear 'Set all varibles to 0

'Now read in the data
read 0,day1
read 1,day2
read 2,day3
read 3,day4


'Just display it forever
main:
 debug ["Day1 default=",dec day1,10,13]
 debug ["Day2 default=",dec day2,10,13]
 debug ["Day3 default=",dec day3,10,13]
 debug ["Day4 default=",dec day4,10,13]
 debug [10,13]
goto main