; *** Carbonite by Ian Sutton
; Note: This is not a complete entry, as only one component is included.

dbomb   dat     >-1, >1
strat2  spl     #0, <-100
        mov     dbomb, tar-197*3500
tar     add     #197, -1        ; gets bombed to start coreclear
        djn.f   -2, <-1151