大型机汇编（mainframe assembler/HLASM）之BAS指令

请先仔细地阅读下面的程序，实在看不懂，再看最后的分析

//COMCOB   JOB 'XXXXXX',CLASS=A,MSGLEVEL=(1,1),MSGCLASS=A,
//    NOTIFY=&SYSUID                                     
//A       EXEC PGM=ASMA90,PARM='OBJECT,NODECK,XREF(SHORT)'
//SYSPRINT DD  SYSOUT=*                                  
//SYSLIB   DD  DISP=SHR,DSN=SYS1.MACLIB
//SYSLIN   DD  DISP=(,PASS),UNIT=SYSDA,SPACE=(CYL,(1,1)),
//             DCB=(RECFM=FB,LRECL=80,DSORG=PS)
//SYSIN    DD  *
MINILINK CSECT                     DEFINE PROGRAM CSECT
         SAVE  (14,12),,*          SAVE REGISTERS
         CNOP  0,4
         BAS   15,INITSAVE-MINILINK(,15)  BR AROUND SAVE AREA AND     ->
                                           STORE NEW SAVE AREA ADDR   ->
                                            IN REG 15
         USING *,13                ESTABLISH PROGRAM ADDRESSABILITY
         DC    18F'0'              NEW SAVE AREA
INITSAVE ST    13,4(,15)           ADD NEW SAVE AREA TO THE
         ST    15