3 TARGET_SYS
=$SUPER3_8K_SYS
4 TARGET_SLST
=$SUPER3_8K_SLST
8 echo "TARGET_SYS --> $TARGET_SYS"
9 echo "TARGET_SLST --> $TARGET_SLST"
11 LAST_LOC
=$
((($CORESIZE*1024)-1))
12 BASE
=$
(($CORESIZE*1024-010000))
13 RESTART_BASE
=$
(($BASE+02000))
15 SUPER_BASE
=$RESTART_BASE
16 LAST_USER_LOC
=$
(($SUPER_BASE-1))
18 CLEANUP2_BASE
=$
(($BASE+02100))
19 PRNTNZ_BASE
=$
(($BASE+02200))
21 LOADER_BASE
=$
(($BASE+03000))
22 LOADER_LAST_CLEAR_LOC
=$
(($LOADER_BASE+077))
23 LOADER_LIMIT
=$
(($LOADER_BASE+02000))
24 LOADER_START
=$
(($LOADER_BASE+03000))
26 BINAL_BASE
=$
(($BASE+07000))
27 PAL_AP_BASE
=$BINAL_BASE
28 PUNCH_BASE
=$BINAL_BASE
29 PUNCH_LAST_LOC
=$
(($BINAL_BASE+0577))
47 eval "$n=\`printf \"0%o\" \$$n\`"
48 eval "printf \"%23s --> %05o\n\" $n \$$n"
55 printf "Load: %20s --> %o\n" $1 $2
58 if [ "$FRESH_LOAD" ]; then
64 echo *** Loading $1 --> $2 $ST
83 cmd
="if [ \"\$LOAD_$n\" ]; then load \"\$$n\" \$${n}_BASE; fi"
84 # echo "Process command: " $cmd
89 echo "\nAutomatic address generation:\n--------------"
90 octalize BASE RESTART_BASE CLEANUP2_BASE PRNTNZ_BASE LOADER_BASE \
91 LOADER_START LOADER_LIMIT BINAL_BASE PAL_AP_BASE \
92 LDR8_BASE LDR8_START LDR8_RESTART LDR8_MAP \
93 LAST_USER_LOC LAST_LOC SUPER_BASE PUNCH_BASE PUNCH_LAST_LOC \
95 echo "--------------\n\n"
98 # Determine if we have to load LDR-APM to somewhere else than
99 # the default location where it comes from the original 8K tape. # This will load LDR-APM whenever something else than 8K memory is
102 if [ $LOADER_BASE = $LDR8_BASE ]; then
103 echo "LDR-APM will be in the right place at once."
106 echo "LDR-APM will be loaded."
110 if [ ! "$MAKE" ]; then
111 echo "Not run from within Makefile!"
119 echo Patching loader
for high memory load support...
120 cat >> $DO_FILE <<EOF
121 ; enter high loader address for loading above itself
127 process RESTART CLEANUP2 PRNTNZ BINAL PAL_AP
129 cat >> $DO_FILE <<EOF
131 ; Patching final loader.
132 d $LOADER_LIMIT $LAST_USER_LOC
138 d 20-$LAST_USER_LOC 0
139 d $LOADER_BASE-$LOADER_LAST_CLEAR_LOC 0
145 ; Settings for immediate load after sys restore