SolarStrike Software

Code: Select all

	SetCharList({
		{
			{account=1 , chars= {}},
		},{
			{account=2 , chars= {}},
			{account=3 , chars= {}},
		},
	})
	SetRestartClientSettings(1, "rom")
	LoginNextChar()
	loadProfile()

Code: Select all

rom/login acc:3 char:3 path:xxx

Code: Select all

FOR /F "tokens=1 delims=" %%A in ('cd') do SET folder=%%A
START ../../micromacro.exe "%folder%/login.lua" acc:3 char:3 client:rom path:xxx

Code: Select all

Starting client rom ...
Waiting for another bot to release the active windows.

Code: Select all

Changing to character 2 account 3 with client lnk "rom"
(translated) SUCCESSFUL: The process with PID xxxx was killed.
Starting client rom ...
Clicking account 3 ...
Selecting character 2 ...
Waiting until in-game ...

Code: Select all

@echo off
FOR /F "tokens=1 delims=" %%A in ('cd') do SET folder=%%A
START ../../micromacro.exe "%folder%/login.lua" acc:2 char:1 client:Rom path:perros 2

Code: Select all

rom/bot path:perros 2

Code: Select all

function ChangeCharRestartNext(client)
	if(client == nil) then
		client = "Client"
	end
	if #charList == 0 then
		error("LoginNextChar(); No character list defined. Use \"SetCharList(_table)\" to define list before using \"LoginNextChar()\"")
	end

	nextChar, nextAcc = GetNextChar()
	CurrentLoginChar = nextChar;
	CurrentLoginAcc = nextAcc;
	if nextAcc == nil then
		if (Quit_Game == "true") then
			-- we will quit game
			print("Last player finished. We will Quit game")
			RoMScript("QuitGame()")
		else			-- Last character
			print("Last player finished.")
			player:logout()
		end
	end
	ChangeCharRestart(nextChar,nextAcc, client);
        -- That part he asked about
	if( nextChar ~= getChar() or  nextAcc ~= getAcc())then
		print("We are in the wrong acc Report:ChangeCharRestartNext");
		ChangeCharRestart(nextChar,nextAcc,"Client")
	end
	
	CurrentLoginChar = nextChar;
	CurrentLoginAcc = nextAcc;
end

Code: Select all

function loginChar(character, account, client)
	client = client or current_client_lnk_in_use
	local oldwindow = nil;
	local oldProcess = nil;
	local oldwin = __WIN
	local trycounter = 1;
	local oldchar = getChar();
	local oldacc = getAcc()
	if not client then
		error("No client specified.")
	end
	if not account then
		error("No account specified.")
	end
	if not character then
		error("No character specified.")
	end
	
	oldwindow = getWin();
	oldProcess = __PROC;
	
		startClient(client, oldwindow)
		rest(5000)
	
	__PROC = openProcess( findProcessByWindow(getWin()) )
	
	-- Wait until it's at the login screen. ('atLogin' returns true early so I'm not sure this is necessary)
	
	repeat
		rest(1000)
	until gameState(__WIN) == 1
	rest(3000)

	-- Click login button until it leave login
	reserveActiveWindow()
	print("Clicking account "..account.." ...")
	repeat
		clickLoginButton(account)
		rest(2000)
	trycounter = trycounter +1;
	until gameState() ~= 1
	releaseActiveWindow()

	-- Wait until at character selection
	repeat
		rest(2000)
	until gameState() == 2
	rest(3000)

	-- Click character
	reserveActiveWindow()
	print("Selecting character "..character.." ... ")
	clickCharacter(character) rest(500)
	keyboardPress(key.VK_ENTER)
	releaseActiveWindow()

	-- Wait until in game
	print("Waiting until in-game ...")
	local starttime = os.time()
	repeat
		rest(2000)
	until gameState() == 3 or 120 > (os.time() - starttime)
	rest(3000)
	showWindow(getWin(),sw.minimize);
	
	detach()
	
	
	rest(500)
	if(openProcess( oldwin) == 0)then
		login(oldchar, oldacc, "Client");
	end
	
	__PROC = oldProcess;
	__WIN = oldwin;
	attach(oldwindow);
	IdAddressTables = {}

	if CCamera then
		local cameraAddress = memoryReadUIntPtr(getProc(), addresses.staticbase_char, addresses.camPtr_offset) or 0;
		camera = CCamera(cameraAddress);
	end

	if CGuildbank then guildbank = CGuildbank() end
	player:update();
end

Code: Select all

ChangeCharRestartNext(client)
    local nextChar, nextAcc = GetNextChar()
    if nextAcc == nil then
        -- Do something if last
    else
        ChangeCharRestart(nextChar,nextAcc, client)
    end
end