VTech Precomputer Power Pad Plus - Manual (Page 73)

69
LEARN SCHEDULE
10 DIM WEEK$(6)
20 DIM EVENT$(6)
30 DATA “SUNDAY”,“PLAY TIME”
40 DATA “MONDAY”,“LEARN ECOLOGY”
50 DATA “TUESDAY”,“LEARN ENGLISH”
60 DATA “WEDNESDAY”,“LEARN MUSIC”
70 DATA “THURSDAY”,“LEARN HISTORY”
80 DATA “FRIDAY”,“LEARN GEOGRAPHY”
90 DATA “SATURDAY”,“PLAY FOOTBALL”
100 REM(*)LIST(*)
110 FOR W=0 TO 6
120 READ WEEK$(W)
130 READ EVENT$(W)
140 PRINT WEEK$(W),EVENT$(W)
150 NEXT W
999 END
RUN