100 REMark makes EXECable file out of .HDR file stored on bulletin boards
110 REMark Toolkit II necessary!!!
120 REMark Written by Jan Bredenbeek on 10th April, 1990
130 :
140 INPUT#0;"Enter name of .HDR file: ";hdr$
150 INPUT#0;"Enter name of EXECable file: ";exe$
160 PRINT#0;"Loading .HDR file..."
170 start=ALCHP(FLEN(\hdr$))
180 LBYTES hdr$,start
190 PRINT#0;"Verifying..."
200 FOR i=0 TO 62 STEP 2
210   IF PEEK_W(start+i)<>19195 THEN PRINT#0;"Not a .HDR file!":STOP
220 END FOR i
230 PRINT#0;"Saving EXECable file..."
240 SEXEC exe$,start+128,PEEK_L(start+64),PEEK_L(start+70)
250 PRINT#0;"Done!"
260 RECHP start:STOP