Numberology precombat casting

//mostly copied from http://microcoloss.us/cgi-bin/mscripts?q=numb.ash

int moonsign() {
        switch (my_sign()) {
                case "Mongoose": return 1;
                case "Wallaby": return 2;
                case "Vole": return 3;
                case "Platypus": return 4;
                case "Opossum": return 5;
                case "Marmot": return 6;
                case "Wombat": return 7;
                case "Blender": return 8;
                case "Packrat": return 9;
                case "Bad Moon": return 10;
                default:
                        print("Unknown moon sign, guessing 0 as the number.", "red");
                        return 0;
        }
}

void main()
{

//only autocast numberology in aftercore
	if (can_interact() && !to_boolean(get_property("_universeCalculated"))) {

		//69 = +3 adventures
		int target = 69;

		int s=my_spleen_use();
		int m=moonsign();
		int l=my_level();
		int a = my_ascensions();
		int t= my_adventures();
		int out1;
		int output=0;
		int fromnow;

		for inx from t to 0 {
			fromnow=t-inx;
			out1 = (((a+m)*(s+l))+inx)%100;
			for y from 1 to 400 {
				output = ((y+a+m)*(s+l))+inx;
				if ((output % 100)==out1){
					break;
				}
				if ((output % 100)==target){
					switch (fromnow){
						case 0:
							//print("Try \""+y+"\" for \""+output+"\"","blue");
							cli_execute("numberology "+target);
							break;
						case 1:
							//print("Try \""+y+"\" for \""+output+"\" in "+fromnow+" turn","blue");
							break;
						default:
							//print("Try \""+y+"\" for \""+output+"\" in "+fromnow+" turns","blue");
							break;
						}
				return;
				}
			}
		}
	}

}