SolarStrike Software

Code: Select all

      function EOJCrysalia()
         waitForEventStart()
         player:target_NPC(120273) -- Papp Hesof
         RoMScript("DeleteQuestByID(425598)");
         yrest(500)
         EOJCrysalia()
      end 

Code: Select all

Lua> c=0 function test() c=c+1 test() end test()
onLoad error: C:\Program Files (x86)\MICROMACRO\lib\lib.lua:491: stack overflow
Lua> print(c)
999960

Code: Select all

Command> c=0 function test() c=c+1 test() end test()
onLoad error: [string "c=0 function test() c=c+1 test() end test()"]:1: stack overflow
Command> print(c)
999954
Command> c=0 local z = 0 function test() local z = z+1 if stack then print("sure") end c=c+1 test() end test()
onLoad error: [string "c=0 local z = 0 function test() local z = z+1..."]:1: stack overflow
Command> print(c)
499976
Command> c=0 local z = 0 function test() z = z+1 if stack then print("sure") end
 if z == 500 then print("lol") end c=c+1 test() end test()
lol
onLoad error: [string "c=0 local z = 0 function test() z = z+1 if st..."]:1: stack overflow
Command> print(c)
999953

Code: Select all

Command> st = os.time() c=0 function test() yrest(1) c=c+1 if c == 10000 then print(os.time() - st) return else test() end end test()
10

Code: Select all

Command> st = os.time() local c = 0 repeat c = c + 1 until c == 100000000 print(os.time() - st)
7

Code: Select all

 function waitForEventStart()
      repeat
         yrest(1000) -- check every second
         local namePE,messagePE,namePH,ScorePE,Count , IsScoreVisible= RoMScript("PE_GetInfo(1)")
         if Count == 2 and YourTargetScore > ScorePE then break end
      until false
   end

Code: Select all

<?xml version="1.0" encoding="utf-8"?><waypoints>
<onload>
	
		
	function waitevent() <!-- this will wait for event start message. Works every time regardless of display -->
		local gomsg = getTEXT("SC_ZONE_PE_3TH_ST1START")
		print("Wait for event start...\n") -- wait here
		repeat
			yrest(500)
		until getLastWarning("|cffffff80"..gomsg.."|r", 30)
		starttime = os.time()
		print("Event has started...\n")
	end
	
	function EOJCrysalia()
		keyboardPress( key.VK_I ) <!-- Presses the i key which is where my macro is for this event -->
		yrest(100)
	end   
	
	function main()		<!-- at Papp Hesof -->
		roundno = roundno + 1 <!-- increment round number - just for informational purposes-->
		cprintf(cli.red,"\nRound %s.\n",roundno)
		local eojs = getCurrency("eoj") <!-- reset number of eoj's in inventory for start of round -->
		cprintf(cli.green,"Starting EOJs for round %s: %s.\n",roundno, eojs)
		player:target_Object(120273) <!-- ensures my player targets Papp before round start -->
		waitevent() <!-- this calls the function to wait for round start -->
		repeat
			EOJCrysalia()
			<!-- To detect end of event, I look for a change in the number of eoj's that I have. -->
			<!-- Even if I'm way low on the list of contributors, I'll still earn at least 1 eoj.-->
		until getCurrency("eoj") > eojs
		<!-- Next 4 lines is just to print a summary of the round. -->
		local roundtime = (os.time()-starttime)/60
		local neweoj = getCurrency("eoj")
		local gained = neweoj-eojs
		cprintf(cli.red,"EOJ Gained this round: %s.\t\tCurrent Energy of Justice: %s.\t\tRound took %0.1f minutes\n",gained, neweoj,roundtime)
	end
	
	starttime = os.time() 
	roundno = 0
</onload>
	<!-- # 1 --><waypoint x="-9362" z="-18321" y="952" tag="eoj">
		<!-- at Papp Hesof -->
		main()
	</waypoint>
	<!-- # 2 --><waypoint x="-9362" z="-18321" y="952"> 
		<!-- at this point you could have your character go somewhere else, go sit down, -->
		<!-- or whatever for a certain period, until just prior to next round. -->
		__WPL:setWaypointIndex(1)
	</waypoint>
</waypoints>

Code: Select all

until getLastWarning("|cffffff80"..gomsg.."|r", 30)

Code: Select all

Moving to waypoint #1, (-9362, -18321)
The game client did not crash.
6:47pm - [string "..."]:20: attempt to perform arithmetic on global 'roundno' (a
 nil value)

Code: Select all

roundo = 0

Code: Select all

roundno = 0