BWZ    JOB   TEST BRANCH-ON-WORD-OR-ZONE
       ORG   500
START  CS    332
       CS
       MLCWA @TEST OF BWZ INSTRUCTION@,250
       W
       CS    299
*
*      SEE IF PLAIN BW WORKS FOR ALL ZONE COMBINATIONS
*      THIS TESTS TO SEE THAT BW BRANCHES WHEN WM IS PRESENT
*
       BW    WM1,ZNW
       MLCWA @BW FAILED ON NO ZONE+WM@,250
       MLCWA STARS
       W
       CS    299
       B     B2
WM1    MLCWA @BW OK WITH NO ZONE+WM@,250
       W
       CS    299
*
*      SEE IF BW WORKS WITH A-ZONE
*
B2     BW    WM2,ZAW
       MLCWA @BW FAILED ON A-ZONE+WM@,250
       MLCWA STARS
       W
       CS    299
       B     B3
WM2    MLCWA @BW OK WITH A-ZONE+WM@,250
       W
       CS    299
*
*      SEE IF BW WORKS WITH B-ZONE
*
B3     BW    WM3,ZBW
       MLCWA @BW FAILED ON B-ZONE+WM@,250
       MLCWA STARS
       W
       CS    299
       B     B4
WM3    MLCWA @BW OK WITH B-ZONE+WM@,250
       W
       CS    299
*
*      SEE IF BW WORKS WITH A-ZONE
*
B4     BW    WM4,ZBAW
       MLCWA @BW FAILED ON BA-ZONE+WM@,250
       MLCWA STARS
       W
       CS    299
       B     B5
WM4    MLCWA @BW OK WITH BA-ZONE+WM@,250
       W
       CS    299
*
*      THIS TESTS TO SEE THAT BW FAILS TO BRANCH WHEN WM IS ABSENT
*
B5     BW    NWM1,ZN
       MLCWA @BW OK WITH NO ZONE@,250
       W
       CS    299
       B     B6
NWM1   MLCWA @BW FAILED ON NO ZONE@,250
       MLCWA STARS
       W
       CS    299
*
*      SEE IF BW WORKS WITH A-ZONE
*
B6     BW    NWM2,ZA
       MLCWA @BW OK WITH A-ZONE@,250
       W
       CS    299
       B     B7
NWM2   MLCWA @BW FAILED ON A-ZONE@,250
       MLCWA STARS
       W
       CS    299
*
*      SEE IF BW WORKS WITH B-ZONE
*
B7     BW    NWM3,ZB
       MLCWA @BW OK WITH B-ZONE@,250
       W
       CS    299
       B     B8
NWM3   MLCWA @BW FAILED ON B-ZONE@,250
       MLCWA STARS
       W
       CS    299
*
*      SEE IF BW WORKS WITH A-ZONE
*
B8     BW    NWM4,ZBA
       MLCWA @BW OK WITH BA-ZONE@,250
       W
       CS    299
       B     B9
NWM4   MLCWA @BW FAILED ON BA-ZONE@,250
       MLCWA STARS
       W
       CS    299
B9     MLCWA @END OF WORD MARK BRANCH TESTS@
*
* NOW TRY THE VARIOUS ZONE TESTS
*
*
*      CHECK THAT BRANCH ON NO ZONE BRANCHES WHEN WM PRESENT OR ABSENT
*
       BWZ   NZ1,ZNW,2                       BRANCH ON NO ZONE
       MLCWA @BWZ (NO ZONE) FAILED ON NO ZONE+WM@,250
       MLCWA STARS
       W
       CS    299
       B     B10
NZ1    MLCWA @BWZ (NO ZONE) SUCCEEDED WITH NO ZONE+WM@,250
       W
       CS    299
*
B10    BWZ   NZ2,ZN,2                        BRANCH ON NO ZONE
       MLCWA @BWZ (NO ZONE) FAILED ON NO ZONE@,250
       MLCWA STARS
       W
       CS    299
       B     B11
NZ2    MLCWA @BWZ (NO ZONE) SUCCEEDED WITH NO ZONE@,250
       W
       CS    299
*
*      CHECK THAT BRANCH ON NO ZONE FAILS FOR ANY OTHER COMBINATION OF
*      ZONES
*
B11    BWZ   NZ3,ZAW,2
       MLCWA @BWZ (NO ZONE) OK WITH A-ZONE+WM@,250
       W
       CS    299
       B     B12
NZ3    MLCWA @BWZ (NO ZONE) FAILED WITH A-ZONE+WM@,250
       MLCWA STARS
       W
       CS    299
B12    BWZ   NZ4,ZBW,2
       MLCWA @BWZ (NO ZONE) OK WITH B-ZONE+WM@,250
       W
       CS    299
       B     B13
NZ4    MLCWA @BWZ (NO ZONE) FAILED WITH B-ZONE+WM@,250
       MLCWA STARS
       W
       CS    299
B13    BWZ   NZ5,ZA,2
       MLCWA @BWZ (NO ZONE) OK WITH A-ZONE@,250
       W
       CS    299
       B     B14
NZ5    MLCWA @BWZ (NO ZONE) FAILED WITH A-ZONE@,250
       MLCWA STARS
       W
       CS    299
B14    BWZ   NZ6,ZB,2
       MLCWA @BWZ (NO ZONE) OK WITH B-ZONE@,250
       W
       CS    299
       B     B15
NZ6    MLCWA @BWZ (NO ZONE) FAILED WITH B-ZONE@,250
       MLCWA STARS
       W
       CS    299
B15    BWZ   NZ7,ZBA,2
       MLCWA @BWZ (NO ZONE) OK WITH AB-ZONE@,250
       W
       CS    299
       B     B16
NZ7    MLCWA @BWZ (NO ZONE) FAILED WITH AB-ZONE@,250
       MLCWA STARS
       W
       CS    299
B16    BWZ   NZ8,ZB,2
       MLCWA @BWZ (NO ZONE) OK WITH B-ZONE@,250
       W
       CS    299
       B     B17
NZ8    MLCWA @BWZ (NO ZONE) FAILED WITH B-ZONE@,250
       MLCWA STARS
       W
       CS    299
B17    EQU   *
       H     *-3 
*
*
ZNW    DCW   @ @
ZAW    DCW   @/@
ZBW    DCW   @-@
ZBAW   DCW   @+@
ZN     DC    @ @
ZA     DC    @/@
ZB     DC    @-@
ZBA    DC    @+@
STARS  DCW   @***************@
       END   START
