projects
/
pdp8.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
d7c45a779e99aa2301bb3d20b06b6ee5a88ca387
[pdp8.git]
/
sw
/
src
/
omni_usb
/
test.pa
1
2
3
KTURBO=6407
4
TTURBO=6417
5
KSF2=6401
6
*0
7
INT, 0
8
KSF2
9
HLT / NO KEYBOARD INTERRUPT!
10
INT2,
11
CLA CLL
12
KTURBO
13
JMP INTEX / NO DATA AVAILABLE, EXIT INTERRUPT
14
TTURBO
15
JMP .-1
16
CMA
17
TTURBO
18
JMP .-1
19
JMP INT2
20
21
INTEX, ION
22
TAD K3333
23
JMP I INT
24
25
K3333, 3333
26
27
XSTART, START
28
29
*200
30
31
START,
32
CLA CLL
33
6110
34
6120
35
6140
36
6270
37
6270
38
6270
39
6470
40
6470
41
6470
42
6441
43
6442
44
6444
45
HLT
46
CAF
47
L1, KSF2 / READ EVERYTHING THAT COULD BE READ
48
JMP S2
49
KTURBO
50
HLT
51
JMP L1
52
53
S2, CLA CLL
54
ION
55
TAD K2222
56
JMP .
57
58
K2222, 2222
59
60
61
*7700 JMP I XSTART
62
63
*400 / SEND OUT SWITCH REGISTER AND HALT
64
KEY, LAS
65
TTURBO
66
JMP .-1
67
HLT
68
JMP KEY
69
70
*500
71
DISP, CLA CLL
72
D2, KSF2
73
JMP .-1
74
6406
75
JMP D2
76
77
$