10 DEFUSR0=&H6C:DEFUSR1=&H6F
30 DEFUSR2=&H72:DEFUSR3=&H75
50 INPUT"Режим";N
60 IF N=0 THEN A=USR0(A)
70 IF N=1 THEN A=USR1(A)
80 IF N=2 THEN A=USR2(A)
90 IF N=3 THEN A=USR3(A)