Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | Download | RSS feed

  1. ;        file 'pcirom.bin':0,0x49
  2.         file 'pcirom.bin'
  3.  
  4.  
  5.         db 13,10
  6.         line = '0'
  7.         block = 0
  8.         repeat 7
  9.           db 'INIT_0',line,' => X"'
  10.           repeat 32
  11.             pos = 32-%
  12.             load a byte from pos+block
  13.             b = a mod 16
  14.             if b<10
  15.                c = b + '0'
  16.             else
  17.                c = b-10+'A'
  18.             end if
  19.             b = a / 16
  20.             if b<10
  21.               d = b + '0'
  22.             else
  23.               d = b-10+'A'
  24.             end if
  25.             db d, c
  26.           end repeat
  27.           db '",',13,10
  28.           block = block + 32
  29.           line = line + 1
  30.         end repeat
  31.