Dave Schoenwetter’s Aerco patch for MTerm.
Content
Image Gallery
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