|
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: 1466 (0x5ba)
Notes: pts_type(UF)
Names: »JOSKB.UF«
└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
└─⟦this⟧ »TOSSWORK/JOSKB.UF«
LED DRKB03 !!RE 0,$$78-04-21$$78-08-24$$ !!IL 1 ADAPTED TO KEYBOARD PTS 6271/72 REL 8.1 78-04-21 !!IL 89 * -----NUMERIC SHIFT-FUNCTION !!RE 138,$$10$$X:F$$ !!IL 208 * BY SETTING X:H = 1 THIS DRIVER IS ADAPTED FOR * KEYBOARD PTS 6271 AND 6272 X:H EQU 1 NSHIFT EQU X:H !!IL 588 IFT NSHIFT=0 CWK A4,1 INDICATE SKIP CHARACTER RF(E) EXIT YESD XIF !!IL 703 IFT NSHIFT=0 SUK A4,/7C CODE > /7B RF(NN) KON500 YES LDR A4,A2 RESTORE CHARACTER XIF !!RE 710,$$10$$10 FUNCTION$$ !!RE 711,$$110$$110 NO$$ !!RE 712,$$40$$40 YES$$ !!DL 713 KON105 EQU * ANK A5,/10 SRL A5,3 !!RE 717,$$140$$140 SHIFT ON$$ !!RE 719,$$160$$160 SHIFT OFF$$ !!DL 720 RF(Z) KON170 CONTROL ON IFT NSHIFT=1 SUK A4,2 RF(N) KON125 CONTROL OFF RF(E) KON140 NUMERICAL SHIFT ON RF KON160 NUMERICAL SHIFT OFF XIF KON125 EQU * !!RE 736,$$2$$4$$ !!IL 747 KON500 EQU * LDR A4,A4 KEY CODE /7C RF(Z) KON600 YES LDK A4,1 INDICATE SKIP CHARACTER RTN A15 RB KON300 RETURN KON600 EQU * SUR A2,A2 RB KONVER DO START AGAIN !!EN ASM /S KPF /O ASG /E0,TY10
0x000…012 (0, 0, 400) Head {h00=0x000e, h01=0x000a, text=»LED DRKB03«, t00=0x0000, t01=0x0004}
0x012…038 Head {h00=0x0022, h01=0x0050, text=»!!RE 0,$$78-04-21$$78-08-24$$ «, t00=0x0000, t01=0x0016}
0x038…046 Head {h00=0x000a, h01=0x0006, text=»!!IL 1«, t00=0x0000, t01=0x003c}
0x046…070 Head {h00=0x0026, h01=0x0022, text=» ADAPTED TO KEYBOARD PTS 6271/72«, t00=0x0000, t01=0x004a}
0x070…08c Head {h00=0x0018, h01=0x0013, text=» REL 8.1 78-04-21 «, t00=0x0000, t01=0x0074}
0x08c…09c Head {h00=0x000c, h01=0x0007, text=»!!IL 89 «, t00=0x0000, t01=0x0090}
0x09c…0c4 Head {h00=0x0024, h01=0x0020, text=»* -----NUMERIC SHIFT-FUNCTION«, t00=0x0000, t01=0x00a0}
0x0c4…0e0 Head {h00=0x0018, h01=0x0014, text=»!!RE 138,$$10$$X:F$$«, t00=0x0000, t01=0x00c8}
0x0e0…0f0 Head {h00=0x000c, h01=0x0008, text=»!!IL 208«, t00=0x0000, t01=0x00e4}
0x0f0…12c Head {h00=0x0038, h01=0x0050, text=»* BY SETTING X:H = 1 THIS DRIVER IS ADAPTED FOR «, t00=0x0000, t01=0x00f4}
0x12c…154 Head {h00=0x0024, h01=0x0020, text=»* KEYBOARD PTS 6271 AND 6272«, t00=0x0000, t01=0x0130}
0x154…166 Head {h00=0x000e, h01=0x0050, text=»X:H EQU 1 «, t00=0x0000, t01=0x0158}
0x166…17c Head {h00=0x0012, h01=0x0050, text=»NSHIFT EQU X:H«, t00=0x0000, t01=0x016a}
0x17c…18c Head {h00=0x000c, h01=0x0008, text=»!!IL 588«, t00=0x0000, t01=0x0180}
0x18c…1a2 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=0«, t00=0x0000, t01=0x0190}
0x1a2…1cc Head {h00=0x0026, h01=0x0021, text=» CWK A4,1 INDICATE SKIP CHARACTER «, t00=0x0001, t01=0x0016}
0x1cc…1e4 Head {h00=0x0014, h01=0x0010, text=» RF(E) EXIT YESD«, t00=0x0001, t01=0x0040}
0x1e4…1f0 Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0001, t01=0x0058}
0x1f0…200 Head {h00=0x000c, h01=0x0008, text=»!!IL 703«, t00=0x0001, t01=0x0064}
0x200…216 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=0 «, t00=0x0001, t01=0x0074}
0x216…234 Head {h00=0x001a, h01=0x0016, text=» SUK A4,/7C CODE > /7B«, t00=0x0001, t01=0x008a}
0x234…24e Head {h00=0x0016, h01=0x0012, text=» RF(NN) KON500 YES«, t00=0x0001, t01=0x00a8}
0x24e…272 Head {h00=0x0020, h01=0x001c, text=» LDR A4,A2 RESTORE CHARACTER«, t00=0x0001, t01=0x00c2}
0x272…27e Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0001, t01=0x00e6}
0x27e…2a2 Head {h00=0x0020, h01=0x001c, text=»!!RE 710,$$10$$10 FUNCTION$$«, t00=0x0001, t01=0x00f2}
0x2a2…2c2 Head {h00=0x001c, h01=0x0018, text=»!!RE 711,$$110$$110 NO$$«, t00=0x0001, t01=0x0116}
0x2c2…2e2 Head {h00=0x001c, h01=0x0017, text=»!!RE 712,$$40$$40 YES$$ «, t00=0x0001, t01=0x0136}
0x2e2…2f2 Head {h00=0x000c, h01=0x0008, text=»!!DL 713«, t00=0x0001, t01=0x0156}
0x2f2…306 Head {h00=0x0010, h01=0x000c, text=»KON105 EQU *«, t00=0x0001, t01=0x0166}
0x306…31a Head {h00=0x0010, h01=0x000b, text=» ANK A5,/10 «, t00=0x0001, t01=0x017a}
0x31a…32c Head {h00=0x000e, h01=0x0009, text=» SRL A5,3 «, t00=0x0001, t01=0x018e}
0x32c…352 Head {h00=0x0022, h01=0x001e, text=»!!RE 717,$$140$$140 SHIFT ON$$«, t00=0x0002, t01=0x0010}
0x352…37a Head {h00=0x0024, h01=0x001f, text=»!!RE 719,$$160$$160 SHIFT OFF$$ «, t00=0x0002, t01=0x0036}
0x37a…38a Head {h00=0x000c, h01=0x0008, text=»!!DL 720«, t00=0x0002, t01=0x005e}
0x38a…3aa Head {h00=0x001c, h01=0x0018, text=» RF(Z) KON170 CONTROL ON«, t00=0x0002, t01=0x006e}
0x3aa…3c0 Head {h00=0x0012, h01=0x000d, text=» IFT NSHIFT=1 «, t00=0x0002, t01=0x008e}
0x3c0…3d2 Head {h00=0x000e, h01=0x0009, text=» SUK A4,2 «, t00=0x0002, t01=0x00a4}
0x3d2…3f4 Head {h00=0x001e, h01=0x0019, text=» RF(N) KON125 CONTROL OFF «, t00=0x0002, t01=0x00b6}
0x3f4…41c Head {h00=0x0024, h01=0x0020, text=» RF(E) KON140 NUMERICAL SHIFT ON«, t00=0x0002, t01=0x00d8}
0x41c…442 Head {h00=0x0022, h01=0x001e, text=» RF KON160 NUMERICAL SHIFT OFF«, t00=0x0002, t01=0x0100}
0x442…44e Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0002, t01=0x0126}
0x44e…462 Head {h00=0x0010, h01=0x000c, text=»KON125 EQU *«, t00=0x0002, t01=0x0132}
0x462…47c Head {h00=0x0016, h01=0x0011, text=»!!RE 736,$$2$$4$$ «, t00=0x0002, t01=0x0146}
0x47c…48c Head {h00=0x000c, h01=0x0008, text=»!!IL 747«, t00=0x0002, t01=0x0160}
0x48c…4a0 Head {h00=0x0010, h01=0x000c, text=»KON500 EQU *«, t00=0x0002, t01=0x0170}
0x4a0…4c0 Head {h00=0x001c, h01=0x0017, text=» LDR A4,A4 KEY CODE /7C «, t00=0x0002, t01=0x0184}
0x4c0…4da Head {h00=0x0016, h01=0x0011, text=» RF(Z) KON600 YES «, t00=0x0003, t01=0x0014}
0x4da…504 Head {h00=0x0026, h01=0x0021, text=» LDK A4,1 INDICATE SKIP CHARACTER «, t00=0x0003, t01=0x002e}
0x504…514 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0003, t01=0x0058}
0x514…52e Head {h00=0x0016, h01=0x0011, text=» RB KON300 RETURN «, t00=0x0003, t01=0x0068}
0x52e…542 Head {h00=0x0010, h01=0x0050, text=»KON600 EQU *«, t00=0x0003, t01=0x0082}
0x542…554 Head {h00=0x000e, h01=0x000a, text=» SUR A2,A2«, t00=0x0003, t01=0x0096}
0x554…576 Head {h00=0x001e, h01=0x0019, text=» RB KONVER DO START AGAIN «, t00=0x0003, t01=0x00a8}
0x576…582 Head {h00=0x0008, h01=0x0004, text=»!!EN«, t00=0x0003, t01=0x00ca}
0x582…590 Head {h00=0x000a, h01=0x0050, text=»ASM /S«, t00=0x0003, t01=0x00d6}
0x590…59e Head {h00=0x000a, h01=0x0006, text=»KPF /O«, t00=0x0003, t01=0x00e4}
0x59e…5b2 Head {h00=0x0010, h01=0x000c, text=»ASG /E0,TY10«, t00=0x0003, t01=0x00f2}
0x5b2…5ba (4, 1, 8) 20 04 00 00 00 04 00 04 ┆ ┆