SolarStrike Software

Code: Select all

<onLoad>
<!--**************************************************************************** Create By AMBOLIA **********************************************************************************-->
	<!-- FUNCTION CHOICE NUMBER RUN -->
		Nbrun = 0
		repeat
			cprintf(cli.lightgreen,"\n\n\n          Welcome On Graffu's farm !\n\n") 
			print("Choose run's number: ")
			print("\nNbrun>")
			Nbrun = io.stdin:read()
			Nbrun = tonumber(Nbrun)
		until Nbrun and Nbrun > 0
		
		cprintf(cli.blue, "\n\n				Have nice farm on Graffu V1.0 !\n				Create by AMBOLIA !\n\n\n")
	
		if Nbrun > 157
			then cprintf(cli.red,"\n\n Sorry, Maximum is 157 ! Because 157*19=2983 ! You can't have more of 3000 Mementos \n\n")
			yrest(3000)
			loadPaths(__WPL.FileName);
		end
		
		SlashCommand("aid easy")
		
	<!-- FUNCTION WARDEN_SUMMON_CHIRON_THE_CENTAUR -->
			function Summon()
			player:cast("WARDEN_SUMMON_CHIRON_THE_CENTAUR")
		end
	
	<!-- FUNCTION TO DEFINE ORIGIN'S WAYPOINT -->
			__WPL:setWaypointIndex(__WPL:findWaypointTag("start"))

	<!-- FUNCTION UNBRIDLED ENTHUSIAM+LUCKY TARGET -->
		function Buff()
			player:update()
			if not player:hasBuff("506684") 
				then inventory:useItem(207200);
			end
			
			if (not player:hasBuff("506687")) 
				then inventory:useItem(207203);
			end 
		end
		
	<!-- FUNCTION COUNT SELL -->
		Mcount = 0
		function Mcountround()
			Mcount = Mcount+1;
		end
		
	<!-- FUNCTION COUNT DEAD -->
		Dcount = 0
		function Dcountround()
			Dcount = Dcount+1;
		end	
		
	<!-- FUNCTION COUNT BUG -->
		Bcount = 0
		function Bcountround()
			Dcount = Bcount+1;
		end	
		
	<!-- FUNCTION COUNT ANCIENT MEMENTO -->
		Acount = 0
		function Acountround()
			Acount = Count*19;
		end
		
	<!-- FUNCTION COUNT RUN -->
		Count = 0
		function Countround()
			Count = Count+1;
		end
		
<!-- FUNCTION NUMBER RUN & CHECK MEMENTO'S NUMBER -->
		function number()
			End = 0
			if ( Nbrun == Count )
				then printf("\n\n All run done !\n\n");
				End = 1
				SlashCommand("ILG destroy")
				waitForLoadingScreen()
				__WPL:setWaypointIndex(__WPL:findWaypointTag("return"))
			end
			
			Mentos = inventory:itemTotalCount(206879)_________________________________________________________________________>>>>> Error count
			if ( Mentos == 2983 )
				then printf("\n\n Full Ancient Memento !\n\n");
				End = 1
				SlashCommand("ILG destroy")
				waitForLoadingScreen()
				__WPL:setWaypointIndex(__WPL:findWaypointTag("return"))			
			end
		end
		
	<!-- FUNCTION NUMBER RUN & CHECK MEMENTO'S NUMBER -->
		function lastrun()
			restmentos = 2983 - Mentos;
			lrun= restmentos / 19 ;		
		end
		
	<!-- FUNCTION CHECK BAG -->
		function bag()
			Rightbag = 0
			if ( Rightbag == 0 )
				then
					local bcount = inventory:getItemCount(0)
					if(  5 > bcount ) 
						then
							SlashCommand("ILG destroy")
							waitForLoadingScreen()
							SlashCommand("ILG inv")
							__WPL:setWaypointIndex(__WPL:findWaypointTag("return"))
					end
			end		
		end
				
	<!-- FUNCTION GROUP -->
		function ireset()
			SlashCommand("ILG destroy")
			yrest(500)
			SlashCommand("ILG inv")
		end		
		
	<!-- FUNCTION SELL PNJ -->
		function tp()
		    teleportToWP()
		end
		
	<!-- FUNCTION INFORMATION -->
		function Info()
			cprintf(cli.pink, "\n\nNbr Round done: %s for %s Mementos win !\n", Count, Acount)
			cprintf(cli.pink, "You have %s Mementos ! You chose %s run ! You can do again %s run ! \n",Mentos, Nbrun, lrun)
			cprintf(cli.yellow, "Nbr Sell: %s \n", Mcount)
			cprintf(cli.red, "Nbr Dead: %s and Nbr Bug: %s\n\n", Dcount, Bcount)
		end
	
</onLoad>

Code: Select all

Mentos = getCurrency("mento")

Code: Select all

	<!-- FUNCTION SETWINDOW MEMENTOS -->
                        setwindow(206879)

Code: Select all

Example:

*GraffuV1.xml -->> no onload has include.
*GraffuV1_OnLoad.xml -->> Here all the onload and functions

Code: Select all

		function BoroboroBuff()
			player:update()
			if player:Buff("506684") 
				then SlashCommand("ILG destroy")
			end 
		end

Code: Select all

      function BoroboroBuff()
         if player:hasBuff(506684) then
            SlashCommand("ILG destroy")
            waitForLoadingScreen()
            __WPL:setWaypointIndex(__WPL:getNearestWaypoint())
         end
      end