Playback:
  DEBUG CLS, "Logged Data!",Data
  ptr = 0                                    

  READ ptr + Log, x                          


  DO WHILE (x<>0 AND ptr<LogSiz)             
		 		# FOR n = 01 TO 08
    DEBUG DEC x, " "                          
    READ ptr + 1 + log,Data                
    READ ptr + 2 + log, Data               
    READ ptr + 3 + log, Data              
   ect....

    DEBUG DEC Data                                 

  		# SEROUT 4,396,["!NB0W",DEC2 n,":",Vardata,CLS]

    ptr = ptr + 4                          
    READ ptr + Log, x

 		# NEXT
 LOOP

DO

SEROUT 4,396,["!NB0R?"]
	SERIN 3,396,[NBVAR]                         
 		LOOP UNTIL (NBVAR=?)
RETURN 