;------------------------------------------------------------------------------ ; Robot Name: Cyyan II Heavy Tank(10C) ; Version: 1.1C ; ; Date Created: 03/11/2000 ; Modified: 09/11/2000 ; ; Author: Patrick Clough (waschbaer88@yahoo.com) #config scanner=4 #config weapon=2 #config armor=3 #config engine=0 #config heatsinks=3 #config mines=0 #config shield=0 #msg Cyaan II 1.1 C jne 10 jeq 10 ;1032 Leader Table 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 1 1 0 1 1 1 0 1 1 1 0 1 1 1 1 1 1 1 1 1 1 2 1 1 1 2 1 1 1 2 1 1 1 2 1 1 2 2 1 1 2 2 1 1 2 2 1 1 2 3 1 2 2 3 1 2 2 3 1 2 2 3 1 2 2 3 1 2 2 3 1 2 2 4 1 2 3 4 1 2 3 4 1 2 3 4 1 2 3 4 2 2 3 4 2 2 3 4 2 2 3 4 2 2 3 5 2 3 3 5 2 3 3 5 2 3 3 5 2 3 4 5 2 3 4 5 2 3 4 5 2 3 4 5 2 3 4 6 2 3 4 6 2 3 4 6 2 3 4 6 2 3 4 6 2 3 4 6 2 3 4 6 2 3 4 6 2 3 4 6 2 3 4 7 2 3 5 7 2 3 5 7 2 4 5 7 2 4 5 7 2 4 5 7 2 4 5 7 2 4 5 7 2 4 5 7 2 4 5 7 2 4 5 7 3 4 5 7 3 4 5 7 3 4 5 8 3 4 5 8 3 4 5 8 3 4 5 8 3 4 5 8 3 4 5 8 3 4 5 8 3 4 5 8 3 4 5 8 3 4 5 8 3 4 5 8 3 4 5 8 3 4 5 8 3 4 5 8 2 4 5 8 2 4 5 8 2 4 5 8 2 4 5 8 2 4 5 8 2 4 5 8 2 4 5 7 2 4 5 7 2 4 5 7 2 4 5 7 2 3 5 7 2 3 5 7 2 3 5 7 2 3 5 7 2 3 4 7 2 3 4 7 2 3 4 7 2 3 4 7 2 3 4 7 2 3 4 6 2 3 4 6 2 3 4 6 2 3 4 6 2 3 4 6 2 3 4 6 2 3 4 6 2 3 3 5 2 2 3 5 2 2 3 5 1 2 3 5 1 2 3 5 1 2 3 5 1 2 3 4 1 2 3 4 1 2 3 4 1 2 2 4 1 2 2 4 1 2 2 4 1 2 2 3 1 1 2 3 1 1 2 3 1 1 2 3 1 1 2 2 1 1 1 2 1 1 1 2 1 1 1 2 0 1 1 2 0 1 1 1 0 1 1 1 0 0 1 1 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 -1 0 0 -1 -1 0 -1 -1 -1 0 -1 -1 -1 0 -1 -1 -2 -1 -1 -1 -2 -1 -1 -1 -2 -1 -1 -1 -2 -1 -1 -2 -2 -1 -1 -2 -3 -1 -1 -2 -3 -1 -1 -2 -3 -1 -2 -2 -3 -1 -2 -2 -4 -1 -2 -2 -4 -1 -2 -2 -4 -1 -2 -3 -4 -1 -2 -3 -4 -1 -2 -3 -4 -1 -2 -3 -5 -1 -2 -3 -5 -1 -2 -3 -5 -2 -2 -3 -5 -2 -2 -3 -5 -2 -3 -3 -5 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -7 -2 -3 -4 -7 -2 -3 -4 -7 -2 -3 -4 -7 -2 -3 -4 -7 -2 -3 -5 -7 -2 -3 -5 -7 -2 -3 -5 -7 -2 -3 -5 -7 -2 -4 -5 -7 -2 -4 -5 -7 -2 -4 -5 -7 -2 -4 -5 -7 -2 -4 -5 -8 -2 -4 -5 -8 -2 -4 -5 -8 -2 -4 -5 -8 -2 -4 -5 -8 -2 -4 -5 -8 -3 -4 -5 -8 -3 -4 -5 -8 -3 -4 -5 -8 -3 -4 -5 -8 -3 -4 -5 -8 -3 -4 -5 -8 -3 -4 -5 -8 -3 -4 -5 -8 -3 -4 -5 -8 -3 -4 -5 -8 -3 -4 -5 -8 -3 -4 -5 -8 -3 -4 -5 -7 -3 -4 -5 -7 -3 -4 -5 -7 -3 -4 -5 -7 -2 -4 -5 -7 -2 -4 -5 -7 -2 -4 -5 -7 -2 -4 -5 -7 -2 -4 -5 -7 -2 -4 -5 -7 -2 -4 -5 -7 -2 -4 -5 -7 -2 -3 -5 -7 -2 -3 -5 -7 -2 -3 -4 -7 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -6 -2 -3 -4 -5 -2 -3 -4 -5 -2 -3 -4 -5 -2 -3 -4 -5 -2 -3 -3 -5 -2 -3 -3 -5 -2 -3 -3 -5 -2 -2 -3 -5 -2 -2 -3 -4 -2 -2 -3 -4 -2 -2 -3 -4 -1 -2 -3 -4 -1 -2 -3 -4 -1 -2 -3 -4 -1 -2 -3 -4 -1 -2 -2 -4 -1 -2 -2 -3 -1 -2 -2 -3 -1 -2 -2 -3 -1 -2 -2 -3 -1 -2 -2 -3 -1 -1 -2 -3 -1 -1 -2 -2 -1 -1 -2 -2 -1 -1 -2 -2 -1 -1 -1 -2 -1 -1 -1 -2 -1 -1 -1 -2 -1 -1 -1 -2 -1 -1 -1 -1 0 -1 -1 -1 0 -1 -1 -1 0 -1 -1 -1 0 0 -1 -1 0 0 0 -1 0 0 0 0 0 0 0 0 0 0 0 0 ;Initialization: :10 #def Rotate #def Rng #def Heat #def Speed #def Damage #def Throt #def Moder #def LAccur int 5 neg fx add fx,3 opo 21,fx ;opo 21,2 mov ax,139 int 14 ;Set up the target scan tables: ; First scan table: mov @386,-32 mov @387,-16 mov @389,16 mov @390,32 ; Second scan table: mov @391,-8 mov @392,-4 mov @394,4 mov @395,8 ;Initialize mov ax,1 int 3 mov Throt,-100 opo 11,Throt opo 20,600 mov Moder,0 ;Primary Lock-On: :100 opo 17,32 :110 ;Execute Evasion Loop: opo 14,1 mov ax,Damage ipo 6,Damage cmp ax,Damage jeq 111 ipo 10,Rotate and Rotate,255 opo 14,Rotate :111 opo 11,Throt ipo 1,Speed cmp Speed,0 jne 112 neg Throt opo 11,Throt :112 ;--------------------- ipo 7,Rng cmp Rng,1500 jle 150 opo 12,64 jne 110 jeq 110 :150 mov ax,@3 add ax,388 get Rotate,ax opo 12,Rotate ;Secondary Lock-On: :200 ;Execute Evasion Loop: opo 14,1 mov ax,Damage ipo 6,Damage cmp ax,Damage jeq 210 ipo 10,Rotate and Rotate,255 opo 14,Rotate :210 opo 11,Throt ipo 1,Speed cmp Speed,0 jne 220 neg Throt opo 11,Throt :220 ;--------------------- opo 17,8 ipo 7,Rng cmp Rng,1500 jgr 100 mov bx,@3 add bx,393 get Rotate,bx opo 12,Rotate opo 17,2 ;Target Evaluation: :300 ipo 7,Rng cmp Rng,1500 jgr 200 opo 12,@3 ;Execute Evasion Loop: opo 11,Throt ipo 1,Speed cmp Speed,0 jne 305 neg Throt :305 ;--------------------- mov ex,@7 and ex,255 cmp ex,10 jle 400 ;cmp Moder,3 ;jgr 600 ;cmp Moder,0 ;jls 600 jne 500 jeq 500 jne 300 jeq 300 ;Immoble Fire Loop: :400 ipo 2,Heat cmp Heat,300 jgr 300 opo 15,0 opo 15,0 opo 15,0 jne 300 jeq 300 ;Leader Fire: :500 ipo 2,Heat cmp Heat,240 jgr 300 mov ex,@6 shl ex,2 add ex,1032 get LAccur,ex cmp @7,0 jgr 510 neg LAccur :510 cmp LAccur,0 jgr 515 sub LAccur,Moder sub LAccur,Moder :515 add LAccur,Moder opo 12,LAccur cmp Heat, 150 jgr 520 opo 18,1 :520 opo 15,0 opo 15,0 opo 15,0 opo 18,0 mov ex,Rng shr ex,3 shr Rng,5 add ex,Rng sub ex,30 del ex opo 17,6 ipo 7,Rng opo 17,2 cmp Rng,1500 jgr 200 cmp @3,0 jeq 300 jgr 550 jls 560 :550 cmp LAccur,0 jge 570 jls 580 :560 cmp LAccur,0 jgr 580 jls 570 :570 inc Moder jeq 300 jne 300 :580 dec Moder jeq 300 jne 300 :600 ;SLF: ipo 2,Heat cmp Heat,240 jgr 300 mov ex,@6 shl ex,2 add ex,1032 add ex,Moder get LAccur,ex cmp @7,0 jgr 610 neg LAccur :610 cmp LAccur,0 jgr 615 sub LAccur,Moder sub LAccur,Moder :615 add LAccur,Moder opo 12,LAccur cmp Heat, 150 jgr 620 opo 18,1 :620 opo 15,0 opo 15,0 opo 15,0 opo 18,0 mov ex,Rng shr ex,3 shr Rng,5 add ex,Rng sub ex,30 del ex opo 17,6 ipo 7,Rng opo 17,2 cmp Rng,1500 jgr 200 cmp @3,0 jeq 300 jgr 650 jls 660 :650 cmp LAccur,0 jge 670 jls 680 :660 cmp LAccur,0 jgr 680 jls 670 :670 inc Moder jeq 300 jne 300 :680 dec Moder jeq 300 jne 300