Kako's Codes of Warrior (Corewar) Page
My codes
- elf written by E.Kako, last updated in Sep.12,1987
- kirin2 written by E.Kako, last updated in Feb.16,1988
- cancer cells written by E.Kako, last updated in Oct.29,1987
- spider net written by E.Kako, last updated in Dec.22,1987
;elf by Eiji Kako
ORG SPL 0
DJN 0,<-3
JMP -1
;kirin2 by Eiji Kako
A DAT #1024
B DAT #9003
H1 SPL 0
H2 JMP -1
ORG MOV #1024,A
MOV H2,<B
MOV H1,<B
ADD #826,B
DJN -3,A
JMP PROG2
SPL 0
JMP -1
PROG2 MOV #-20,C
MOV C,<C
DJN -1,<C
JMP ORG
JMP 0
C DAT #-20
;cancer cells by Eiji-Kako
ORG SPL P1
SPL P2
SPL P3
SPL P4
SPL P5
SPL P6
SPL P7
SPL P8
SPL P9
SPL P10
SPL P11
SPL P12
SPL P13
SPL P14
SPL P15
SPL P16
SPL P17
SPL P18
SPL P19
SPL P20
SPL P21
SPL P22
SPL P23
SPL P24
SPL P25
SPL P26
SPL P27
SPL P28
SPL P29
SPL P30
SPL P31
SPL P32
P1 MOV #-1603,6
MOV #6,-1
ADD #-1867,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P2 MOV #-710,6
MOV #6,-1
ADD #-794,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P3 MOV #-839,6
MOV #6,-1
ADD #-786,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P4 MOV #-1064,6
MOV #6,-1
ADD #-1465,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P5 MOV #-1683,6
MOV #6,-1
ADD #-703,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P6 MOV #-657,6
MOV #6,-1
ADD #-1097,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P7 MOV #-721,6
MOV #6,-1
ADD #-1062,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P8 MOV #-1416,6
MOV #6,-1
ADD #-547,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P9 MOV #-1560,6
MOV #6,-1
ADD #-862,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P10 MOV #-1309,6
MOV #6,-1
ADD #-1092,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P11 MOV #-607,6
MOV #6,-1
ADD #-1457,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P12 MOV #-1490,6
MOV #6,-1
ADD #-754,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P13 MOV #-1822,6
MOV #6,-1
ADD #-884,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P14 MOV #-1823,6
MOV #6,-1
ADD #-822,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P15 MOV #-1188,6
MOV #6,-1
ADD #-1315,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P16 MOV #-1237,6
MOV #6,-1
ADD #-948,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P17 MOV #-1801,6
MOV #6,-1
ADD #-1913,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P18 MOV #-1498,6
MOV #6,-1
ADD #-943,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P19 MOV #-1680,6
MOV #6,-1
ADD #-636,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P20 MOV #-623,6
MOV #6,-1
ADD #-1813,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P21 MOV #-687,6
MOV #6,-1
ADD #-1783,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P22 MOV #-1491,6
MOV #6,-1
ADD #-785,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P23 MOV #-1054,6
MOV #6,-1
ADD #-1238,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P24 MOV #-956,6
MOV #6,-1
ADD #-1970,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P25 MOV #-1299,6
MOV #6,-1
ADD #-869,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P26 MOV #-1473,6
MOV #6,-1
ADD #-1869,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P27 MOV #-1965,6
MOV #6,-1
ADD #-1177,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P28 MOV #-1060,6
MOV #6,-1
ADD #-1372,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P29 MOV #-1056,6
MOV #6,-1
ADD #-1285,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P30 MOV #-545,6
MOV #6,-1
ADD #-1523,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P31 MOV #-1517,6
MOV #6,-1
ADD #-1370,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
P32 MOV #-1000,6
MOV #6,-1
ADD #-1999,4
MOV @-3,<3
DJN -1,-4
SPL -4
JMP @0
;spider net (for 8kWord version of MARS) by Eiji Kako
MOV X, 4095
MOV X, 4085
MOV X, 4102
MOV X, 4074
MOV X, 4109
MOV X, 4063
MOV X, 4116
MOV X, 4052
MOV X, 4123
MOV X, 4041
MOV X, 4130
MOV X, 4030
MOV X, 4137
MOV X, 4019
MOV X, 4144
MOV X, 4008
MOV X, 4151
MOV X, 3997
MOV X, 4158
MOV X, 3986
MOV X, 4165
MOV X, 3975
MOV X, 4172
MOV X, 3964
MOV X, 4179
MOV X, 3953
MOV X, 4186
MOV X, 3942
MOV X, 4193
MOV X, 3931
MOV X, 4200
MOV X, 3920
MOV X, 4207
MOV X, 3909
MOV X, 4214
MOV X, 3898
MOV X, 4221
MOV X, 3887
MOV X, 4228
MOV X, 3876
MOV X, 4235
MOV X, 3865
MOV X, 4242
MOV X, 3854
MOV X, 4249
MOV X, 3843
MOV X, 4256
MOV X, 3832
MOV X, 4263
MOV X, 3821
MOV X, 4270
MOV X, 3810
MOV X, 4277
MOV X, 3799
MOV X, 4284
MOV X, 3788
MOV X, 4291
MOV X, 3777
MOV X, 4298
MOV X, 3766
MOV X, 4305
MOV X, 3755
MOV X, 4312
MOV X, 3744
MOV X, 4319
MOV X, 3733
MOV X, 4326
MOV X, 3722
MOV X, 4333
MOV X, 3711
MOV X, 4340
MOV X, 3700
MOV X, 4347
MOV X, 3689
MOV X, 4354
MOV X, 3678
MOV X, 4361
MOV X, 3667
MOV X, 4368
MOV X, 3656
MOV X, 4375
MOV X, 3645
MOV X, 4382
MOV X, 3634
MOV X, 4389
MOV X, 3623
MOV X, 4396
MOV X, 3612
MOV X, 4403
MOV X, 3601
MOV X, 4410
MOV X, 3590
MOV X, 4417
MOV X, 3579
MOV X, 4424
MOV X, 3568
MOV X, 4431
MOV X, 3557
MOV X, 4438
MOV X, 3546
MOV X, 4445
MOV Y,0
MOV X, 3534
MOV X, 4451
MOV X, 3523
MOV X, 4458
MOV X, 3512
MOV X, 4465
MOV X, 3501
MOV X, 4472
MOV X, 3490
MOV X, 4479
MOV X, 3479
MOV X, 4486
MOV X, 3468
MOV X, 4493
MOV X, 3457
MOV X, 4500
MOV X, 3446
MOV X, 4507
MOV X, 3435
MOV X, 4514
MOV X, 3424
MOV X, 4521
MOV X, 3413
MOV X, 4528
MOV X, 3402
MOV X, 4535
MOV X, 3391
MOV X, 4542
MOV X, 3380
MOV X, 4549
MOV X, 3369
MOV X, 4556
MOV X, 3358
MOV X, 4563
MOV X, 3347
MOV X, 4570
MOV X, 3336
MOV X, 4577
MOV X, 3325
MOV X, 4584
MOV X, 3314
MOV X, 4591
MOV X, 3303
MOV X, 4598
MOV X, 3292
MOV X, 4605
MOV X, 3281
MOV X, 4612
MOV X, 3270
MOV X, 4619
MOV X, 3259
MOV X, 4626
MOV X, 3248
MOV X, 4633
MOV X, 3237
MOV X, 4640
MOV X, 3226
MOV X, 4647
MOV X, 3215
MOV X, 4654
MOV X, 3204
MOV X, 4661
MOV X, 3193
MOV X, 4668
MOV X, 3182
MOV X, 4675
MOV X, 3171
MOV X, 4682
MOV X, 3160
MOV X, 4689
MOV X, 3149
MOV X, 4696
MOV X, 3138
MOV X, 4703
MOV X, 3127
MOV X, 4710
MOV X, 3116
MOV X, 4717
MOV X, 3105
MOV X, 4724
MOV X, 3094
MOV X, 4731
MOV X, 3083
MOV X, 4738
MOV X, 3072
MOV X, 4745
MOV X, 3061
MOV X, 4752
MOV X, 3050
MOV X, 4759
MOV X, 3039
MOV X, 4766
MOV X, 3028
MOV X, 4773
MOV X, 3017
MOV X, 4780
MOV X, 3006
MOV X, 4787
MOV X, 2995
MOV X, 4794
MOV Y,0
MOV X, 2983
MOV X, 4800
MOV X, 2972
MOV X, 4807
MOV X, 2961
MOV X, 4814
MOV X, 2950
MOV X, 4821
MOV X, 2939
MOV X, 4828
MOV X, 2928
MOV X, 4835
MOV X, 2917
MOV X, 4842
MOV X, 2906
MOV X, 4849
MOV X, 2895
MOV X, 4856
MOV X, 2884
MOV X, 4863
MOV X, 2873
MOV X, 4870
MOV X, 2862
MOV X, 4877
MOV X, 2851
MOV X, 4884
MOV X, 2840
MOV X, 4891
MOV X, 2829
MOV X, 4898
MOV X, 2818
MOV X, 4905
MOV X, 2807
MOV X, 4912
MOV X, 2796
MOV X, 4919
MOV X, 2785
MOV X, 4926
MOV X, 2774
MOV X, 4933
MOV X, 2763
MOV X, 4940
MOV X, 2752
MOV X, 4947
MOV X, 2741
MOV X, 4954
MOV X, 2730
MOV X, 4961
MOV X, 2719
MOV X, 4968
MOV X, 2708
MOV X, 4975
MOV X, 2697
MOV X, 4982
MOV X, 2686
MOV X, 4989
MOV X, 2675
MOV X, 4996
MOV X, 2664
MOV X, 5003
MOV X, 2653
MOV X, 5010
MOV X, 2642
MOV X, 5017
MOV X, 2631
MOV X, 5024
MOV X, 2620
MOV X, 5031
MOV X, 2609
MOV X, 5038
MOV X, 2598
MOV X, 5045
MOV X, 2587
MOV X, 5052
MOV X, 2576
MOV X, 5059
MOV X, 2565
MOV X, 5066
MOV X, 2554
MOV X, 5073
MOV X, 2543
MOV X, 5080
MOV X, 2532
MOV X, 5087
MOV X, 2521
MOV X, 5094
MOV X, 2510
MOV X, 5101
MOV X, 2499
MOV X, 5108
MOV X, 2488
MOV X, 5115
MOV X, 2477
MOV X, 5122
MOV X, 2466
MOV X, 5129
MOV X, 2455
MOV X, 5136
MOV X, 2444
MOV X, 5143
MOV Y,0
MOV X, 2432
MOV X, 5149
MOV X, 2421
MOV X, 5156
MOV X, 2410
MOV X, 5163
MOV X, 2399
MOV X, 5170
MOV X, 2388
MOV X, 5177
MOV X, 2377
MOV X, 5184
MOV X, 2366
MOV X, 5191
MOV X, 2355
MOV X, 5198
MOV X, 2344
MOV X, 5205
MOV X, 2333
MOV X, 5212
MOV X, 2322
MOV X, 5219
MOV X, 2311
MOV X, 5226
MOV X, 2300
MOV X, 5233
MOV X, 2289
MOV X, 5240
MOV X, 2278
MOV X, 5247
MOV X, 2267
MOV X, 5254
MOV X, 2256
MOV X, 5261
MOV X, 2245
MOV X, 5268
MOV X, 2234
MOV X, 5275
MOV X, 2223
MOV X, 5282
MOV X, 2212
MOV X, 5289
MOV X, 2201
MOV X, 5296
MOV X, 2190
MOV X, 5303
MOV X, 2179
MOV X, 5310
MOV X, 2168
MOV X, 5317
MOV X, 2157
MOV X, 5324
MOV X, 2146
MOV X, 5331
MOV X, 2135
MOV X, 5338
MOV X, 2124
MOV X, 5345
MOV X, 2113
MOV X, 5352
MOV X, 2102
MOV X, 5359
MOV X, 2091
MOV X, 5366
MOV X, 2080
MOV X, 5373
MOV X, 2069
MOV X, 5380
MOV X, 2058
MOV X, 5387
MOV X, 2047
MOV X, 5394
MOV X, 2036
MOV X, 5401
MOV X, 2025
MOV X, 5408
MOV X, 2014
MOV X, 5415
MOV X, 2003
MOV X, 5422
MOV X, 1992
MOV X, 5429
MOV X, 1981
MOV X, 5436
MOV X, 1970
MOV X, 5443
MOV X, 1959
MOV X, 5450
MOV X, 1948
MOV X, 5457
MOV X, 1937
MOV X, 5464
MOV X, 1926
MOV X, 5471
MOV X, 1915
MOV X, 5478
MOV X, 1904
MOV X, 5485
MOV X, 1893
MOV X, 5492
MOV Y,0
MOV X, 1881
MOV X, 5498
MOV X, 1870
MOV X, 5505
MOV X, 1859
MOV X, 5512
MOV X, 1848
MOV X, 5519
MOV X, 1837
MOV X, 5526
MOV X, 1826
MOV X, 5533
MOV X, 1815
MOV X, 5540
MOV X, 1804
MOV X, 5547
MOV X, 1793
MOV X, 5554
MOV X, 1782
MOV X, 5561
MOV X, 1771
MOV X, 5568
MOV X, 1760
MOV X, 5575
MOV X, 1749
MOV X, 5582
MOV X, 1738
MOV X, 5589
MOV X, 1727
MOV X, 5596
MOV X, 1716
MOV X, 5603
MOV X, 1705
MOV X, 5610
MOV X, 1694
MOV X, 5617
MOV X, 1683
MOV X, 5624
MOV X, 1672
MOV X, 5631
MOV X, 1661
MOV X, 5638
MOV X, 1650
MOV X, 5645
MOV X, 1639
MOV X, 5652
MOV X, 1628
MOV X, 5659
MOV X, 1617
MOV X, 5666
MOV X, 1606
MOV X, 5673
MOV X, 1595
MOV X, 5680
MOV X, 1584
MOV X, 5687
MOV X, 1573
MOV X, 5694
MOV X, 1562
MOV X, 5701
MOV #1,X
BEGIN MOV X,@Y
ADD #2100,Y
JMP BEGIN
X JMP 0
Y DAT #-1