;
;        ____     ___        ___     ___ ___ ___ ___ ____      ___ ___ ___
;         /  /__//_         /__ /  //_ //__ /  //_    /  / / //_ //__//_  
;        /  /  //__        ___//__//__/___//__//     /  /_/_//  //  \/__  
;
;-----------------------------------------------------------------------------
;   - FOR ABO'S CONTACT US AT:   BP:28 1170 WATERMAEL-BOITSFORT 1 BELGIUM!!...
;
;-----------------------------------------------------------------------------
;                           - DON'T SEND ANY DISKS -
;
;-----------------------------------------------------------------------------
;
;
;
;                       THE LEGENDARY >> SUBSOFTWARE << IN 87/88/89/90/91!!...
;                       ------------------------------------------------------
;
;
*---
*--- Programme: virus.a
*---
*--- Fonction: faux virus pour essayer le programme traqueur
*---
*--- Auteur: F MAZUE pour ANT le 16/02/91
*---
*--- Assembleur: Devpac2 (the top !)
*---

 
 incdir "include:"
 include "exec/execbase.i"

 movea.l $4,a6
 move.l #1,CoolCapture(a6)
 rts