10 IF A=0THENA=1:LOAD"EXS",8,1
20 IF A=1THENA=2:LOAD"EXC",8,1
30 IF A=2THENA=3:LOAD"TSE",8,1
40 FORX=1TO2000:NEXT
50 PRINT"":SYS49152:END