|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 4458 (0x116a)
Notes: pts_type(UF)
Names: »KM261.UF«
└─⟦75255755f⟧ Bits:30009693 Philips computer tape "600410"
└─⟦this⟧ »NJREMIT/KM261.UF«
└─⟦b6546aa17⟧ Bits:30009689 Philips computer tape "600325"
└─⟦this⟧ »REMIT2/KM261.UF«
PRT KM261 PRT C261 MES LEJRE KOMMUNE, REMITTERING MES INCLUDES BUDGET SCR LED KMD08,/S !!CH $$(26)$$(22)$$ !!CH $$'26'$$'22'$$ !!CH $$-4$$4$$ TRANS 40 !!RE 36,$$F8$$FA$$ !!RE 37,$$F9$$FB$$ !!RE 41,$$56$$100$$ SCREEN SIZE !!DL 61,62 FD03,FD04 !!DL 67,108 !!DL 224,230 MF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. MF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR, GTP/LP MF1CU STRG X'E8C8' CU ADDRESS CNFHC STRGI (16),'GB','GA','GA','GA',' ' !!DL 235,236 FROMKX STRGI (12)2C'TD',' ',' ' !!RE 240,$$FALSE$$TRUE$$ CBKOFLG !!RE 241,$$FALSE$$TRUE$$ CKTFLAG !!RE 242,$$FALSE$$TRUE$$ CCLKTFLG !!RE 244,$$FALSE$$TRUE$$ CTRVALG !!RE 247,$$TRUE$$TRUE$$ CKTAUTO !!RE 248,$$FALSE$$TRUE$$ DC !!RE 249,$$FALSE$$FALSE$$ CCYWRTF !!RE 251,$$FALSE$$FALSE$$ C5MDISK !!RE 252,$$TRUE$$FALSE$$ CKASFLG !!RE 253,$$TRUE$$FALSE$$ CSLDFLG !!RE 255,$$FALSE$$FALSE$$ CCONVERT !!RE 279,$$FALSE$$TRUE$$ CREMITFL !!RE 287,$$FALSE$$TRUE$$ !!RE 288,$$FALSE$$TRUE$$ CTEXTFLG !!RE 289,$$FALSE$$TRUE$$ CSTRKFLG !!RE 290,$$FALSE$$TRUE$$ CBUDTFLG !!DL 331 CFLAG BINI (12,2),X'0015',X'0000',X'0064',X'0000', C X'0000',X'0000' !!RE 361,$$FALSE$$TRUE$$T=BUDGET !!RE 362,$$FALSE$$TRUE$$ CFAKT10 !!RE 416,$$01014610$$%VER%REL%MOD$$ !!RE 476,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC !!RE 478,$$TRUE$$FALSE$$ NO VSL CHECK !!RE 484,$$1400$$1400$$DISK SIZE !!RE 485,$$21$$21$$ CKTMAX !!RE 490,$$128$$80$$ CRECLGD !!RE 492,$$OD-KOM$$LEJRE $$ !!RE 493,$$7$$7$$ CKTINDX !!RE 494,$$20$$20$$ INDEX FILE !!RE 495,$$5$$5$$ CKTTOP !!DL 496,497 FROMTX STRGI (12)2C' ','KA',' ',' ' !!DL 817,1091 RK !!DL 1103,1105 RK !!DL 1156,1172 RK !!DL 1200 MOVE TCT01,=W'3' PRINTER NR !!DL 1250,1262 !!DL 1265 !!EN NOD C TRA /S,NL INC DIV539 NOD R LED SCREEN,/S !!CH $$KEY461$$KEY539$$ !!CH $$SL461$$SLCOP$$ !!EN TRA /S,NL INC RGSUB4 INC RGSTRT NOD D INC RGMAIN INC RGSUBS INC RGSUB1 INC RGSUB2 INC RGSUB3 NOD D INC RGKLAR INC KTPLN INC KTOPR NOD D INC RGADM INC REMSUB NOD R INC ADM5 INC SUBAPL INC REMPRT NOD R INC KMDIO INC DKSUBS INC REMTXT INC RAADUM NOD R INC RGFRMT INC REMFMT NOD D INC REMLEV INC ADM6 NOD D INC REMTR LED REMBDT !!DL 177,250 B821PR PROC RET PEND !!DL 635 (FILLR ' ',40) FILLR ' ',22 !!EN TRA /S,NL NOD D INC BUDGET TLK U,4K INC PRT INC VDUPRT INC START INC TB3270 $INCGEN LKE M KPF /L,RGL261 SCR MES $PDISC M=M:261,MU=M:POOL92,A=RGL261,C=C261 $ASG2
0x0000…0012 (0, 0, 400) Head {h00=0x000e, h01=0x0050, text=»PRT KM261 «, t00=0x0000, t01=0x0004}
0x0012…0022 Head {h00=0x000c, h01=0x0050, text=»PRT C261«, t00=0x0000, t01=0x0016}
0x0022…0048 Head {h00=0x0022, h01=0x0050, text=»MES LEJRE KOMMUNE, REMITTERING«, t00=0x0000, t01=0x0026}
0x0048…0064 Head {h00=0x0018, h01=0x0050, text=»MES INCLUDES BUDGET «, t00=0x0000, t01=0x004c}
0x0064…0070 Head {h00=0x0008, h01=0x0050, text=»SCR «, t00=0x0000, t01=0x0068}
0x0070…0084 Head {h00=0x0010, h01=0x0050, text=»LED KMD08,/S«, t00=0x0000, t01=0x0074}
0x0084…00a0 Head {h00=0x0018, h01=0x0050, text=»!!CH $$(26)$$(22)$$ «, t00=0x0000, t01=0x0088}
0x00a0…00bc Head {h00=0x0018, h01=0x0050, text=»!!CH $$'26'$$'22'$$ «, t00=0x0000, t01=0x00a4}
0x00bc…00dc Head {h00=0x001c, h01=0x0050, text=»!!CH $$-4$$4$$ TRANS 40 «, t00=0x0000, t01=0x00c0}
0x00dc…00f6 Head {h00=0x0016, h01=0x0050, text=»!!RE 36,$$F8$$FA$$«, t00=0x0000, t01=0x00e0}
0x00f6…0110 Head {h00=0x0016, h01=0x0050, text=»!!RE 37,$$F9$$FB$$«, t00=0x0000, t01=0x00fa}
0x0110…0138 Head {h00=0x0024, h01=0x0050, text=»!!RE 41,$$56$$100$$ SCREEN SIZE «, t00=0x0000, t01=0x0114}
0x0138…0154 Head {h00=0x0018, h01=0x0050, text=»!!DL 61,62 FD03,FD04«, t00=0x0000, t01=0x013c}
0x0154…0168 Head {h00=0x0010, h01=0x0050, text=»!!DL 67,108 «, t00=0x0000, t01=0x0158}
0x0168…017c Head {h00=0x0010, h01=0x0050, text=»!!DL 224,230«, t00=0x0000, t01=0x016c}
0x017c…01b0 Head {h00=0x0030, h01=0x0050, text=»MF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. «, t00=0x0000, t01=0x0180}
0x01b0…01e8 Head {h00=0x0034, h01=0x0050, text=»MF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR, GTP/LP«, t00=0x0001, t01=0x0024}
0x01e8…020e Head {h00=0x0022, h01=0x0050, text=»MF1CU STRG X'E8C8' CU ADDRESS «, t00=0x0001, t01=0x005c}
0x020e…0240 Head {h00=0x002e, h01=0x0050, text=»CNFHC STRGI (16),'GB','GA','GA','GA',' ' «, t00=0x0001, t01=0x0082}
0x0240…0254 Head {h00=0x0010, h01=0x0050, text=»!!DL 235,236«, t00=0x0001, t01=0x00b4}
0x0254…027e Head {h00=0x0026, h01=0x0050, text=»FROMKX STRGI (12)2C'TD',' ',' ' «, t00=0x0001, t01=0x00c8}
0x027e…02a6 Head {h00=0x0024, h01=0x0050, text=»!!RE 240,$$FALSE$$TRUE$$ CBKOFLG«, t00=0x0001, t01=0x00f2}
0x02a6…02ce Head {h00=0x0024, h01=0x0050, text=»!!RE 241,$$FALSE$$TRUE$$ CKTFLAG«, t00=0x0001, t01=0x011a}
0x02ce…02f8 Head {h00=0x0026, h01=0x0050, text=»!!RE 242,$$FALSE$$TRUE$$ CCLKTFLG «, t00=0x0001, t01=0x0142}
0x02f8…0320 Head {h00=0x0024, h01=0x0050, text=»!!RE 244,$$FALSE$$TRUE$$ CTRVALG«, t00=0x0001, t01=0x016c}
0x0320…0348 (2, 0, 398) Head {h00=0x0024, h01=0x0050, text=»!!RE 247,$$TRUE$$TRUE$$ CKTAUTO «, t00=0x0002, t01=0x0004}
0x0348…036c Head {h00=0x0020, h01=0x0050, text=»!!RE 248,$$FALSE$$TRUE$$ DC «, t00=0x0002, t01=0x002c}
0x036c…0396 Head {h00=0x0026, h01=0x0050, text=»!!RE 249,$$FALSE$$FALSE$$ CCYWRTF «, t00=0x0002, t01=0x0050}
0x0396…03c0 Head {h00=0x0026, h01=0x0050, text=»!!RE 251,$$FALSE$$FALSE$$ C5MDISK «, t00=0x0002, t01=0x007a}
0x03c0…03e8 Head {h00=0x0024, h01=0x0050, text=»!!RE 252,$$TRUE$$FALSE$$ CKASFLG«, t00=0x0002, t01=0x00a4}
0x03e8…0410 Head {h00=0x0024, h01=0x0050, text=»!!RE 253,$$TRUE$$FALSE$$ CSLDFLG«, t00=0x0002, t01=0x00cc}
0x0410…043a Head {h00=0x0026, h01=0x0050, text=»!!RE 255,$$FALSE$$FALSE$$ CCONVERT«, t00=0x0002, t01=0x00f4}
0x043a…0464 Head {h00=0x0026, h01=0x0050, text=»!!RE 279,$$FALSE$$TRUE$$ CREMITFL «, t00=0x0002, t01=0x011e}
0x0464…0484 Head {h00=0x001c, h01=0x0050, text=»!!RE 287,$$FALSE$$TRUE$$«, t00=0x0002, t01=0x0148}
0x0484…04ae Head {h00=0x0026, h01=0x0050, text=»!!RE 288,$$FALSE$$TRUE$$ CTEXTFLG «, t00=0x0002, t01=0x0168}
0x04ae…04d8 (3, 0, 400) Head {h00=0x0026, h01=0x0050, text=»!!RE 289,$$FALSE$$TRUE$$ CSTRKFLG «, t00=0x0003, t01=0x0004}
0x04d8…0502 Head {h00=0x0026, h01=0x0050, text=»!!RE 290,$$FALSE$$TRUE$$ CBUDTFLG «, t00=0x0003, t01=0x002e}
0x0502…0512 Head {h00=0x000c, h01=0x0050, text=»!!DL 331«, t00=0x0003, t01=0x0058}
0x0512…0550 Head {h00=0x003a, h01=0x0050, text=»CFLAG BINI (12,2),X'0015',X'0000',X'0064',X'0000', C «, t00=0x0003, t01=0x0068}
0x0550…056a Head {h00=0x0016, h01=0x0050, text=» X'0000',X'0000' «, t00=0x0003, t01=0x00a6}
0x056a…0592 Head {h00=0x0024, h01=0x0050, text=»!!RE 361,$$FALSE$$TRUE$$T=BUDGET«, t00=0x0003, t01=0x00c0}
0x0592…05ba Head {h00=0x0024, h01=0x0050, text=»!!RE 362,$$FALSE$$TRUE$$ CFAKT10«, t00=0x0003, t01=0x00e8}
0x05ba…05e6 Head {h00=0x0028, h01=0x0050, text=»!!RE 416,$$01014610$$%VER%REL%MOD$$ «, t00=0x0003, t01=0x0110}
0x05e6…0622 Head {h00=0x0038, h01=0x0050, text=»!!RE 476,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC«, t00=0x0003, t01=0x013c}
0x0622…0650 Head {h00=0x002a, h01=0x0050, text=»!!RE 478,$$TRUE$$FALSE$$ NO VSL CHECK «, t00=0x0003, t01=0x0178}
0x0650…0678 Head {h00=0x0024, h01=0x0050, text=»!!RE 484,$$1400$$1400$$DISK SIZE«, t00=0x0004, t01=0x0016}
0x0678…069a Head {h00=0x001e, h01=0x0050, text=»!!RE 485,$$21$$21$$ CKTMAX«, t00=0x0004, t01=0x003e}
0x069a…06be Head {h00=0x0020, h01=0x0050, text=»!!RE 490,$$128$$80$$ CRECLGD«, t00=0x0004, t01=0x0060}
0x06be…06e2 Head {h00=0x0020, h01=0x0050, text=»!!RE 492,$$OD-KOM$$LEJRE $$ «, t00=0x0004, t01=0x0084}
0x06e2…0704 Head {h00=0x001e, h01=0x0050, text=»!!RE 493,$$7$$7$$ CKTINDX «, t00=0x0004, t01=0x00a8}
0x0704…072a Head {h00=0x0022, h01=0x0050, text=»!!RE 494,$$20$$20$$ INDEX FILE«, t00=0x0004, t01=0x00ca}
0x072a…074a Head {h00=0x001c, h01=0x0050, text=»!!RE 495,$$5$$5$$ CKTTOP«, t00=0x0004, t01=0x00f0}
0x074a…075e Head {h00=0x0010, h01=0x0050, text=»!!DL 496,497«, t00=0x0004, t01=0x0110}
0x075e…078c Head {h00=0x002a, h01=0x0050, text=»FROMTX STRGI (12)2C' ','KA',' ',' '«, t00=0x0004, t01=0x0124}
0x078c…07a4 Head {h00=0x0014, h01=0x0050, text=»!!DL 817,1091 RK«, t00=0x0004, t01=0x0152}
0x07a4…07be Head {h00=0x0016, h01=0x0050, text=»!!DL 1103,1105 RK «, t00=0x0004, t01=0x016a}
0x07be…07d8 Head {h00=0x0016, h01=0x0050, text=»!!DL 1156,1172 RK «, t00=0x0004, t01=0x0184}
0x07d8…07ea Head {h00=0x000e, h01=0x0050, text=»!!DL 1200 «, t00=0x0005, t01=0x000e}
0x07ea…080e Head {h00=0x0020, h01=0x0050, text=» MOVE TCT01,=W'3' PRINTER NR«, t00=0x0005, t01=0x0020}
0x080e…0824 Head {h00=0x0012, h01=0x0050, text=»!!DL 1250,1262«, t00=0x0005, t01=0x0044}
0x0824…0836 Head {h00=0x000e, h01=0x0050, text=»!!DL 1265 «, t00=0x0005, t01=0x005a}
0x0836…0842 Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0005, t01=0x006c}
0x0842…0850 Head {h00=0x000a, h01=0x0050, text=»NOD C «, t00=0x0005, t01=0x0078}
0x0850…0862 Head {h00=0x000e, h01=0x0050, text=»TRA /S,NL «, t00=0x0005, t01=0x0086}
0x0862…0874 Head {h00=0x000e, h01=0x0050, text=»INC DIV539«, t00=0x0005, t01=0x0098}
0x0874…0882 Head {h00=0x000a, h01=0x0050, text=»NOD R «, t00=0x0005, t01=0x00aa}
0x0882…0898 Head {h00=0x0012, h01=0x0050, text=»LED SCREEN,/S «, t00=0x0005, t01=0x00b8}
0x0898…08b8 Head {h00=0x001c, h01=0x0050, text=»!!CH $$KEY461$$KEY539$$ «, t00=0x0005, t01=0x00ce}
0x08b8…08d6 Head {h00=0x001a, h01=0x0050, text=»!!CH $$SL461$$SLCOP$$ «, t00=0x0005, t01=0x00ee}
0x08d6…08e2 Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0005, t01=0x010c}
0x08e2…08f4 Head {h00=0x000e, h01=0x0050, text=»TRA /S,NL «, t00=0x0005, t01=0x0118}
0x08f4…0906 Head {h00=0x000e, h01=0x0050, text=»INC RGSUB4«, t00=0x0005, t01=0x012a}
0x0906…0918 Head {h00=0x000e, h01=0x0050, text=»INC RGSTRT«, t00=0x0005, t01=0x013c}
0x0918…0926 Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0005, t01=0x014e}
0x0926…0938 Head {h00=0x000e, h01=0x0050, text=»INC RGMAIN«, t00=0x0005, t01=0x015c}
0x0938…094a Head {h00=0x000e, h01=0x0050, text=»INC RGSUBS«, t00=0x0005, t01=0x016e}
0x094a…095c Head {h00=0x000e, h01=0x0050, text=»INC RGSUB1«, t00=0x0005, t01=0x0180}
0x095c…096e (6, 0, 400) Head {h00=0x000e, h01=0x0050, text=»INC RGSUB2«, t00=0x0006, t01=0x0004}
0x096e…0980 Head {h00=0x000e, h01=0x0050, text=»INC RGSUB3«, t00=0x0006, t01=0x0016}
0x0980…098e Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0006, t01=0x0028}
0x098e…09a0 Head {h00=0x000e, h01=0x0050, text=»INC RGKLAR«, t00=0x0006, t01=0x0036}
0x09a0…09b2 Head {h00=0x000e, h01=0x0050, text=»INC KTPLN «, t00=0x0006, t01=0x0048}
0x09b2…09c4 Head {h00=0x000e, h01=0x0050, text=»INC KTOPR «, t00=0x0006, t01=0x005a}
0x09c4…09d2 Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0006, t01=0x006c}
0x09d2…09e4 Head {h00=0x000e, h01=0x0050, text=»INC RGADM «, t00=0x0006, t01=0x007a}
0x09e4…09f6 Head {h00=0x000e, h01=0x0050, text=»INC REMSUB«, t00=0x0006, t01=0x008c}
0x09f6…0a04 Head {h00=0x000a, h01=0x0050, text=»NOD R «, t00=0x0006, t01=0x009e}
0x0a04…0a14 Head {h00=0x000c, h01=0x0050, text=»INC ADM5«, t00=0x0006, t01=0x00ac}
0x0a14…0a26 Head {h00=0x000e, h01=0x0050, text=»INC SUBAPL«, t00=0x0006, t01=0x00bc}
0x0a26…0a38 Head {h00=0x000e, h01=0x0050, text=»INC REMPRT«, t00=0x0006, t01=0x00ce}
0x0a38…0a46 Head {h00=0x000a, h01=0x0050, text=»NOD R «, t00=0x0006, t01=0x00e0}
0x0a46…0a58 Head {h00=0x000e, h01=0x0050, text=»INC KMDIO «, t00=0x0006, t01=0x00ee}
0x0a58…0a6a Head {h00=0x000e, h01=0x0050, text=»INC DKSUBS«, t00=0x0006, t01=0x0100}
0x0a6a…0a7c Head {h00=0x000e, h01=0x0050, text=»INC REMTXT«, t00=0x0006, t01=0x0112}
0x0a7c…0a8e Head {h00=0x000e, h01=0x0050, text=»INC RAADUM«, t00=0x0006, t01=0x0124}
0x0a8e…0a9c Head {h00=0x000a, h01=0x0050, text=»NOD R «, t00=0x0006, t01=0x0136}
0x0a9c…0aae Head {h00=0x000e, h01=0x0050, text=»INC RGFRMT«, t00=0x0006, t01=0x0144}
0x0aae…0ac0 Head {h00=0x000e, h01=0x0050, text=»INC REMFMT«, t00=0x0006, t01=0x0156}
0x0ac0…0ace Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0006, t01=0x0168}
0x0ace…0ae0 Head {h00=0x000e, h01=0x0050, text=»INC REMLEV«, t00=0x0006, t01=0x0176}
0x0ae0…0af0 Head {h00=0x000c, h01=0x0050, text=»INC ADM6«, t00=0x0006, t01=0x0188}
0x0af0…0afe Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0007, t01=0x0008}
0x0afe…0b10 Head {h00=0x000e, h01=0x0050, text=»INC REMTR «, t00=0x0007, t01=0x0016}
0x0b10…0b22 Head {h00=0x000e, h01=0x0050, text=»LED REMBDT«, t00=0x0007, t01=0x0028}
0x0b22…0b36 Head {h00=0x0010, h01=0x0050, text=»!!DL 177,250«, t00=0x0007, t01=0x003a}
0x0b36…0b4a Head {h00=0x0010, h01=0x0050, text=»B821PR PROC «, t00=0x0007, t01=0x004e}
0x0b4a…0b56 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0007, t01=0x0062}
0x0b56…0b64 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0007, t01=0x006e}
0x0b64…0b84 Head {h00=0x001c, h01=0x0050, text=»!!DL 635 (FILLR ' ',40) «, t00=0x0007, t01=0x007c}
0x0b84…0b9a Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',22 «, t00=0x0007, t01=0x009c}
0x0b9a…0ba6 Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0007, t01=0x00b2}
0x0ba6…0bb8 Head {h00=0x000e, h01=0x0050, text=»TRA /S,NL «, t00=0x0007, t01=0x00be}
0x0bb8…0bc6 Head {h00=0x000a, h01=0x0050, text=»NOD D «, t00=0x0007, t01=0x00d0}
0x0bc6…0bd8 Head {h00=0x000e, h01=0x0050, text=»INC BUDGET«, t00=0x0007, t01=0x00de}
0x0bd8…0be8 Head {h00=0x000c, h01=0x0050, text=»TLK U,4K«, t00=0x0007, t01=0x00f0}
0x0be8…0bf8 Head {h00=0x000c, h01=0x0050, text=»INC PRT «, t00=0x0007, t01=0x0100}
0x0bf8…0c0a Head {h00=0x000e, h01=0x0050, text=»INC VDUPRT«, t00=0x0007, t01=0x0110}
0x0c0a…0c1c Head {h00=0x000e, h01=0x0050, text=»INC START «, t00=0x0007, t01=0x0122}
0x0c1c…0c2e Head {h00=0x000e, h01=0x0050, text=»INC TB3270«, t00=0x0007, t01=0x0134}
0x0c2e…0c3e Head {h00=0x000c, h01=0x0050, text=»$INCGEN «, t00=0x0007, t01=0x0146}
0x0c3e…0c4c Head {h00=0x000a, h01=0x0005, text=»LKE M «, t00=0x0007, t01=0x0156}
0x0c4c…0c62 Head {h00=0x0012, h01=0x0050, text=»KPF /L,RGL261 «, t00=0x0007, t01=0x0164}
0x0c62…0c6e Head {h00=0x0008, h01=0x0050, text=»SCR «, t00=0x0007, t01=0x017a}
0x0c6e…0ca4 Head {h00=0x0032, h01=0x0050, text=»MES $PDISC M=M:261,MU=M:POOL92,A=RGL261,C=C261«, t00=0x0007, t01=0x0186}
0x0ca4…0cb2 Head {h00=0x000a, h01=0x0050, text=»$ASG2 «, t00=0x0008, t01=0x002c}
0x0cb2…0cb6 (9, 1, 8) Head {h00=0x2004, h01=0x0000}
0x0cb6…0cba 00 09 00 04 ┆ ┆
0x0cba…0d0a (10, 0, 400) 00 1a 00 50 5c 44 49 53 50 4c 41 59 5c 30 2c 43 42 49 4e 31 2c 43 42 49 4e 30 00 0a 00 04 00 0c 00 50 5c 42 5c 43 4f 4e 54 20 00 0a 00 22 00 0a 00 50 45 43 4c 52 4e 31 00 0a 00 32 00 1a 00 50 5c 44 49 53 50 4c 41 59 5c 31 2c 43 42 49 4e 31 ┆ P DISPLAY 0,CBIN1,CBIN0 P B CONT " PECLRN1 2 P DISPLAY 1,CBIN1┆
0x0d0a…0d5a 2c 43 42 49 4e 30 00 0a 00 40 00 0c 00 50 5c 42 5c 43 4f 4e 54 20 00 0a 00 5e 00 0a 00 50 45 43 4c 52 4e 32 00 0a 00 6e 00 1a 00 50 5c 44 49 53 50 4c 41 59 5c 32 2c 43 42 49 4e 31 2c 43 42 49 4e 30 00 0a 00 7c 00 0c 00 50 5c 42 5c 43 4f 4e ┆,CBIN0 @ P B CONT ^ PECLRN2 n P DISPLAY 2,CBIN1,CBIN0 | P B CON┆
0x0d5a…0daa 54 20 00 0a 00 9a 00 0a 00 50 45 43 4c 52 4e 33 00 0a 00 aa 00 1a 00 50 5c 44 49 53 50 4c 41 59 5c 33 2c 43 42 49 4e 31 2c 43 42 49 4e 30 00 0a 00 b8 00 0c 00 50 5c 42 5c 43 4f 4e 54 20 00 0a 00 d6 00 0a 00 50 45 43 4c 52 4e 34 00 0a 00 e6 ┆T PECLRN3 P DISPLAY 3,CBIN1,CBIN0 P B CONT PECLRN4 ┆
0x0daa…0dfa 00 1a 00 50 5c 44 49 53 50 4c 41 59 5c 34 2c 43 42 49 4e 31 2c 43 42 49 4e 30 00 0a 00 f4 00 0c 00 50 5c 42 5c 43 4f 4e 54 20 00 0a 01 12 00 06 00 50 5c 20 00 0a 01 22 00 08 00 50 43 4f 4e 54 00 0a 01 2c 00 26 00 50 20 47 45 54 41 42 58 20 ┆ P DISPLAY 4,CBIN1,CBIN0 P B CONT P " PCONT , & P GETABX ┆
0x0dfa…0e4a 53 50 42 49 4e 57 34 20 47 45 54 20 43 55 52 52 45 4e 54 20 49 4e 44 45 58 20 00 0a 01 38 00 28 00 50 20 42 4c 20 4b 54 48 4f 4d 45 20 4a 55 4d 50 20 49 46 20 4e 4f 20 43 55 52 52 45 4e 54 20 46 49 45 4c 44 20 00 0a 01 62 00 0a 00 50 43 4f ┆SPBINW4 GET CURRENT INDEX 8 ( P BL KTHOME JUMP IF NO CURRENT FIELD b PCO┆
0x0e4a…0e9a (11, 0, 400) 4e 54 35 20 00 0a 01 8e 00 36 00 50 20 47 45 54 46 4c 44 20 30 2c 53 50 42 49 4e 57 34 2c 53 50 42 49 4e 57 33 20 53 45 41 52 43 48 20 43 55 52 52 45 4e 54 20 50 4f 53 49 54 49 4f 4e 20 00 0b 00 0c 00 1e 00 50 20 42 5a 20 53 45 54 43 52 45 ┆NT5 6 P GETFLD 0,SPBINW4,SPBINW3 SEARCH CURRENT POSITION P BZ SETCRE┆
0x0e9a…0eea 41 44 20 4a 55 4d 50 20 49 46 20 46 4f 55 4e 44 00 0b 00 46 00 22 00 50 20 42 4c 20 4b 54 48 4f 4d 45 20 50 4f 53 49 54 49 4f 4e 20 4e 4f 54 20 46 4f 55 4e 44 20 00 0b 00 68 00 06 00 50 2a 20 00 0b 00 8e 00 20 00 50 2a 20 20 20 20 43 4f 4d ┆AD JUMP IF FOUND F " P BL KTHOME POSITION NOT FOUND h P* P* COM┆
0x0eea…0f3a 50 55 4c 53 4f 52 59 20 46 49 45 4c 44 20 46 4f 55 4e 44 20 00 0b 00 98 00 06 00 50 2a 20 00 0b 00 bc 00 26 00 50 20 4d 4f 56 45 20 53 50 42 49 4e 57 34 2c 53 50 42 49 4e 57 33 20 43 48 41 4e 47 45 20 49 4e 44 45 58 00 0b 00 c6 00 1a 00 50 ┆PULSORY FIELD FOUND P* & P MOVE SPBINW4,SPBINW3 CHANGE INDEX P┆
0x0f3a…0f8a 20 42 20 43 4f 4e 54 35 20 53 45 41 52 43 48 20 41 47 41 49 4e 20 00 0b 00 f0 00 06 00 50 2a 20 00 0b 01 0e 00 04 00 50 00 0b 01 18 00 06 00 50 2a 20 00 0b 01 20 00 26 00 50 2a 20 20 20 20 53 45 54 20 43 55 52 53 4f 52 20 41 4e 44 20 52 45 ┆ B CONT5 SEARCH AGAIN P* P P* & P* SET CURSOR AND RE┆
0x0f8a…0fda 41 44 20 4b 45 59 42 4f 41 52 44 20 00 0b 01 2a 00 06 00 50 2a 20 00 0b 01 54 00 0c 00 50 53 45 54 43 52 45 41 44 00 0b 01 5e 00 28 00 50 5c 53 45 54 43 55 52 5c 5c 53 45 54 20 43 55 52 53 4f 52 20 4f 4e 20 43 55 52 52 45 4e 54 20 46 49 45 ┆AD KEYBOARD * P* T PSETCREAD ^ ( P SETCUR SET CURSOR ON CURRENT FIE┆
0x0fda…102a (12, 0, 400) 4c 44 00 0b 01 6e 00 04 00 50 00 0c 00 0a 00 06 00 50 2a 20 00 0c 00 12 00 2a 00 50 2a 20 20 20 20 52 45 41 44 20 54 4f 20 43 55 52 52 45 4e 54 20 46 49 45 4c 44 20 4f 4e 20 44 49 53 50 4c 41 59 20 00 0c 00 1c 00 06 00 50 2a 20 00 0c 00 4a ┆LD n P P* * P* READ TO CURRENT FIELD ON DISPLAY P* J┆
0x102a…107a 00 0a 00 50 52 45 41 44 49 4e 00 0c 00 54 00 1e 00 50 2a 20 20 20 20 20 53 45 54 20 46 4c 41 47 20 49 46 20 41 55 54 4f 44 55 50 20 00 0c 00 62 00 1a 00 50 2a 20 20 20 20 20 55 53 45 53 20 56 45 52 49 46 2d 46 49 45 4c 44 00 0c 00 84 00 18 ┆ PREADIN T P* SET FLAG IF AUTODUP b P* USES VERIF-FIELD ┆
0x107a…10ca 00 50 20 4d 4f 56 45 20 53 50 42 49 4e 57 32 2c 43 42 49 4e 33 20 00 0c 00 a2 00 18 00 50 20 4d 4f 56 45 20 53 50 42 49 4e 57 31 2c 43 42 49 4e 31 20 00 0c 00 be 00 0e 00 50 5c 54 53 54 43 54 4c 5c 36 20 00 0c 00 da 00 0e 00 50 5c 42 4f 4b ┆ P MOVE SPBINW2,CBIN3 P MOVE SPBINW1,CBIN1 P TSTCTL 6 P BOK┆
0x10ca…111a 5c 44 59 4b 49 4e 00 0c 00 ec 00 16 00 50 20 47 45 54 43 54 4c 20 30 2c 53 50 42 49 4e 57 33 20 00 0c 00 fe 00 22 00 50 20 4d 4f 56 45 20 53 50 42 49 4e 57 31 2c 43 46 4c 54 44 45 58 28 53 50 42 49 4e 57 33 29 00 0c 01 18 00 20 00 50 20 43 ┆ DYKIN P GETCTL 0,SPBINW3 " P MOVE SPBINW1,CFLTDEX(SPBINW3) P C┆
0x111a…116a 4d 50 20 47 53 53 57 49 54 43 48 28 53 50 42 49 4e 57 31 29 2c 43 42 49 4e 30 00 0c 01 3e 00 0e 00 50 20 42 45 20 44 59 4b 49 4e 20 00 0c 01 62 00 18 00 50 20 4d 4f 56 45 20 53 50 42 49 4e 57 31 2c 43 42 49 4e 31 20 00 0c 01 74 00 0e 00 50 ┆MP GSSWITCH(SPBINW1),CBIN0 > P BE DYKIN b P MOVE SPBINW1,CBIN1 t P┆