Dave Schoenwetter’s Aerco patch for MTerm.
Appears on
Library tape from the Sinclair Computer Users Society (SINCUS).
Source Code
100 INPUT "DO YOU HAVE MTERM CODE LOADED?"'" yes/no ";a$ 110 IF a$="yes" THEN GO TO 4000 120 PRINT "PLEASE LOAD MTERM CODE AND RUN" 130 STOP 4000 RESTORE 4100 4010 FOR f=59173 TO 59175 4020 GO SUB 4500 4030 NEXT f 4040 FOR f=59188 TO 59190 4050 GO SUB 4500 4060 NEXT f 4070 FOR f=58618 TO 58833 4080 GO SUB 4500 4090 NEXT f 4092 PRINT ''''''"SAVE YOUR ALTERED MTERM ON TAPE" 4093 PRINT ''' 4094 PRINT "DAVE SCHOENWETTER" 4095 PRINT "1335 FARM TO MARKET RD." 4096 PRINT "ENDWELL, NEW YORK, 13760" 4099 PRINT '''"all done": STOP 4100 DATA 195,126,229 4102 DATA 195,178,229 4104 DATA 42,232,238,237 4106 DATA 75,236,238,3 4108 DATA 125,185,32,7 4110 DATA 124,184,32,3 4112 DATA 195,80,229,62 4114 DATA 127,219,254,31 4116 DATA 210,80,229,219 4118 DATA 127,230,16,32 4120 DATA 242,126,254,10 4122 DATA 32,2,62,0 4124 DATA 254,12,32,2 4126 DATA 62,0,205,48 4128 DATA 229,35,195,2 4130 DATA 229,0,211,127 4132 DATA 0,219,127,201 4134 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 4136 DATA 0,0,62,13 4138 DATA 205,48,229,62 4140 DATA 13,205,48,229 4142 DATA 62,13,205,48 4144 DATA 229,33,117,239 4146 DATA 54,13,6,32 4148 DATA 43,54,32,16 4150 DATA 251,125,50,231 4152 DATA 238,201,33,195 4154 DATA 229,126,167,32 4156 DATA 4,62,35,119 4158 DATA 201,175,24,251 4160 DATA 203,79,194,40 4162 DATA 231,245,197,229 4164 DATA 42,176,229,237 4166 DATA 75,174,229,237 4168 DATA 66,32,4,225 4170 DATA 193,241,201,219 4172 DATA 127,230,16,32 4174 DATA 246,10,205,48 4176 DATA 229,3,62,96 4178 DATA 184,32,3,1 4180 DATA 0,94,237,67 4182 DATA 174,229,24,227 4184 DATA 0,94,0,94 4186 DATA 229,219,115,254 4188 DATA 12,40,4,254 4190 DATA 10,32,1,175 4192 DATA 245,42,176,229 4194 DATA 119,35,62,96 4196 DATA 188,32,3,33 4198 DATA 0,94,34,176 4200 DATA 229,241,225,201 4510 READ a: POKE f,a 4520 PRINT f,PEEK f 4530 RETURN