;The Machine - (c) 2002 by Bryan Hardenberger
;Completed May 14th 2002
;E-mail: Rune_Master_Magician@yahoo.com
;Lines: 26
;Class: Lightweight

;The Machine is my first attempt at an original robot.
;Strategy: Twirl the turret randomly, firing slowly. Every 10 "cycles" of the
;robot program, it fires a spray of missiles in the current direction.

;If for some reason this robot is found useful, feel free to study it. Please
;don't blatantly copy it, but go ahead and use an idea or two. I only ask that
;you credit your source.

;Thanks:
;       Thanks go to several robots (and their owners).
;       First, thanks Zitgun. The best of the demo robots, I compare my newest
;               to Zitgun (none have beaten it yet).
;       Next, to Coroner, just for being an awesome robot.
;       Third, to Warblade, the Coroner-inspired that just so happens to be
;               better than its inspiration.
;       Finally, Madbot. One word: AWESOME.
;       And a BIG thanks go to the creators of AT-Robots and its
;               predecessors.

;Robot "CMOS" Configuration (controls distribution of the 12 system points)
;Machine CMOS v0.1
#CONFIG SCANNER=5
#CONFIG WEAPON=2
#CONFIG ARMOR=3
#CONFIG ENGINE=2
#CONFIG HEATSINKS=0
#CONFIG MINES=0
#CONFIG SHIELD=0

;Robot Message
#MSG 1001101000110110011        ;binary code - meaning unknown

;"Operating System" (the various commands that control the robot in battle)
;Machine OS v0.1

#def heat
#def twirl
#def turn
#def throttle
#def scan

        opo     19      777
        opo     20      500
        opo     17      10

!twirl        
        ipo     10      twirl
        opo     12      twirl
        ipo     10      throttle
        opo     11      throttle
        ipo     10      turn
        opo     14      turn

!scan
        ipo     7       scan
        cmp     scan    1500
        jls     !fire
        jae     !twirl

!fire
        ipo     2       heat
        cmp     heat    200
        jgr     !twirl
        opo     15
        opo     12      -5
        opo     15
        opo     12      10
        opo     15
        opo     12      -15
        opo     15
        opo     12      20
        jne     !twirl
        je      !twirl