,008015,019026,030,034041,045,053,0570571026 00015300F L068112,102106,113/101099/Z99,027A070028)027B0010270B0261,001/001113I0 00025300F ,008015,022029,036040,047054,061068,072/061039 ,001001104000035300F .S84,T98/081L%U1001RLT99BT56LBT66K L034T13,S84S88,S92T00,T04T09104000045300F BS88080A,S73C076S76BT47FB377/BS88BS88/ L038T51,T22T26,T33T38,T43T47104000055300F B377U%U1BNBS88U%U1RNBS88 L024T75,T56T61,T62T66,T71T72104000065300F } L023T98,T98040,040040,040040104000075300F .V204./180U%U1RLW68005)V59 L026V39,V18V19,V20V24,V29V36104000085300F L%U1001WBW22LBW36KN1001BW45A/081 L032V71,V48V53,V58V59,V63V68104000095300F ,0011LT98081BV96080ABV40,V59BV40 L032W03,V76V77,V84V92,V96W00104000105300F LT98S50MW60081BV36U%U1BU%U1EBV40N666 L036W39,W11W18,W22W27,W32W36104000115300F .BW36U%U1MU%U1RN111.BW55 L024W63,W41W45,W50W55,W59W60104000125300F BS80 L005W68,040040,040040,040040104000135300F ,019027,031,038042B031T98}B400L046352 L037137,108112,119127,131040104000145300F BW04BS88 PROGRAM TITLE HERE L035172,142040,040040,040040104000155300F ####R 00 L008180)173173,040040,040040104000165300F /V14080 00175300F ,008015,022029,033033N 1001 TEST CHARACTER & BRANCH 0050B00A ,008015,022029,033033N 1001 SET WORDMARK CARD 0050B 02 L067367,340344,348349,3573611001,008012,00110011B361080AB421/340080 0050B 03 L069404,377385,389393,4004041001 B389 BS88N000M360392/332/ 0050B 04 L069441,413417,421428,4354421001BS00S521/080B348,001078L080299L072272 0050B 05 L067476,449456,460467,4754761001,202241M072456 493M202474B971224XBB 0050B 06 L068512,482489,493500,5085121001B935BL247267B920M202507B477222XB971 0050B 07 L071938,907912,916920,9279351001L/14285B916E2920.920A920970B9449699/332 0050B 08 L056962,940944,948953,9579581001/B421S970B957CB9582B421D 0050B 09 L049979,967971,976980,9809801001B348000?B935BB900 0050B 10 L065/39)/07/07,/10/15,/20/401001 ERROR D MODIFIER 0050B 11 L072/79,/60/80,/80/80,/80/801001B FIELD CHARACTERS RESULT SHOULD BE 0050B 12 L070S17,S00S01,S05S12,S13S171001RESULT IS 2,049L0772772/2772 0050B 13 L059S44,S25S29,S36S37,S41S451001)/40/60)/80L/892702/2702413 0050B 14 /333080N CLEAR WORDMARK CARD 0050B 15 ,019027,031,038042B031T98}B400L046352BW04BS88 TEST CHARACTER & BRANCH 0050B 16 EQUAL B0050B 17 } } EQUAL B0050B 18 1 1 EQUAL B0050B 19 2 2 EQUAL B0050B 20 4 4 EQUAL B0050B 21 8 8 EQUAL B0050B 22 / / EQUAL B0050B 23 - - EQUAL B0050B 24 124 UNEQUAL N0050B 25 8/- UNEQUAL N0050B 26 1 24 UNEQUAL N0050B 27 1 8/- UNEQUAL N0050B 28 2 14 UNEQUAL N0050B 29 2 8/- UNEQUAL N0050B 30 4 12 UNEQUAL N0050B 31 4 8/- UNEQUAL N0050B 32 8 12 UNEQUAL N0050B 33 8 4/- UNEQUAL N0050B 34 / 48- UNEQUAL N0050B 36 / 12 UNEQUAL N0050B 35 - 12 UNEQUAL N0050B 37 - 48/ UNEQUAL N0050B 38 ,008015,022029,033033N 1001 TEST ZONE OR WM & BR 0060B00A ,008015,022029,033033N 1001 SET WORDMARK CARD 0060B 02 L067367,340344,348349,3573611001,008012,00110011B361080AB421/340080 0060B 03 L069404,377385,389393,4004041001 B389 BS88N000M360392/332/ 0060B 04 L069441,413417,421428,4354421001BS00S521/080B348,001078L080299L072272 0060B 05 L072481,450458,466473,4814811001B537224*B537224%B493041 M201480V508224XV0060B 06 L067516,483484,493500,5085131001VVB517 M201507V517224XB935BB900 0060B 07 L060544,522526,533537,5415451001B935B,241L247267B920,224B458 0060B 08 L071938,907912,916920,9279351001L/14285B916E2920.920A920970B9449699/332 0060B 09 L056962,940944,948953,9579581001/B421S970B957CB9582B421D 0060B 10 L040970,967971,971971,9719711001B348000? 0060B 11 L065/39)/07/07,/10/15,/20/401001 ERROR D MODIFIER 0060B 12 L072/79,/60/80,/80/80,/80/801001B FIELD CHARACTERS RESULT SHOULD BE 0060B 13 L070S17,S00S01,S05S12,S13S171001RESULT IS 2,049L0772772/2772 0060B 14 L059S44,S25S29,S36S37,S41S451001)/40/60)/80L/892702/2702413 0060B 15 /333080N CLEAR WORDMARK CARD 0060B 16 ,019027,031,038042B031T98}B400L046352BW04BS88 TEST ZONE OR WM & BR 0060B 17 B A EQUAL 0060B 18 K K EQUAL 0060B 19 S T EQUAL 0060B 20 2 4 EQUAL 0060B 21 1 * EQUAL 0060B 22 C E EQUAL 0060B 23 L O EQUAL 0060B 24 T X EQUAL 0060B 25 3 8 EQUAL 0060B 26 C * EQUAL 0060B 27 L % EQUAL 0060B 28 T * EQUAL 0060B 29 3 * EQUAL 0060B 30 B KT4* UNEQUAL 0060B 31 K AT4% UNEQUAL 0060B 32 S AK4* UNEQUAL 0060B 33 2 AKT* UNEQUAL 0060B 34 1 AKT4 UNEQUAL 0060B 35 C OX8$ UNEQUAL 0060B 36 L EX8, UNEQUAL 0060B 36 L EX8, UNEQUAL 0060B 37 3 EOX. UNEQUAL 0060B 38 ,008015,022029,033033N 1001 COMPARE & BR UNEQUAL 0100B00A ,008015,022029,033033N 1001 SET WORDMARK CARD 0100B 02 L067367,340344,348349,3573611001,008012,00110011B361080AB421/340080 0100B 03 L069404,377385,389393,4004041001 B389 BS88N000M360392/332/ 0100B 04 L069441,413417,421428,4354421001BS00S521/080B348,002078L080299L072272 0100B 05 L069478,450454,458462,4694741001B458046L,222B462,221C203223B491/B935B 0100B 06 L072518,487491,496504,5085121001B508041 B900B935BB508041UB900,241B971 0100B 07 L071938,907912,916920,9279351001L/14285B916E2920.920A920970B9449699/332 0100B 08 L056962,940944,948953,9579581001/B421S970B957CB9582B421D 0100B 09 L051981,967971,978982,9829821001B348000?L260280B920 0100B 10 L065/39)/07/07,/10/15,/20/401001 ERROR A FIELD 0100B 11 L072/79,/60/80,/80/80,/80/801001B FIELD RESULT SHOULD BE 0100B 12 L070S17,S00S01,S05S12,S13S171001RESULT IS 2,049L0772772/2772 0100B 13 L059S44,S25S29,S36S37,S41S451001)/40/60)/80L/892702/2702413 0100B 14 /333080N CLEAR WORDMARK CARD 0100B 15 ,019027,031,038042B031T98}B400L046352BW04BS88 COMPARE & BR UNEQUAL 0100B 16 EQUAL 0100B 17 1 UNEQUAL 0100B 18 1 1 EQUAL 0100B 19 1 UNEQUAL 0100B 20 2 2 EQUAL 0100B 21 2 UNEQUAL 0100B 22 3 3 EQUAL 0100B 23 2 UNEQUAL 0100B 24 4 4 EQUAL 0100B 25 4 UNEQUAL 0100B 26 5 5 EQUAL 0100B 27 4 UNEQUAL 0100B 28 6 6 EQUAL 0100B 29 8 UNEQUAL 0100B 30 7 7 EQUAL 0100B 31 8 UNEQUAL 0100B 32 8 8 EQUAL 0100B 33 / UNEQUAL 0100B 34 9 9 EQUAL 0100B 35 / UNEQUAL 0100B 36 / / EQUAL 0100B 37 - UNEQUAL 0100B 38 - - EQUAL 0100B 39 - UNEQUAL 0100B 40 H7 H7 EQUAL 0100B 41 H7 HH UNEQUAL 0100B 42 RW RW EQUAL 0100B 43 RW RW UNEQ LARGER B FIELD 0100B 44 ,008015,022029,033033N 1001 LOAD MOVE COMPARE 0110B00A ,008015,022029,033033N 1001 SET WORDMARK CARD 0110B 02 L067367,340344,348349,3573611001,008012,00110011B361080AB421/340080 0110B 03 L069404,377385,389393,4004041001 B389 BS88N000M360392/332/ 0110B 04 L069441,413417,421428,4354421001BS00S521/080B348,001078L080299L072272 0110B 05 L068477,449456,457462,4664731001B482 L210270LB935B)270C270250B900/ 0110B 06 L067512,482490,498502,5095131001B920B502072LB513072M.498,210241B449 0110B 07 L051531,520527,528532,5325321001,241270M210270MB457 0110B 08 L071938,907912,916920,9279351001L/14285B916E2920.920A920970B9449699/332 0110B 09 L056962,940944,948953,9579581001/B421S970B957CB9582B421D 0110B 10 L040970,967971,971971,9719711001B348000? 0110B 11 L065/39)/07/07,/10/15,/20/401001 ERROR A FIELD 0110B 12 L072/79,/60/80,/80/80,/80/801001B FIELD RESULT SHOULD BE 0110B 13 L070S17,S00S01,S05S12,S13S171001RESULT IS 2,049L0772772/2772 0110B 14 L059S44,S25S29,S36S37,S41S451001)/40/60)/80L/892702/2702413 0110B 15 /333080N CLEAR WORDMARK CARD 0110B 16 ,019027,031,038042B031T98}B400L046352BW04BS88 LOAD MOVE COMPARE 0110B 17 1111111111 1111111111 L0110B 18 2222222222 2222222222 L0110B 19 4444444444 4444444444 L0110B 20 8888888888 8888888888 L0110B 21 ////////// ////////// L0110B 22 ---------- ---------- L0110B 23 AKT4 BLU5 AKT4 BLU5 L0110B 24 CMV6 DNW7 CMV6 DNW7 L0110B 25 EOX8 FPY9 EOX8 FPY9 L0110B 26 GQZ0 HR\# GQZ0 HR\# L0110B 27 I-,@ &$%0 I-,@ &$%0 L0110B 28 1.*/ )JS3 1.*/ )JS3 L0110B 29 1111111111 1111111111 M0110B 30 2222222222 2222222222 M0110B 31 4444444444 4444444444 M0110B 32 8888888888 8888888888 M0110B 33 ////////// ////////// M0110B 34 ---------- ---------- M0110B 35 AKT4 BLU5 AKT4 BLU5 M0110B 36 CMV6 DNW7 CMV6 DNW7 M0110B 37 EOX8 FPY9 EOX8 FPY9 M0110B 38 GQZ0 HR\# GQZ0 HR\# M0110B 39 I-,@ &$%0 I-,@ &$%0 M0110B 40 1.*/ )JS3 1.*/ )JS3 M0110B 41 ,008015,022029,033033N 1001 LOAD MOVE DIGIT ZONE 0210C00A ,008015,022029,033033N 1001 SET WORDMARK CARD 0210C 02 L067367,340344,348349,3573611001,008012,00110011B361080AB421/340080 0210C 03 L069404,377385,389393,4004041001 B389 BS88N000M360392/332/ 0210C 04 L069441,413417,421428,4354421001BS00S521/080B348,001078L080299L072272 0210C 05 L057466,449456,463464,4654661001B488 L225265D205265NNNN 0210C 06 L068502,472479,484488,4954951001B935BC265245B900/B920,221241B515072D 0210C 07 L070540,511515,522526,5305341001B545072Z.511L971466L971L971L971L971456 0210C 08 L067575,545552,556560,5645711001B449M972466M972M972M972M972456B449 0210C 09 L071938,907912,916920,9279351001L/14285B916E2920.920A920970B9449699/332 0210C 10 L056962,940944,948953,9579581001/B421S970B957CB9582B421D 0210C 11 L042972,967971,972972,9729721001B348000?DY 0210C 12 L065/39)/07/07,/10/15,/20/401001 ERROR A FIELD 0210C 13 L072/79,/60/80,/80/80,/80/801001B FIELD RESULT SHOULD BE 0210C 14 L070S17,S00S01,S05S12,S13S171001RESULT IS 2,049L0772772/2772 0210C 15 L059S44,S25S29,S36S37,S41S451001)/40/60)/80L/892702/2702413 0210C 16 /333080N CLEAR WORDMARK CARD 0210C 17 ,019027,031,038042B031T98}B400L046352BW04BS88 LOAD MOVE DIGIT ZONE 0210C 18 12345 67890 12345 D0210C 19 67890 12345 67890 D0210C 20 &&&&& ----- ----- D0210C 21 ----- &&&&& &&&&& D0210C 22 AKT4 5678 1234 D0210C 23 EOX8 1234 5678 D0210C 24 9|$) 6789 90#@ D0210C 25 5678 AKT4 EOX8 D0210C 26 1234 EOX8 AKT4 D0210C 27 12345 67890 67890 Z0210C 28 67890 12345 12345 Z0210C 29 &&&&& ----- &&&&& Z0210C 30 ----- &&&&& ----- Z0210C 31 AKT4 5678 EOX8 Z0210C 32 EOX8 1234 AKT4 Z0210C 33 9|$) 6789 6XQI Z0210C 34 5678 AKT4 1234 Z0210C 35 1234 EOX8 5678 Z0210C 36 ,008015,022029,033033N 1001 LOAD MOVE DIGIT ZONE 0210C00A ,008015,022029,033033N 1001 SET WORDMARK CARD 0210C 02 L067367,340344,348349,3573611001,008012,00110011B361080AB421/340080 0210C 03 L069404,377385,389393,4004041001 B389 BS88N000M360392/332/ 0210C 04 L069441,413417,421428,4354421001BS00S521/080B348,001078L080299L072272 0210C 05 L057466,449456,463464,4654661001B488 L225265D205265NNNN 0210C 06 L068502,472479,484488,4954951001B935BC265245B900/B920,221241B515072D 0210C 07 L070540,511515,522526,5305341001B545072Z.511L971466L971L971L971L971456 0210C 08 L067575,545552,556560,5645711001B449M972466M972M972M972M972456B449 0210C 09 L071938,907912,916920,9279351001L/14285B916E2920.920A920970B9449699/332 0210C 10 L056962,940944,948953,9579581001/B421S970B957CB9582B421D 0210C 11 L042972,967971,972972,9729721001B348000?DY 0210C 12 L065/39)/07/07,/10/15,/20/401001 ERROR A FIELD 0210C 13 L072/79,/60/80,/80/80,/80/801001B FIELD RESULT SHOULD BE 0210C 14 L070S17,S00S01,S05S12,S13S171001RESULT IS 2,049L0772772/2772 0210C 15 L059S44,S25S29,S36S37,S41S451001)/40/60)/80L/892702/2702413 0210C 16 /333080N CLEAR WORDMARK CARD 0210C 17 ,019027,031,038042B031T98}B400L046352BW04BS88 LOAD MOVE DIGIT ZONE 0210C 18 12345 67890 12345 D0210C 19 67890 12345 67890 D0210C 20 &&&&& ----- ----- D0210C 21 ----- &&&&& &&&&& D0210C 22 AKT4 5678 1234 D0210C 23 EOX8 1234 5678 D0210C 24 9|$) 6789 90#@ D0210C 25 5678 AKT4 EOX8 D0210C 26 1234 EOX8 AKT4 D0210C 27 12345 67890 67890 Z0210C 28 67890 12345 12345 Z0210C 29 &&&&& ----- &&&&& Z0210C 30 ----- &&&&& ----- Z0210C 31 AKT4 5678 EOX8 Z0210C 32 EOX8 1234 AKT4 Z0210C 33 9|$) 6789 6XQI Z0210C 34 5678 AKT4 1234 Z0210C 35 1234 EOX8 5678 Z0210C 36 ,008015,022029,033033N 1001 MOVE & ZERO SUPPRESS 0230B00A ,008015,022029,033033N 1001 SET WORDMARK CARD 0230B 02 L067367,340344,348349,3573611001,008012,00110011B361080AB421/340080 0230B 03 L069404,377385,389393,4004041001 B389 BS88N000M360392/332/ 0230B 04 L069441,413417,421428,4354421001BS00S521/080B348,001078L080299L072272 0230B 05 L070479,449457,464469,4764761001,241265B480010 Z210270B935BC270250B499 0230B 06 L060507,487492,499504,5085081001Z201261B935BC261241B900/B920 0230B 07 L071938,907912,916920,9279351001L/14285B916E2920.920A920970B9449699/332 0230B 08 L056962,940944,948953,9579581001/B421S970B957CB9582B421D 0230B 09 L040970,967971,971971,9719711001B348000? 0230B 10 L065/39)/07/07,/10/15,/20/401001 ERROR A FIELD 0230B 11 L072/79,/60/80,/80/80,/80/801001B FIELD RESULT SHOULD BE 0230B 12 L070S17,S00S01,S05S12,S13S171001RESULT IS 2,049L0772772/2772 0230B 13 L059S44,S25S29,S36S37,S41S451001)/40/60)/80L/892702/2702413 0230B 14 /333080N CLEAR WORDMARK CARD 0230B 15 ,019027,031,038042B031T98}B400L046352BW04BS88 MOVE & ZERO SUPPRESS 0230B 16 00,000,000 0230B 17 00,000,009 9 0230B 18 00,000,090 90 0230B 19 00,000,80I 809 0230B 20 00,00070A? 70A 0230B 21 00,0060K0R 60K 9 0230B 22 00,050T0Q! 50T Q 0230B 23 00,40D0Z0Z 40D Z 9 0230B 24 0030N0&0-| 30N & - 0230B 25 020W0$0|07 20W $ | 7 0230B 26 10G0)0#0@0 10G ) # @ 0230B 27 7 7 0230B 28 R 9 0230B 29 & 0230B 30 | 0230B 31 0 0230B 32 , # 0230B 34