github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-04-26 04:07:36 +00:00
Code Issues Releases Wiki Activity

Make SST assemble.

Browse Source
This commit is contained in:
Lars Brinkhoff
2019-01-22 20:33:42 +01:00
parent f9b51480a2
commit c87d29ecc0
4 changed files with 41 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
build/misc.tcl
View File

@@ -1120,6 +1120,10 @@ expect ":KILL"
respond "*" ":midas sys2; ts tvedit_sysen2; tvedit\r" respond "*" ":midas sys2; ts tvedit_sysen2; tvedit\r"
expect ":KILL" expect ":KILL"
# SST
respond "*" ":midas imlac;_sst21\r"
expect ":KILL"
# Maze War # Maze War
respond "*" ":midas /t sysbin;_imsrc; maze\r" respond "*" ":midas /t sysbin;_imsrc; maze\r"
respond "with ^C" "MOUSE==1\r\003" respond "with ^C" "MOUSE==1\r\003"

12
src/imlac/sst21.1 → src/imlac/sst21.5
View File

@@ -1108,7 +1108,7 @@ SRIGHT: 0
ISZ SRIGHT ; no skip if its a bracket ISZ SRIGHT ; no skip if its a bracket
JMP @SRIGHT ; skips if its anything else JMP @SRIGHT ; skips if its anything else
SUBTTL MUDDLE Front, Back, and Up ;SUBTTL MUDDLE Front, Back, and Up
; move to front ; move to front
MF: 0 MF: 0
@@ -2381,10 +2381,10 @@ TEMPNT: 0
TMASK: 0 ; current mask for macros TMASK: 0 ; current mask for macros
TMP: 0 TMP: 0
INFORM START OF FIRST CONSTANTS ;INFORM START OF FIRST CONSTANTS
VARIAB VARIAB
CONSTA CONSTA
INFORM END OF FIRST CONSTANTS ;INFORM END OF FIRST CONSTANTS
; *** NO CONSTANTS CREATED FROM HERE ON *** ; *** NO CONSTANTS CREATED FROM HERE ON ***
@@ -2686,7 +2686,7 @@ FNYTAB: DJMS H010
.INSRT IMSRC;SSVCHR > .INSRT IMSRC;SSVCHR >
.CRFON .CRFON
INFORM LAST CHAR ;INFORM LAST CHAR
DCRLF: DJMS D015 DCRLF: DJMS D015
DJMS D012 DJMS D012
@@ -2732,7 +2732,7 @@ LZERO: DJMS D060, ? DJMS D061, ? DJMS D062, ? DJMS D063
DJMS D174, ? DJMS D175, ? DJMS D176, ? DJMS DFORM DJMS D174, ? DJMS D175, ? DJMS D176, ? DJMS DFORM
INFORM START OF DLIST ;INFORM START OF DLIST
DORIG: DADR DORIG: DADR
DHVS 1 DHVS 1
@@ -2794,7 +2794,7 @@ DEND: DJMP DLINES
DOVERP: DOVERP:
INFORM HIGHEST USED ;INFORM HIGHEST USED
END GO101 END GO101

36
src/imsrc/ssv.chars
View File

@@ -14,6 +14,7 @@ D033: INC E,D3M2 ; ALTMODE
INC BM20,BM1M3 INC BM20,BM1M3
INC B0M2,B1M3 INC B0M2,B1M3
INC F,F INC F,F
IFN 0,[
DCURT: DNOP DCURT: DNOP
INC E,D0M3 INC E,D0M3
INC D0M1,B30 INC D0M1,B30
@@ -22,6 +23,7 @@ DFORM: INC E,D0M1
INC B0M3,B30 INC B0M3,B30
INC B30,B03 INC B30,B03
INC R,R INC R,R
]
DWAIT: INC E,P ; 40 MICROSECOND WAIT DWAIT: INC E,P ; 40 MICROSECOND WAIT
INC P,P INC P,P
INC P,P INC P,P
@@ -563,9 +565,31 @@ D176: INC E,D13 ; NOT BAR
INC D03,D02 INC D03,D02
INC B30,B20 INC B30,B20
INC B0M3,F INC B0M3,F
,BM10
INC F,F D001:
D176: INC E,D13 ; NOT BAR D002:
INC D03,D02 D003:
INC B30,B20 D004:
INC B0M                                                D005:
D006:
D007:
D013:
D014:
D016:
D017:
D020:
D021:
D022:
D023:
D024:
D025:
D026:
D027:
D030:
D031:
D032:
D032:
D034:
D035:
D036:
D037:

1
src/imsrc/ssvchr.999 Symbolic link
View File

@@ -0,0 +1 @@
imsrc/ssv.chars