home *** CD-ROM | disk | FTP | other *** search
/ ST-Computer Leser 2002 January / STC_CD_01_2002.iso / GAMES / COLUMSRC / MAKE_H_S.S < prev    next >
Text File  |  1993-12-28  |  846b  |  54 lines
  1.     text
  2.  lea the_bin,a0
  3.  move.l a0,a5
  4.  lea endthe_bin,a1
  5.  move.l a1,d0
  6.  sub.l a0,d0
  7.  move.l d0,d5
  8.  clr.w -(sp)
  9.  pea filename
  10.  move.W #$3c,-(sp)
  11.  trap #1
  12.  add.l #8,sp
  13.  move.w d0,d3
  14.  move.l a5,-(sp)
  15.  move.l d5,-(sp)
  16.  move.w d3,-(sp)
  17.  move.w #$40,-(sp)
  18.  trap #1
  19.  add.l #12,sp
  20.  move.w d3,-(sp)
  21.  move.w #$3e,-(sp)
  22.  trap #1
  23.  addq.l #4,sp
  24.  clr.w -(sp)
  25.  trap #1 
  26. filename:
  27.  dc.B 'D:\DEVPAC\SOURCE\COLUMS\COLUMS.HS',0
  28.     even
  29. the_bin:
  30.     REPT 3
  31.     dc.b    'RODOLPHE  ',0,0
  32.     dc.l    40000
  33.     dc.b    'LINDSAY   ',0,0
  34.     dc.l    30000
  35.     dc.b    'PIERRE    ',0,0
  36.     dc.l    20000
  37.     dc.b    'BENOIT    ',0,0
  38.     dc.l    10000
  39.     dc.b    'EMERSON   ',0,0
  40.     dc.l    9000
  41.     dc.b    'LAURENCE  ',0,0
  42.     dc.l    8000
  43.     dc.b    'CHRISTOPHE',0,0
  44.     dc.l    7000
  45.     dc.b    'STEPHANE  ',0,0
  46.     dc.l    6000
  47.     dc.b    'NIRINA    ',0,0
  48.     dc.l    5000
  49.     dc.b    'FABRICE   ',0,0
  50.     dc.l    4000
  51.     ENDR
  52.     
  53. endthe_bin
  54.