CONTINUE
        IF (LK)210,210,205
205     WRITE (1,440)N(K3),N(K4),LK,
440     FORMAT (2X,A2,'-',A2,'=',I3)
S       JMS DRUCK
210     CONTINUE
        IF (K11-1)240,500,500
240     IF (IFORM+911)250,500,250
250     KW=4
        K11=1
        IZZAEH=0
        WRITE (1,450)
450     FORMAT (///'GK-KOMBINATIONEN'/)
        GOTO 135
SDRUCK, 0
        IF (IZZAEH-KDRUCK)810,810,820
820     WRITE (1,470)
470     FORMAT (/)
        IZZAEH=-1
810     IZZAEH=IZZAEH+1
S       JMP I DRUCK
500     CALL CHAIN ('KUR3S')
        END

     WRITE (1,440)
440     FORMAT (/'MEHR KARTEN LASSEN SICH NICHT FINDEN!')
100     WRITE (1,450)N(1),
450     FORMAT (/'SOLL ICH DIE VERARBEITUNG NEU STARTEN?',A1)
        READ (1,410)IFRAGE
410     FORMAT (A2)
        IF (IFRAGE-672)210,200,210
210     CALL CHAIN ('KUR2F')
200     CALL CHAIN ('KUR2')
        END

#