From joshudson@hotmail.com Mon Aug 23 22:47:35 2004
Return-Path: <joshudson@hotmail.com>
Received: from nospam3.netcologne.de (nospam3.netcologne.de [194.8.194.173])
	by mailstore2.netcologne.de (Mirapoint Messaging Server MOS 3.3.5-GR)
	with ESMTP id BSE55731;
	Mon, 23 Aug 2004 22:47:37 +0200 (CEST)
Received: from nospam.netcologne.de (localhost [127.0.0.1])
	by nospam3.netcologne.de (Postfix) with ESMTP id C3AEF292B66
	for <nc-zapfsa@mailstore2.netcologne.de>; Mon, 23 Aug 2004 22:47:37 +0200 (CEST)
Received: from mx2.netcologne.de [194.8.194.242] by nospam.netcologne.de id DF6HYJO7 outgoing id DF6HYJO7; 23 Aug 2004 22:47:37 +0200
Received: from hotmail.com (bay18-f11.bay18.hotmail.com [65.54.187.61])
	by mx2.netcologne.de (Postfix) with ESMTP id 265D225AF6E
	for <nc-zapfsa@netcologne.de>; Mon, 23 Aug 2004 22:47:37 +0200 (CEST)
Received: from mail pickup service by hotmail.com with Microsoft SMTPSVC;
	 Mon, 23 Aug 2004 13:47:36 -0700
Received: from 4.246.111.162 by by18fd.bay18.hotmail.msn.com with HTTP;
	Mon, 23 Aug 2004 20:47:35 GMT
X-Originating-IP: [4.246.111.162]
X-Originating-Email: [joshudson@hotmail.com]
X-Sender: joshudson@hotmail.com
From: "Joshua Hudson" <joshudson@hotmail.com>
To: nc-zapfsa@netcologne.de
Subject: CoreWars Redcoder's Frenzy Entry
Date: Mon, 23 Aug 2004 13:47:35 -0700
Mime-Version: 1.0
Content-Type: text/plain;
  format=flowed
Message-ID: <BAY18-F116oqxqMYrFM000888a4@hotmail.com>
X-OriginalArrivalTime: 23 Aug 2004 20:47:36.0181 (UTC) FILETIME=[6BC80250:01C48952]
X-WW-Spam-Likelihood: Bayesian=20, BodyRules=50, DBL=50, HeaderRules=50, Mailshell=50, RBL=50, total=20
X-NetCologne-Spam: L
Status: RO
X-Status: O

;redcode-t Frankenstein
;author Joshua
;name Frankenstein's Imp
;strategy Imp spiral with bizarre thread placement

;Changed PC16 address mode from .ba to .a: 3
;One instruction isn't cleared: 1
;AP charged: 4
;AP remaining: 11


J1 equ 3
J2 equ 2


PC00   spl    @    3077 , #       2     ; SPL #X, !X
PC01   spl    $      -3 , #       3     ; SPL 2, !X
PC02   mov.i  >      -1 , }      -1     ; JMP 3, !X
PC03   mov.i  }      22 , >       5     ; ADD.A #1143, -1
PC04   dat    <    2667 , <    5334
PC05   mov.ab #       0 , >       7     ; MOV.I #X, 1143
PC06   sne.i  $    3044 , $    3364
PC07   sne.x  $      20 , $      11
PC08   seq.f  *    1143 , *      13
PC09   seq.b  $    1203 , <      17
PC10   mov.i  $    2376 , $      -7
PC11   mov.ab $       4 , @      19
PC12   jmz.f  $       1 , $      23
PC13   djn.x  $    1111 , <      29
PC14   djn.a  $      -4 , #    1000
PC15   spl    #      12 , #      31
PC16   add.a  #    2365 , $      -3     ; was ba, charge 4
PC17   add.x  $       0 , $      37
PC18   slt.a  $     889 , $      J1
PC19   jmp    $   -2667 , $      41
PC20   mul.ab #      -8 , $      43
PC21   mov.i  #    3315 , *      47
PC22   mov.i  #      -1 , $      53
PC23   spl    $      J2 , <    2936
PC24   jmn    $      -2 , @      59

stimp  MOV.I  PC23, PC01
       MOV.I  PC15, PC00
       MOV.I  PC19, PC02
       MOV.BA PC18, PC02

       MOV.I  PC22, PC05
       MOV.AB PC08, PC05

       MOV.I  PC16, PC03
       MOV.AB PC22, PC03
       MOV.BA PC05, PC03

       MOV.A  PC12, PC23

       SPL    1
       SPL    1
       MOV.I  50, >px               ; A clear instruction
       SPL    1

; Clear generator and rest of pool
for 4
       MOV.I  50, >px               ; Last mov instr not cleared, charge 1
rof

px     JMP    PC00, PC06
end stimp

_________________________________________________________________
Is your PC infected? Get a FREE online computer virus scan from McAfeeŽ 
Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963