rd.bas

smallbasic for linux

#!/usr/local/bin/sbrun -g

restore datas

for i = 1 to 6
	read x,y,z
	? x,y,z
next

end

label datas
data 1,2,3,	4,5,6,	7,8,9
data 10,11,12, 13,14,15, 16,17,18