glm94/pdp7-unix
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

add ttt{1,2}.s and un.s

Browse Source
This commit is contained in:
Sebastian Rasmussen
2019-10-19 01:40:52 +02:00
parent fd7bccee21
commit a0ffc28455
4 changed files with 1036 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
scans/ttt2.s
+271
View File
@@ -0,0 +1,271 @@
" ttt2
boardp: board
shufp: sbuf
qdt: <dt>
imaxin: -4000
noblink: 060000
blinkpar: 070000
setxy: setx
setyv: sety
o12: 012
o14: 014
o74: 074
o3: 03
o2000: 02000
o60: o60
o4: 4
o3000: 03000
o4000: 04000
o2: 2
o1000: 01000
d1: 1
dm60: -060
o77: 077
line:
tb = tad board-1
tb+52; tb+56; tb+60; tb+64
tb+1; tb+6; tb+11; tb+16
tb+2; tb+6; tb+10; tb+14
tb+2; tb+18; tb+34; tb+50
tb+2; tb+22; tb+42; tb+62
tb+3; tb+7; tb+11; tb+15
tb+3; tb+23; tb+43; tb+63
tb+3; tb+19; tb+35; tb+51
tb+4; tb+7; tb+10; tb+13
tb+4; tb+8; tb+12; tb+16
tb+4; tb+19; tb+34; tb+49
tb+4; tb+20; tb+36; tb+52
tb+4; tb+23; tb+42; tb+61
tb+61; tb+62; tb+63; tb+64
tb+4; tb+24; tb+44; tb+64
tb+5; tb+6; tb+7; tb+8
tb+5; tb+21; tb+37; tb+53
tb+5; tb+22; tb+39; tb+56
tb+6; tb+22; tb+38; tb+54
tb+7; tb+23; tb+39; tb+55
tb+8; tb+23; tb+38; tb+53
tb+8; tb+24; tb+40; tb+56
tb+9; tb+10; tb+11; tb+12
tb+9; tb+26; tb+43; tb+60
tb+9; tb+25; tb+41; tb+57
tb+12; tb+28; tb+44; tb+60
tb+13; tb+14; tb+15; tb+16
tb+13; tb+25; tb+37; tb+49
tb+13; tb+26; tb+39; tb+52
tb+13; tb+29; tb+45; tb+61
tb+13; tb+30; tb+47; tb+64
tb+14; tb+26; tb+38; tb+50
tb+14; tb+30; tb+46; tb+62
tb+15; tb+27; tb+39; tb+51
tb+53; tb+54; tb+55; tb+56
tb+13; tb+31; tb+47; tb+63
tb+16; tb+28; tb+40; tb+52
tb+16; tb+27; tb+38; tb+49
tb+16; tb+31; tb+46; tb+61
tb+16; tb+32; tb+48; tb+64
tb+17; tb+21; tb+25; tb+29
tb+17; tb+18; tb+19; tb+20
tb+17; tb+22; tb+27; tb+32
tb+18; tb+22; tb+26; tb+30
tb+19; tb+23; tb+27; tb+31
tb+20; tb+23; tb+26; tb+29
tb+20; tb+24; tb+28; tb+32
tb+21; tb+22; tb+23; tb+24
tb+25; tb+26; tb+27; tb+28
tb+29; tb+30; tb+31; tb+32
tb+33; tb+34; tb+35; tb+36
tb+33; tb+38; tb+43; tb+48
tb+33; tb+37; tb+41; tb+45
tb+34; tb+38; tb+42; tb+46
tb+35; tb+39; tb+43; tb+47
tb+36; tb+39; tb+42; tb+45
tb+36; tb+40; tb+44; tb+48
tb+37; tb+38; tb+39; tb+40
tb+41; tb+42; tb+43; tb+44
tb+45; tb+46; tb+47; tb+48
tb+49; tb+50; tb+51; tb+52
tb+49; tb+53; tb+57; tb+61
tb+12; tb+27; tb+42; tb+57
tb+49; tb+54; tb+59; tb+64
tb+50; tb+54; tb+58; tb+62
tb+51; tb+55; tb+59; tb+63
tb+52; tb+55; tb+58; tb+61
tb+57; tb+58; tb+59; tb+60
tb+11; tb+27; tb+43; tb+59
tb+10; tb+26; tb+42; tb+58
tb+1; tb+2; tb+3; tb+4
tb+1; tb+5; tb+9; tb+13
tb+1; tb+17; tb+33; tb+49
tb+1; tb+18; tb+35; 52
tb+1; tb+21; tb+41; tb+61
tb+1; tb+22; tb+43; tb+64
plane:
tb+1; tb+2; tb+3; tb+4; tb+5; tb+6; tb+7; tb+8
tb+9; tb+10; tb+11; tb+12; tb+13; tb+14; tb+15; tb+16
tb+17; tb+18; tb+19; tb+20; tb+21; tb+22; tb+23; tb+24
tb+25; tb+26; tb+27; tb+28; tb+29; tb+30; tb+31; tb+32
tb+33; tb+34; tb+35; tb+36; tb+37; tb+38; tb+39; tb+40
tb+41; tb+42; tb+43; tb+44; tb+45; tb+46; tb+47; tb+48
tb+49; tb+50; tb+51; tb+52; tb+53; tb+54; tb+55; tb+56
tb+57; tb+58; tb+59; tb+60; tb+61; tb+62; tb+63; tb+64
tb+13; tb+14; tb+15; tb+16; tb+29; tb+30; tb+31; tb+32
tb+45; tb+46; tb+47; tb+48; tb+91; tb+62; tb+63; tb+64
tb+9; tb+10; tb+11; tb+12; tb+25; tb+26; tb+27; tb+28
tb+41; tb+42; tb+43; tb+44; tb+57; tb+58; tb+59; tb+60
tb+5; tb+6; tb+7; tb+8; tb+21; tb+22; tb+23; tb+24
tb+37; tb+38; tb+39; tb+40; tb+53; tb+54; tb+55; tb+56
tb+1; tb+2; tb+3; tb+4; tb+17; tb+18; tb+19; tb+20
tb+33; tb+34; tb+35; tb+36; tb+49; tb+50; tb+51; tb+52
tb+1; tb+5; tb+9; tb+13; tb+17; tb+21; tb+25; tb+29
tb+33; tb+37; tb+41; tb+45; tb+49; tb+53; tb+57; tb+61
tb+2; tb+6; tb+10; tb+14; tb+18; tb+22; tb+26; tb+30
tb+34; tb+38; tb+42; tb+46; tb+50; tb+54; tb+58; tb+62
tb+3; tb+7; tb+11; tb+15; tb+19; tb+23; tb+27; tb+31
tb+35; tb+39; tb+43; tb+47; tb+51; tb+55; tb+59; tb+63
tb+4; tb+8; tb+12; tb+16; tb+20; tb+24; tb+28; tb+32
tb+36; tb+40; tb+44; tb+48; tb+52; tb+56; tb+60; tb+64
tb+1; tb+6; tb+11; tb+16; tb+17; tb+22; tb+27; tb+32
tb+33; tb+38; tb+43; tb+48; tb+49; tb+54; tb+59; tb+64
tb+4; tb+7; tb+10; tb+13; tb+20; tb+23; tb+26; tb+29
tb+35; tb+39; tb+42; tb+45; tb+52; tb+55; tb+58; tb+62
tb+1; tb+2; tb+3; tb+4; tb+21; tb+22; tb+23; tb+24
tb+41; tb+42; tb+43; tb+44; tb+61; tb+62; tb+63; tb+67
tb+13; tb+14; tb+15; tb+16; tb+25; tb+26; tb+27; tb+28
tb+37; tb+38; tb+39; tb+40; tb+39; tb+50; tb+51; tb+52
tb+1; tb+5; tb+9; tb+13; tb+18; tb+22; tb+26; tb+30
tb+35; tb+39; tb+43; tb+47; tb+52; tb+56; tb+60; tb+64
tb+4; tb+8; tb+12; tb+16; tb+19; tb+23; tb+27; tb+31
tb+34; tb+38; tb+42; tb+46; tb+49; tb+53; tb+57; tb+61
pritab:
0;10;22;0
0;10;20;0
0;30;30;0
0;0;0;0;0
ex:
vx 0100
vy 020 iv
vx 0200
vy 040 v
vx m 0140
vy 0 iv
vx 0100
vy m 040 v
dnop
dnop
dnop
dnop
oh:
vx 0100
vy020 iv
vx0140
vy 0 v
vx 040
vy 040 v
vx m 0140
vy 0 v
vx m 040
vy m 040 v
dnop
dnop
dot:
ipenb
vx 0200
vy 040 iv
vx 05
vy 0 v
vx 0
vy m 05 v
vx m 05
vy 0 v
vx 0
vy 05 v
lpdis
dbuf:
lpdis
scale 0
setx 0
sety 0
"
vx 01400 v
vx 0377
vy 0374 v
vx m 01377 v
vx m 0400
vy m 0374 v
"
setx 0
sety 0400
vx 01400 v
vx 0377
vy 0374 v
vx m 01377 v
vx m 0400
vy m 0374 v
"
setx 0
sety 01000
vx 01400 v
vx 0377
vy 0374 v
vx m 01377 v
vx m 0400
vy m 0374 v
"
setx 0
sety 01400
vx 01400 v
vx 0377
vy 0374 v
vx m 01377 v
vx m 0400
vy m 0374 v
dnop
sbuf: .=.+1050
board: .=.+64
maxin: .=.+1
force: .=.+1
pri: .=.+1
lpri: .=.+1
lforce: .=.+1
rand: .=.+1
lmov: .=.+1
dspflg: .=.+1
lpadr: .=.+1
pbadr: .=.+1
blink: .=.+1
blk1: .=.+1
blk2: .=.+1
9: .=.+1
stack:
dnop = 040040
setx = 0140000
sety = 0164000
n = 02000
scale = 0040040
y = 020000
iy = 030000
vx = 0100000
vy = 0104000
lpdis = 0044000
lpenb = 0046000
vbl = 0704424