10 ON ERROR GOTO 30
20 PRINT 4,5,6,77,345,455,USING "$##.##";23.546,234,5,65,(VAL)
30 PRINT ERR,ERL.:ERL. = 33:PRINT ERL.,ERL
40 PRINT 60000!
50 INPUT "Return";YN$
60 IF LEFT$(YN$,1) = "Y" OR LEFT$(YN$,1) = "y" THEN 10 ELSE 70
70 INPUT "My name is Computer, and what is Your Name";YOURNAME$
80 PRINT"Okay, ";YOURNAME$;", watch this.."
90 FOR N = 1 TO LEN(YOURNAME$)
100 PRINT MID$(YOURNAME$,N,1),
110 NEXT N
199 BK$ = ""
200 FOR B = LEN(YOURNAME$) TO 1 STEP -1
210 BK$ = BK$ + MID$(YOURNAME$,B,1)
220 NEXT B
225 PRINT"You name spelled backwords: ";BK$
330 PRINT"Goodbye"
340 ON ERROR GOTO 0
350 DATA 5,ED