*****************************************************************************
* Project Details                                                           *
* ---------------                                                           *
* Project Name:    Rst (RESET)                                              *
* Project Version: 1                                                        *
* Copyright:       Anthony N Peck                                           *
* Date:            Sunday 21st May 1995                                     *
*                                                                           *
* Contact:                                                                  *
* 68 Woralul ST                                                             *
* Waramanga ACT 2611                                                        *
* Australia                                                                 *
*                                                                           *
* E-Mail: Anthony.Peck@Radford.act.edu.au                                   *
*                                                                           *
* Summary                                                                   *
* -------                                                                   *
*                                                                           *
* Usage: Rst                                                                *
*                                                                           *
* A dinky little program that clears some memory vectors before a reset.    *
* The code is inspired by Chris Hames VirusMemKill which has an option to   *
* reset during times of infections.  There is no real need to clear the     *
* xxxxCapture vectors, but I assume that it would be nice if your system    *
* lock up is due to a virus.  I suggest you could attach this program to    *
* your menu (e.g. via BrowserII) or as a hotkey (e.g. MachIV), and then     *
* if your Shell goes down you still have access to a good boot!  For a      *
* WB solution, check out WBRst.                                             *
*                                                                           *
*****************************************************************************

; If you want to find out about some of these structures, see HEXTRACT by
; Chas Wyndham on Fish #817.

Start:  MOVE.L  $04,A6          ; ExecBase to A6
        CLR.L   $32(A6)         ; Clear Warm Capture
        CLR.L   $2E(A6)         ; Clear Cool Capture
        CLR.L   $2A(A6)         ; Clear Cold Capture
        CLR.L   $226(A6)        ; Clear KickTagPtr

        LEA     Boot,A5         ; Load boot routine to A5
        JSR     -$1E(A6)        ; Supervisor mode reboot

Boot:   LEA     $F000000,A0     ; Load end of ROM to A0
        RESET                   ; Stack pointer set for supervisor mode
        JMP     (A0)            ; Jump and gone...

        END                     ; Adios!