10 OPEN "O",1,"ASCEND.TXT"
20 FOR I = 1 TO 1024
30 PRINT #1,I
40 NEXT
50 CLOSE #1
60 SYSTEM