Type in and save this for the swiftlink patch program. If you are not using Proofreader, ignore the first 2 characters at the start of each line.
PF 1 x=0
HC 2 print”installing swiftlink patch”
XF 15 read a
SF 16 if a= -1 then goto 18
GK 17 poke 51200+x,a:x=x+1:goto 15
RA 18 for x=51619 to 51652
DM 19 poke x,0:next x
AM 20 poke 51647,71
SR 21 poke 51648,254
PB 22 for x=51653 to 51655
CE 23 poke x,234:next x
XG 24 sys 51200
MJ 25 print”patching done”:new
XF 100 data 76,3,200,120,173,27,3,201,200,240,59,160,20,185,25,3
RJ 101 data 153,169,201,136,208,247,173,26,3,141,83,200,173,27
GE 102 data 3,141,84,200,173,28,3,141,76,201,173,29,3,141,77,201
KC 103 data 173,38,3,141,56,201,173,39,3,141,57,201,173,44,3,141
XC 104 data 136,201,173,45,3,141,137,201,169,82,141,26,3,169,200
HE 105 data 141,27,3,88,96,32,74,243,8,72,165,186,201,2,240,3
EG 106 data 104,40,96,152,72,160,0,140,156,2,140,155,2,140,193
KR 107 data 201,140,194,201,140,7,222,177,187,168,185,143,201,16
AX 108 data 12,160,16,140,3,222,41,127,141,7,222,169,0,9,16,141
FF 109 data 3,222,169,9,141,2,222,141,196,201,41,112,9,9,141,195
EA 110 data 201,120,173,25,3,201,200,240,19,141,192,201,173,24,3
RH 111 data 141,191,201,169,221,141,24,3,169,200,141,25,3,88,169
CH 112 data 75,141,28,3,169,201,141,29,3,169,47,141,38,3,169,201
RK 113 data 141,39,3,169,201,141,44,3,169,135,141,45,3,32,8,201
RH 114 data 104,168,104,40,96,72,138,72,152,72,216,173,1,222,41
GR 115 data 8,240,14,172,155,2,173,0,222,145,247,238,155,2,238
RS 116 data 193,201,234,32,225,255,208,3,76,102,254,104,168,104
GC 117 data 170,104,64,0,8,72,173,3,221,9,16,141,3,221,173,1,222
JR 118 data 41,64,240,11,173,1,221,9,16,141,1,221,104,40,96,173
BP 119 data 1,221,41,239,141,1,221,104,40,96,72,165,154,201,2
DC 120 data 240,4,104,76,202,241,173,1,222,41,16,240,249,24,104
JE 121 data 141,0,222,144,2,169,0,96,32,145,242,8,72,165,186,201
QP 122 data 2,208,43,169,3,141,2,222,173,25,3,201,200,208,31,120
GX 123 data 173,191,201,141,24,3,173,192,201,141,25,3,152,72,160
RM 124 data 20,185,169,201,153,25,3,136,208,247,104,168,32,70,200
CQ 125 data 32,8,201,104,40,96,32,47,243,8,72,76,86,201,9,0,0,1,2
HH 126 data 2,5,6,7,8,8,9,10,11,12,14,15,130,129,128,-1