10 ' Cheat Salamander
20 ' EHBO MCM 45
30 ' By: Nico Steendam
40 '
50 FOR I=&HC000 TO &HC031
60   READ A$:POKE I,VAL("&H"+A$)
70 NEXT I
80 DEFUSR=&HC000:X=USR(0)
90 DATA 3E,01,26,40,CD,24,00,3E,C3,21
100 DATA 7F,F8,32,9A,FD,22,9B,FD,21,20
110 DATA C0,11,7F,F8,01,12,00,ED,B0,C3
120 DATA E8,40,3E,03,32,F5,F0,3E,C9,32
130 DATA A7,FF,21,02,E2,CB,B6,C3,69,40