;redcode ;name HYPRAY ;author Botta Francesco ;assert 1 ; CORESIZE==8192 ; ACHILLE Soft ; presents ; ; HYPRAY ; ; developed by ; Botta Francesco ; start mov w, @-2304 mov w, @-2817 mov w, @-3330 mov w, @-3843 mov w, @-4356 mov w, @-4869 mov w, @-5382 jmz 4, -2312 mov #-1899, obj djn copia, @-2 jmp copia1 jmz 4, -2828 mov #-2411, obj djn copia, @-2 jmp copia1 jmz 4, -3344 mov #-2923, obj djn copia, @-2 jmp copia1 jmz 4, -3860 mov #-3435, obj djn copia, @-2 jmp copia1 jmz 4, -4376 mov #-3947, obj djn copia, @-2 jmp copia1 jmz 4, -4892 mov #-4459, obj djn copia, @-2 jmp copia1 jmz 3, -5408 mov #-4971, obj djn copia, @-2 copia1 mov #-11, j mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 mov 24, 4096 jmp 4083 jmp v dat #0 r spl v mov w, < pun mov w, < pun jmp r w dat #-23 j jmp @ 0 s1 mov j, @ 3 sub 2, @ 2 s sub # 20, 1 jmz s, -2 cmp #-2, -1 jmp s1 mov #-7, w k mov w, < pun jmp k dat #0 v djn r, f mov f, r f dat #64 dat #0 pun dat #700 copia mov #-2, i mov 20, < obj mov 18, < obj mov 16, < obj mov 14, < obj mov 12, < obj mov 10, < obj mov 8 , < obj mov 6 , < obj mov 4 , < obj mov 2 , < obj jmp @ obj a mov @ p1, < tar mov @ p2, < tar djn a , tar dat #-6 tar dat #-114 p2 dat #2 dat #-2 me spl me p1 dat #1 i jmp p1 obj dat #0 end start