home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / vol_200 / 221_01 / left.asm < prev    next >
Assembly Source File  |  1979-12-31  |  512b  |  46 lines
  1. ;small-c V2.3
  2.  NAME left
  3.  GLOBAL left
  4. left
  5.  LEAS -2,S
  6.  LEAY 0,S
  7.  TFR  Y,D
  8.  PSHS D
  9.  LDD  6,S
  10.  STD  [,S++]
  11. cc2
  12.  LDD  0,S
  13.  PSHS D
  14.  LDB  [,S++]
  15.  SEX
  16.  PSHS D
  17.  LDD  #32
  18.  CMPD ,S++
  19.  LBNE cc3
  20.  LDD  0,S
  21.  ADDD #1
  22.  STD  0,S
  23.  JMP cc2
  24. cc3
  25. cc4
  26.  LDD  4,S
  27.  ADDD #1
  28.  STD  4,S
  29.  SUBD #1
  30.  PSHS D
  31.  LDD  2,S
  32.  ADDD #1
  33.  STD  2,S
  34.  SUBD #1
  35.  PSHS D
  36.  LDB  [,S++]
  37.  SEX
  38.  STB  [,S++]
  39.  CMPD #0
  40.  LBEQ cc5
  41.  JMP cc4
  42. cc5
  43.  LEAS 2,S
  44.  RTS
  45.  END
  46.