Page 1 of 1

Hexlader

Posted: Sat Mar 10, 2018 12:06 pm
by Shaun_B
Hi,

Here's a Hex loader I found in a Dutch book that I seem to have.

Code: Select all

    1 REM *** HEXLADER
    2 REM *** COPYRIGHT 1983
   10 DIM H$(2)
   20 PRINT "ADDRES"
   30 INPUT S
   40 POKE 16389,INT(S/256)
   50 POKE 16388,S-INT(S/256)*256
   60 PRINT "AANTAL BYTES"
   70 INPUT B
   80 CLS
   90 FOR A=S TO S+(B-1)
  100 PRINT AT 0,0;"HEXCODE ";A
  110 INPUT H$
  120 LET M=CODE H$(1)-28
  130 LET L=CODE H$(2)-28
  140 IF H$="SS" THEN GOTO 180
  150 IF M>15 OR L>15 THEN GOTO 110
  160 POKE A,M*16+L
  170 NEXT A
  180 STOP
Credit goes to Wessel Akkermans, author of Zakboekje voor de ZX81.

For convenience, I made a version based on this. Enter your start address and then each hexidecimal op code. When you're done, enter SS. My version saves counting out how many bytes that you want to enter, and it uses some BASIC byte saving techniques.

Regards,

Shaun.