home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #31 / NN_1992_31.iso / spool / rec / games / corewar / 1542 < prev    next >
Encoding:
Internet Message Format  |  1992-12-23  |  1019 b 
  1. Path: sparky!uunet!olivea!charnel!sifon!thunder.mcrcim.mcgill.edu!poly-vlsi!zuse!dak
  2. From: dak@zuse (Pierre Baillargeon)
  3. Newsgroups: rec.games.corewar
  4. Subject: imperor
  5. Message-ID: <1992Dec22.213507.18025@vlsi.polymtl.ca>
  6. Date: 22 Dec 92 21:35:07 GMT
  7. Sender: news@vlsi.polymtl.ca (USENET News System)
  8. Organization: Ecole Polytechnique de Montreal
  9. Lines: 28
  10. X-Newsreader: TIN [version 1.1 PL6]
  11.  
  12.  
  13. A simple B-scanner, with a splat carpet bombing: spl <0,<6. After a while,
  14. it switch to dat bombs.
  15.  
  16. ;redcode
  17. ;name Imperor III 
  18. ;kill Imperor II
  19. ;strategy I:    terror of imps (not!).
  20. ;strategy II:    smaller.
  21. ;strategy III:    splat bomb.
  22.  
  23. top    mov bomb,sleep
  24. reset    add #5,count
  25. search    sub #2365,ptr
  26. ptr    jmz search,0    ; every 5 instr. must be zero.
  27.     add #5,ptr
  28. kill    mov sleep,<ptr
  29. count    djn kill,#5
  30.     djn reset,#500
  31.     jmp top,0
  32. bomb    dat #0,#0
  33. sleep    spl <0,<6
  34.         
  35.     end search
  36.  
  37. --
  38. "Pis Bourassa qui est toujours la.  Y'a pas d'remede contre le SIDA" - French B
  39. ...........................................................dak@info.polymtl.ca
  40.