SolarStrike Software

Code: Select all

if(zoneid ~= 4 and zoneid ~= 352) then error("\a\a\Malatinas: "..player.Name.." You are too far from "..zonename..".") end;

Code: Select all

	if(zoneid ~= 4 and zoneid ~= 352) then error("\a\a\Malatinas: "..player.Name.." You are too far from "..zonename..".") end;
	if(zoneid ~= 352 and player.Level >= MainLevel and distance(player.X,player.Z,-5874,3315) > 50) then
		RoMScript("DEFAULT_CHAT_FRAME:AddMessage('|cffffff00Malatinas:Main "..player.Name.." You are too far from NPC " ..npcname.. ".|r')")
		error("\a\a\Malatinas: Mainchar " ..player.Name.. " You are too far from NPC "..npcname..".")

Code: Select all

	if(player.Level >= MainLevel) then
		if(NumTwinks ~= 0 and NumTwinks+1 > sendMacro('GetNumPartyMembers()')) then
			RoMScript("DEFAULT_CHAT_FRAME:AddMessage('|cffffff00Malatinas: Mainchar "..player.Name.." Stop near Goblins Malatinas. Ivite all characters.|r')")
			printf("Malatinas: Mainchar "..player.Name.." Stop near Goblins Malatinas. Ivite all characters.\n");
			repeat
				yrest(1000);   
			until RoMScript('GetNumPartyMembers()') >= NumTwinks+1
		end
		player:target_NPC(npcname); yrest(1000);
		RoMScript("ChoiceOption(1);"); yrest(1000);
		RoMScript("StaticPopup_OnClick(StaticPopup1, 1);");
		repeat yrest(5000);loggedin = RoMScript("UnitName('player');"); until loggedin
		player:update();
		repeat zoneid = RoMScript("GetZoneID()"); until zoneid
		if (zoneid ~= 352) then error("\a\a\"Malatinas: " ..player.Name.. " You are too far from "..dgnname..".") end;
	else
		printf("Malatinas:character " ..player.Name.. " wait for Ivite.\n")
		while not RoMScript("UnitExists('party1')") do
			RoMScript("StaticPopup_OnClick(StaticPopup1, 1);");
			yrest(1000)
		end
		printf("Malatinas:character " ..player.Name.. " wait for enter to "..dgnname..".\n")
		while (zoneid ~= 352) do
			RoMScript("StaticPopup_OnClick(StaticPopup1, 1);");
			yrest(1000); player:update();
			zoneid = RoMScript("GetZoneID()"); 
		end
	end

Code: Select all

<!-- Inside Goblin Mines -->
 	<waypoint x="1904" z="2230" y="308" tag="STARTM4">
		if(NumTwinks ~= 0 and player.Level >= MainLevel) then
			PauseMain();
		end
		gSwimhack(); gteleport(2040,2226,388);
	</waypoint>
	<waypoint x="2040" z="2226" y="388">gteleport(2161,2231,388);</waypoint>
	<waypoint x="2161" z="2231" y="388">
		if(player.Level >= MainLevel) then
			gteleport(2296,2214,377);
			__WPL:setWaypointIndex(__WPL:findWaypointTag("Main"));
		else
			gteleport(2061,2789,377);
			__WPL:setWaypointIndex(__WPL:findWaypointTag("character"));
		end
	</waypoint>

Code: Select all

	function gteleport(gX,gZ,gY)
		player:update()
		local address  = memoryReadInt(getProc(), addresses.staticbase_char) + addresses.charPtr_offset
		local offsetX = { 0x4, 0xB0}; 
		local offsetZ = { 0x4, 0xB8}; 
		local offsetY = { 0x4, 0xB4};
		local totalDistance = distance(player.X, player.Z, player.Y, gX, gZ, gY)
		local steps = math.ceil(totalDistance/50)
		local xStep = (gX - player.X)/ steps
		local zStep = (gZ - player.Z)/ steps
		local yStep = (gY - player.Y)/ steps
		for i = 1, steps do
			memoryWriteFloatPtr(getProc(), address , offsetX, player.X + xStep); -- x value
			memoryWriteFloatPtr(getProc(), address , offsetZ, player.Z + zStep); -- z value
			memoryWriteFloatPtr(getProc(), address , offsetY, player.Y + yStep); -- y value
			printf("Player Step %d Tp to X: %d Z: %d Y: %d\n", i, player.X + xStep, player.Z + zStep, player.Y + yStep);
			yrest(800)
			player:update()
		end
	end

	function memoryfreezeSwimhack()
		local offsets = {addresses.charPtr_offset, addresses.skillBuffFlag_offset, 0xB4};
		memoryWriteIntPtr(getProc(), addresses.staticbase_char, offsets, 4);
	end
	function gSwimhack()
		registerTimer("SwimhackTimer", 5, memoryfreezeSwimhack);
	end

Code: Select all

gSwimhack(); gteleport(2040,2226,388);

Code: Select all

fly();

Code: Select all

	   if player.Class1 == 7 and player.Class2 == 2 then
	      player:cast("WARDEN_SAVAGE_POWER")
	      player:cast("WARDEN_ELVEN_PRAYER")
	      player:cast("WARDEN_MORALE_BOOST")
	      player:cast("WARDEN_ELVEN_GUIDANCE")
	      player:cast("WARDEN_EXPLOSION_OF_POWER")
	   end

Code: Select all

		player:fight()

Code: Select all

   <onSkillCast><![CDATA[
	if player:findNearestNameOrId(102102) then
		local Evelyn = player:findNearestNameOrId(102102)
		player:target(Evelyn)
		player:fight()
		end
   ]]></onSkillCast>

Code: Select all

function bossbuff()