1150 IF MONTH<10 THEN MONTHFILE$(9,9)="0":MONTHFILE$(10,10)=STR$(MONTH):GOTO 1170›1160 MONTHFILE$(9,10)=STR$(MONTH)›1580 DIM MONTHFILE$(14),TEMP$(63),DATE$(8),CHNUM$(4),C$(1),A$(1):K1=1:K2=2:K3=3:K4=4:K5=5:K6=6:K7=7:K8=8›1610 MONTHFILE$="D2:MONTH  .DAT"›1650 POSITION 3,12:? #6;"into drive #2":POSITION 3,22:? #6;"ÐÒÅÓÓ ÁÎÙ ËÅÙ":GOSUB IN2›1660 TRAP 1910:OPEN #2,4,0,"D2:MONTH01.DAT":CLOSE #2:TRAP 40000›