Moroon at very specific settings kills everyone :) - check it out!

ai.asm

@@ -82,7 +82,10 @@ AIRoutines
     mwa #80 RandBoundaryLow
     mwa #800 RandBoundaryHigh 
     jsr RandomizeForce
-    rts
+	; choose the best weapon
+	ldy #ind_Buy_me_________+1	; if the cheat is active it will fire the BFG :)
+	jmp ChooseBestOffensive.NotFromAll
+    ;rts
 .endp
 ;----------------------------------------------
 .proc Shooter 
@@ -156,8 +159,8 @@ endo
 	
 	; choose the best weapon
 	
-	jsr ChooseBestOffensive
+	jmp ChooseBestOffensive
-    rts
+    ;rts
     .endp
 ;----------------------------------------------
 .proc Poolshark
@@ -198,8 +201,6 @@ forceNow
     jsr RandomizeForce
 
 endo	
-	;ldx TankNr ;this is possibly not necessary
-	
 	; choose the best weapon
 	
 	jsr ChooseBestOffensive
@@ -1027,7 +1028,7 @@ SorryNoPurchase
 ; choose the best weapon
 ; X - TankNr
 ;----------------------------------------------
-	ldy #last_offensive_____-1 ;the last weapon to choose +1	(ind_Dirt_Charge____ - not Laser :) )
+	ldy #ind_Dirt_Charge____+1 ;the last weapon to choose +1	(not BFG or Laser :) )
 NotFromAll	
 ; Y - the last offensive weapon to use + 1
 	lda TanksWeaponsTableL,x