* DISK IPL TEST PROGAM PAGE 0001 00001 * DISK IPL TEST PROGAM 00002 * THIS PROGRAM TESTS IPL WITH LOADING AND STARTING A LARGE MULTI SECTOR, 00003 * MULTI CYLINDER PROGRAM. 00004 * 00005 * 00006 IDENT TIPL2 00007 ASR EQU /10 00008 S EQU 1 00009 H EQU 0 00010 * 00011 * THE MONITOR FILE IS LOADED BY IPL IN THE AREA FROM ADDRESS /40 ONWARDS 00012 * THE 1ST PART OF THAT AREA CONTAINS ADDRESSES WITH A SPECIFIC FUNCTION 00013 * LIKE PRIORITY INTERRUPT ADDRESSES AND THE MULTIPLEX CHANNELS. 00014 * THESE ADDRESSES CAN NOT BE USED FOR CODE AND ARE KEPT FREE IN THIS PROGRAM 00015 * BY A RES SPEUDO OPERATION. 00016 0000 0040 A DATA /40 SHOULD BE STORED AT ADDRESS /40 00017 0002 0042 A DATA /42 SHOULD BE STORED AT ADDRESS /42 00018 0004 RES /800-2-/20 00019 0FC0 86A0 STR LDKL A14,LST START ADDRESS (ADDRESS /1000 AFTER LOADING) 0FC2 104C R 00020 0FC4 8220 LDKL A2,M 0FC6 1024 R 00021 0FC8 F6A1 CF A14,PLINE 0FCA 0FFC R 00022 * 00023 0FCC 8220 P0 LDKL A2,LO 0FCE 1032 R 00024 0FD0 F6A1 CF A14,PLINE 0FD2 0FFC R 00025 0FD4 8120 LDKL A1,TAB1 0FD6 104E R 00026 0FD8 8224 P1 LDR* A2,A1 00027 0FDA 5008 RF(0) P2 00028 0FDC F6A1 CF A14,PLINE 0FDE 0FFC R 00029 0FE0 1102 ADK A1,2 00030 0FE2 5F0C RB P1 * DISK IPL TEST PROGAM PAGE 0002 00031 * 00032 0FE4 8220 P2 LDKL A2,HI 0FE6 103A R 00033 0FE8 F6A1 CF A14,PLINE 0FEA 0FFC R 00034 0FEC 8120 LDKL A1,TAB2 0FEE 5164 R 00035 0FF0 8224 P3 LDR* A2,A1 00036 0FF2 5828 RB(0) P0 00037 0FF4 F6A1 CF A14,PLINE 0FF6 0FFC R 00038 0FF8 1102 ADK A1,2 00039 0FFA 5F0C RB P3 00040 * 00041 PLINE EQU * 00042 0FFC 8628 GC LDR* A6,A2 00043 0FFE 5010 RF(0) EX 00044 1000 E618 ECR A6,A6 00045 1002 F6A1 CF A14,ASCOUT 1004 1012 R 00046 1006 E618 ECR A6,A6 00047 1008 F6A1 CF A14,ASCOUT 100A 1012 R 00048 100C 1202 ADK A2,2 00049 100E 5F14 RB GC 00050 1010 F03A EX RTN A14 00051 * 00052 1012 0700 ASCOUT LDK A7,0 OUTPUT MODE 00053 1014 47D0 CIO A7,S,ASR 00054 1016 5C04 RB(4) *-2 00055 1018 4610 OTR A6,0,ASR 00056 101A 5C04 RB(4) *-2 00057 101C 4790 CIO A7,H,ASR 00058 101E 4FD0 SST A7,ASR 00059 1020 5C04 RB(4) *-2 00060 1022 F03A RTN A14 00061 * 12 BYTE MESSAGE * DISK IPL TEST PROGAM PAGE 0003 00062 1024 4845 A M DATA 'HERE I AM ' 1026 5245 A 1028 2049 A 102A 2041 A 102C 4D20 A 00063 102E 0D0A A DATA /0D0A 00064 1030 0000 A DATA 0 00065 1032 4C4F A LO DATA 'LOW' 1034 5700 A 00066 1036 0D0A A DATA /0D0A 00067 1038 0000 A DATA 0 00068 103A 4849 A HI DATA 'HIGH' 103C 4748 A 00069 103E 0D0A A DATA /0D0A 00070 1040 0000 A DATA 0 00071 1042 RES 6 00072 LST EQU *-2 00073 104E 135C R TAB1 DATA M0 00074 1050 1670 R DATA M1 00075 1052 1984 R DATA M2 00076 1054 1C98 R DATA M3 00077 1056 1FAC R DATA M4 00078 1058 22C0 R DATA M5 00079 105A 25D4 R DATA M6 00080 105C 2924 R DATA M7 00081 105E 2C38 R DATA M8 00082 1060 2F4C R DATA M9 00083 1062 3260 R DATA M10 00084 1064 3574 R DATA M11 00085 1066 3888 R DATA M12 00086 1068 3B9C R DATA M13 00087 106A 3EB0 R DATA M14 00088 106C 41C4 R DATA M15 00089 106E 4514 R DATA M16 00090 1070 4828 R DATA M17 00091 1072 4B3C R DATA M18 00092 1074 4E50 R DATA M19 * DISK IPL TEST PROGAM PAGE 0004 00093 1076 0000 A DATA 0 00094 1078 RES 370 00095 135C 5448 A M0 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 0 ' COMMENT 135E 4953 A 1360 2049 A 1362 5320 A 1364 4120 A 1366 4C4F A 1368 4E47 A 136A 204D A 136C 4553 A 136E 5341 A 1370 4745 A 1372 2041 A 1374 4E44 A 1376 2048 A 1378 4153 A 137A 2054 A 137C 4845 A 137E 204E A 1380 554D A 1382 4245 A 1384 5220 A 1386 3020 A 00096 1388 0D0A A DATA /0D0A 00097 138A 0000 A DATA 0 00098 138C RES 370 00099 1670 5448 A M1 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 1 ' COMMENT 1672 4953 A 1674 2049 A 1676 5320 A 1678 4120 A 167A 4C4F A 167C 4E47 A 167E 204D A 1680 4553 A 1682 5341 A * DISK IPL TEST PROGAM PAGE 0005 1684 4745 A 1686 2041 A 1688 4E44 A 168A 2048 A 168C 4153 A 168E 2054 A 1690 4845 A 1692 204E A 1694 554D A 1696 4245 A 1698 5220 A 169A 3120 A 00100 169C 0D0A A DATA /0D0A 00101 169E 0000 A DATA 0 00102 16A0 RES 370 00103 1984 5448 A M2 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 2 ' COMMENT 1986 4953 A 1988 2049 A 198A 5320 A 198C 4120 A 198E 4C4F A 1990 4E47 A 1992 204D A 1994 4553 A 1996 5341 A 1998 4745 A 199A 2041 A 199C 4E44 A 199E 2048 A 19A0 4153 A 19A2 2054 A 19A4 4845 A 19A6 204E A 19A8 554D A 19AA 4245 A 19AC 5220 A 19AE 3220 A * DISK IPL TEST PROGAM PAGE 0006 00104 19B0 0D0A A DATA /0D0A 00105 19B2 0000 A DATA 0 00106 19B4 RES 370 00107 1C98 5448 A M3 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 3 ' COMMENT 1C9A 4953 A 1C9C 2049 A 1C9E 5320 A 1CA0 4120 A 1CA2 4C4F A 1CA4 4E47 A 1CA6 204D A 1CA8 4553 A 1CAA 5341 A 1CAC 4745 A 1CAE 2041 A 1CB0 4E44 A 1CB2 2048 A 1CB4 4153 A 1CB6 2054 A 1CB8 4845 A 1CBA 204E A 1CBC 554D A 1CBE 4245 A 1CC0 5220 A 1CC2 3320 A 00108 1CC4 0D0A A DATA /0D0A 00109 1CC6 0000 A DATA 0 00110 1CC8 RES 370 00111 1FAC 5448 A M4 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 4 ' COMMENT 1FAE 4953 A 1FB0 2049 A 1FB2 5320 A 1FB4 4120 A 1FB6 4C4F A 1FB8 4E47 A 1FBA 204D A 1FBC 4553 A * DISK IPL TEST PROGAM PAGE 0007 1FBE 5341 A 1FC0 4745 A 1FC2 2041 A 1FC4 4E44 A 1FC6 2048 A 1FC8 4153 A 1FCA 2054 A 1FCC 4845 A 1FCE 204E A 1FD0 554D A 1FD2 4245 A 1FD4 5220 A 1FD6 3420 A 00112 1FD8 0D0A A DATA /0D0A 00113 1FDA 0000 A DATA 0 00114 1FDC RES 370 00115 22C0 5448 A M5 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 5 ' COMMENT 22C2 4953 A 22C4 2049 A 22C6 5320 A 22C8 4120 A 22CA 4C4F A 22CC 4E47 A 22CE 204D A 22D0 4553 A 22D2 5341 A 22D4 4745 A 22D6 2041 A 22D8 4E44 A 22DA 2048 A 22DC 4153 A 22DE 2054 A 22E0 4845 A 22E2 204E A 22E4 554D A 22E6 4245 A 22E8 5220 A * DISK IPL TEST PROGAM PAGE 0008 22EA 3520 A 00116 22EC 0D0A A DATA /0D0A 00117 22EE 0000 A DATA 0 00118 22F0 RES 370 00119 25D4 5448 A M6 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 6 ' COMMENT 25D6 4953 A 25D8 2049 A 25DA 5320 A 25DC 4120 A 25DE 4C4F A 25E0 4E47 A 25E2 204D A 25E4 4553 A 25E6 5341 A 25E8 4745 A 25EA 2041 A 25EC 4E44 A 25EE 2048 A 25F0 4153 A 25F2 2054 A 25F4 4845 A 25F6 204E A 25F8 554D A 25FA 4245 A 25FC 5220 A 25FE 3620 A 00120 2600 0D0A A DATA /0D0A 00121 2602 0000 A DATA 0 00122 2604 RES 400 00123 2924 5448 A M7 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 7 ' COMMENT 2926 4953 A 2928 2049 A 292A 5320 A 292C 4120 A 292E 4C4F A 2930 4E47 A 2932 204D A * DISK IPL TEST PROGAM PAGE 0009 2934 4553 A 2936 5341 A 2938 4745 A 293A 2041 A 293C 4E44 A 293E 2048 A 2940 4153 A 2942 2054 A 2944 4845 A 2946 204E A 2948 554D A 294A 4245 A 294C 5220 A 294E 3720 A 00124 2950 0D0A A DATA /0D0A 00125 2952 0000 A DATA 0 00126 2954 RES 370 00127 2C38 5448 A M8 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 8 ' COMMENT 2C3A 4953 A 2C3C 2049 A 2C3E 5320 A 2C40 4120 A 2C42 4C4F A 2C44 4E47 A 2C46 204D A 2C48 4553 A 2C4A 5341 A 2C4C 4745 A 2C4E 2041 A 2C50 4E44 A 2C52 2048 A 2C54 4153 A 2C56 2054 A 2C58 4845 A 2C5A 204E A 2C5C 554D A 2C5E 4245 A * DISK IPL TEST PROGAM PAGE 0010 2C60 5220 A 2C62 3820 A 00128 2C64 0D0A A DATA /0D0A 00129 2C66 0000 A DATA 0 00130 2C68 RES 370 00131 2F4C 5448 A M9 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 9 ' COMMENT 2F4E 4953 A 2F50 2049 A 2F52 5320 A 2F54 4120 A 2F56 4C4F A 2F58 4E47 A 2F5A 204D A 2F5C 4553 A 2F5E 5341 A 2F60 4745 A 2F62 2041 A 2F64 4E44 A 2F66 2048 A 2F68 4153 A 2F6A 2054 A 2F6C 4845 A 2F6E 204E A 2F70 554D A 2F72 4245 A 2F74 5220 A 2F76 3920 A 00132 2F78 0D0A A DATA /0D0A 00133 2F7A 0000 A DATA 0 00134 2F7C RES 370 00135 3260 5448 A M10 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 10' COMMENT 3262 4953 A 3264 2049 A 3266 5320 A 3268 4120 A 326A 4C4F A 326C 4E47 A * DISK IPL TEST PROGAM PAGE 0011 326E 204D A 3270 4553 A 3272 5341 A 3274 4745 A 3276 2041 A 3278 4E44 A 327A 2048 A 327C 4153 A 327E 2054 A 3280 4845 A 3282 204E A 3284 554D A 3286 4245 A 3288 5220 A 328A 3130 A 00136 328C 0D0A A DATA /0D0A 00137 328E 0000 A DATA 0 00138 3290 RES 370 00139 3574 5448 A M11 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 11' COMMENT 3576 4953 A 3578 2049 A 357A 5320 A 357C 4120 A 357E 4C4F A 3580 4E47 A 3582 204D A 3584 4553 A 3586 5341 A 3588 4745 A 358A 2041 A 358C 4E44 A 358E 2048 A 3590 4153 A 3592 2054 A 3594 4845 A 3596 204E A 3598 554D A * DISK IPL TEST PROGAM PAGE 0012 359A 4245 A 359C 5220 A 359E 3131 A 00140 35A0 0D0A A DATA /0D0A 00141 35A2 0000 A DATA 0 00142 35A4 RES 370 00143 3888 5448 A M12 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 12' COMMENT 388A 4953 A 388C 2049 A 388E 5320 A 3890 4120 A 3892 4C4F A 3894 4E47 A 3896 204D A 3898 4553 A 389A 5341 A 389C 4745 A 389E 2041 A 38A0 4E44 A 38A2 2048 A 38A4 4153 A 38A6 2054 A 38A8 4845 A 38AA 204E A 38AC 554D A 38AE 4245 A 38B0 5220 A 38B2 3132 A 00144 38B4 0D0A A DATA /0D0A 00145 38B6 0000 A DATA 0 00146 38B8 RES 370 00147 3B9C 5448 A M13 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 13' COMMENT 3B9E 4953 A 3BA0 2049 A 3BA2 5320 A 3BA4 4120 A 3BA6 4C4F A * DISK IPL TEST PROGAM PAGE 0013 3BA8 4E47 A 3BAA 204D A 3BAC 4553 A 3BAE 5341 A 3BB0 4745 A 3BB2 2041 A 3BB4 4E44 A 3BB6 2048 A 3BB8 4153 A 3BBA 2054 A 3BBC 4845 A 3BBE 204E A 3BC0 554D A 3BC2 4245 A 3BC4 5220 A 3BC6 3133 A 00148 3BC8 0D0A A DATA /0D0A 00149 3BCA 0000 A DATA 0 00150 3BCC RES 370 00151 3EB0 5448 A M14 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 14' COMMENT 3EB2 4953 A 3EB4 2049 A 3EB6 5320 A 3EB8 4120 A 3EBA 4C4F A 3EBC 4E47 A 3EBE 204D A 3EC0 4553 A 3EC2 5341 A 3EC4 4745 A 3EC6 2041 A 3EC8 4E44 A 3ECA 2048 A 3ECC 4153 A 3ECE 2054 A 3ED0 4845 A 3ED2 204E A * DISK IPL TEST PROGAM PAGE 0014 3ED4 554D A 3ED6 4245 A 3ED8 5220 A 3EDA 3134 A 00152 3EDC 0D0A A DATA /0D0A 00153 3EDE 0000 A DATA 0 00154 3EE0 RES 370 00155 41C4 5448 A M15 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 15' COMMENT 41C6 4953 A 41C8 2049 A 41CA 5320 A 41CC 4120 A 41CE 4C4F A 41D0 4E47 A 41D2 204D A 41D4 4553 A 41D6 5341 A 41D8 4745 A 41DA 2041 A 41DC 4E44 A 41DE 2048 A 41E0 4153 A 41E2 2054 A 41E4 4845 A 41E6 204E A 41E8 554D A 41EA 4245 A 41EC 5220 A 41EE 3135 A 00156 41F0 0D0A A DATA /0D0A 00157 41F2 0000 A DATA 0 00158 41F4 RES 400 00159 4514 5448 A M16 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 16' COMMENT 4516 4953 A 4518 2049 A 451A 5320 A 451C 4120 A * DISK IPL TEST PROGAM PAGE 0015 451E 4C4F A 4520 4E47 A 4522 204D A 4524 4553 A 4526 5341 A 4528 4745 A 452A 2041 A 452C 4E44 A 452E 2048 A 4530 4153 A 4532 2054 A 4534 4845 A 4536 204E A 4538 554D A 453A 4245 A 453C 5220 A 453E 3136 A 00160 4540 0D0A A DATA /0D0A 00161 4542 0000 A DATA 0 00162 4544 RES 370 00163 4828 5448 A M17 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 17' COMMENT 482A 4953 A 482C 2049 A 482E 5320 A 4830 4120 A 4832 4C4F A 4834 4E47 A 4836 204D A 4838 4553 A 483A 5341 A 483C 4745 A 483E 2041 A 4840 4E44 A 4842 2048 A 4844 4153 A 4846 2054 A 4848 4845 A * DISK IPL TEST PROGAM PAGE 0016 484A 204E A 484C 554D A 484E 4245 A 4850 5220 A 4852 3137 A 00164 4854 0D0A A DATA /0D0A 00165 4856 0000 A DATA 0 00166 4858 RES 370 00167 4B3C 5448 A M18 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 18' COMMENT 4B3E 4953 A 4B40 2049 A 4B42 5320 A 4B44 4120 A 4B46 4C4F A 4B48 4E47 A 4B4A 204D A 4B4C 4553 A 4B4E 5341 A 4B50 4745 A 4B52 2041 A 4B54 4E44 A 4B56 2048 A 4B58 4153 A 4B5A 2054 A 4B5C 4845 A 4B5E 204E A 4B60 554D A 4B62 4245 A 4B64 5220 A 4B66 3138 A 00168 4B68 0D0A A DATA /0D0A 00169 4B6A 0000 A DATA 0 00170 4B6C RES 370 00171 4E50 5448 A M19 DATA 'THIS IS A LONG MESSAGE AND HAS THE NUMBER 19' COMMENT 4E52 4953 A 4E54 2049 A 4E56 5320 A * DISK IPL TEST PROGAM PAGE 0017 4E58 4120 A 4E5A 4C4F A 4E5C 4E47 A 4E5E 204D A 4E60 4553 A 4E62 5341 A 4E64 4745 A 4E66 2041 A 4E68 4E44 A 4E6A 2048 A 4E6C 4153 A 4E6E 2054 A 4E70 4845 A 4E72 204E A 4E74 554D A 4E76 4245 A 4E78 5220 A 4E7A 3139 A 00172 4E7C 0D0A A DATA /0D0A 00173 4E7E 0000 A DATA 0 00174 4E80 RES 370 00175 5164 135C R TAB2 DATA M0 00176 5166 1670 R DATA M1 00177 5168 1984 R DATA M2 00178 516A 1C98 R DATA M3 00179 516C 1FAC R DATA M4 00180 516E 22C0 R DATA M5 00181 5170 25D4 R DATA M6 00182 5172 2924 R DATA M7 00183 5174 2C38 R DATA M8 00184 5176 2F4C R DATA M9 00185 5178 3260 R DATA M10 00186 517A 3574 R DATA M11 00187 517C 3888 R DATA M12 00188 517E 3B9C R DATA M13 00189 5180 3EB0 R DATA M14 00190 5182 41C4 R DATA M15 * DISK IPL TEST PROGAM PAGE 0018 00191 5184 4514 R DATA M16 00192 5186 4828 R DATA M17 00193 5188 4B3C R DATA M18 00194 518A 4E50 R DATA M19 00195 518C 0000 A DATA 0 00196 END STR * DISK IPL TEST PROGAM PAGE 0019 SYMBOL TABLE A0 0000 Z A1 0002 Z A10 0005 Z A11 0007 Z A12 0009 Z A13 000B Z A14 000D Z A15 000F Z A2 0004 Z A3 0006 Z A4 0008 Z A5 000A Z A6 000C Z A7 000E Z A8 0001 Z A9 0003 Z ASCOUT 1012 R ASR 0010 A EX 1010 R GC 0FFC R H 0000 A HI 103A R LO 1032 R LST 104C R M 1024 R M0 135C R M1 1670 R M10 3260 R M11 3574 R M12 3888 R M13 3B9C R M14 3EB0 R M15 41C4 R M16 4514 R M17 4828 R M18 4B3C R M19 4E50 R M2 1984 R M3 1C98 R M4 1FAC R M5 22C0 R M6 25D4 R M7 2924 R M8 2C38 R M9 2F4C R P 0000 Z P0 0FCC R P1 0FD8 R P2 0FE4 R P3 0FF0 R PLINE 0FFC R S 0001 A STR 0FC0 R TAB1 104E R TAB2 5164 R P8ASM, version 0.7. End of assembly, 0 errors.