Jump to content

Sky Slate Blueberry Blackcurrant Watermelon Strawberry Orange Banana Apple Emerald Chocolate
Photo

UPLINK GAME SCRIPT 2


  • Please log in to reply
7 replies to this topic
wheeloftime_rules
  • Members
  • 47 posts
  • Last active: Apr 07 2008 12:38 AM
  • Joined: 06 Feb 2006
This is the second script made for Uplink.

When, in Uplink, you are hacking a bank, you will get a lot of information on user accounts. This will eliminate the need to write it down, organizing the information and saving it. This handles up to fifteen accounts, so it is extraordinarily long.

The script leaves a blank space for the account owner's real name; you find this out when you enter the actual account (as opposed to the admin account, which is where you find the Account Number and Password.

Here it is...
#EscapeChar |
#SingleInstance Force
COUNT=0
TOP:
^+b::
if COUNT=0
{
	errorlevel=5
	Goto BANK
	Return
}
if COUNT=.5
{
	errorlevel=5
	Goto FIRST
	Return
}
if COUNT=1
{
	errorlevel=5
	Goto SECOND
	Return
}
if COUNT=2
{
	errorlevel=5
	Goto THIRD
	Return
}
if COUNT=3
{
	errorlevel=5
	Goto FOURTH
	Return
}
if COUNT=4
{
	errorlevel=5
	Goto FIFTH
	Return
}
if COUNT=5
{
	errorlevel=5
	Goto SIXTH
	Return
}
if COUNT=6
{
	errorlevel=5
	Goto SEVENTH
	Return
}
if COUNT=7
{
	errorlevel=5
	Goto EIGHTH
	Return
}
if COUNT=8
{
	errorlevel=5
	Goto NINTH
	Return
}
if COUNT=9
{
	errorlevel=5
	Goto TENTH
	Return
}
if COUNT=10
{
	errorlevel=5
	Goto ELEVENTH
	Return
}
if COUNT=11
{
	errorlevel=5
	Goto TWELFTH
	Return
}
if COUNT=12
{
	errorlevel=5
	Goto THIRTEENTH
	Return
}
if COUNT=13
{
	errorlevel=5
	Goto FOURTEENTH
	Return
}
if COUNT=14
{
	errorlevel=5
	Goto FIFTEENTH
	Return
}
if COUNT=15
{
	MsgBox, 0, Finished, All fifteen possible accounts are filled.  Press Ctrl-Shift-Windows-B to save the data.
	Return
}
Return
^#+b::
ifwinexist, Finished
{
	WinKill, Finished
}
Msgbox, 4, BANK INFORMATION, The bank information is as follows: |n| The bank is %BankName%.  This bank has an IP of %BankIP%.  The user information is as follows: |n| FIRST USER: Account Number=%NUMBER1%, Passcode=%PASS1% |n| SECOND USER: Account Number=%NUMBER2%, Passcode=%PASS2% |n| THIRD USER: Account Number=%NUMBER3%, Passcode=%PASS3%  |n| FOURTH USER: Account Number=%NUMBER4%, Passcode=%PASS4%  |n| FIFTH USER: Account Number=%NUMBER5%, Passcode=%PASS5%  |n| SIXTH USER: Account Number=%NUMBER6%, Passcode=%PASS6%  |n| SEVENTH USER: Account Number=%NUMBER7%, Passcode=%PASS7%  |n| EIGHTH USER: Account Number=%NUMBER8%, Passcode=%PASS8%  |n| NINTH USER: Account Number=%NUMBER9%, Passcode=%PASS9%   |n| TENTH USER: Account Number=%NUMBER10%, Passcode=%PASS10%  |n| ELEVENTH USER: Account Number=%NUMBER11%, Passcode=%PASS11%  |n| TWELFTH USER: Account Number=%NUMBER12%, Passcode=%PASS12%  |n| THIRTEENTH USER: Account Number=%NUMBER13%, Passcode=%PASS13%  |n| FOURTEENTH USER: Account Number=%NUMBER14%, Passcode=%PASS14%  |n| FIFTEENTH USER: Account Number=%NUMBER15%, Passcode=%PASS15% |n| |n| Do you want to export this data as a TXT file?
ifmsgbox, no
{
	Return
}
ifmsgbox, yes
{
	run, notepad
	Winwait, Untitled - Notepad
	send, ^s
	Winwait, Save As
	send, %userprofile%\Desktop\%BankName% information.txt
	send, {ENTER}
	Winwait, %BankName% information.txt - Notepad
	send, Bank Name: %BankName%
	send, {ENTER}
	send, Bank IP: %BankIP%
	send, {ENTER}
	send, {ENTER}
	send, Account 1 Account Number: %NUMBER1%
	send, {ENTER}
	send, Account 1 Passcode: %PASS1%
	send, {ENTER}
	send, Account 1 Owner Name: 
	send, ^s
	send, {ENTER}
	send, {ENTER}
	send, Account 2 Account Number: %NUMBER2%
	send, {ENTER}
	send, Account 2 Passcode: %PASS2%
	send, {ENTER}
	send, Account 2 Owner Name: 
	send, ^s
	send, {ENTER}
	send, {ENTER}
	send, Account 3 Account Number: %NUMBER3%
	send, {ENTER}
	send, Account 3 Passcode: %PASS3%
	send, {ENTER}
	send, Account 3 Owner Name: 
	send, ^s
	send, {ENTER}
	send, {ENTER}
	send, Account 4 Account Number: %NUMBER4%
	send, {ENTER}
	send, Account 4 Passcode: %PASS4%
	send, {ENTER}
	send, Account 4 Owner Name: 
	send, ^s
	send, {ENTER}
	send, {ENTER}
	send, Account 5 Account Number: %NUMBER5%
	send, {ENTER}
	send, Account 5 Passcode: %PASS5%
	send, {ENTER}
	send, Account 5 Owner Name: 
	send, ^s
	send, {ENTER}
	send, {ENTER}
	send, Account 6 Account Number: %NUMBER6%
	send, {ENTER}
	send, Account 6 Passcode: %PASS6%
	send, {ENTER}
	send, Account 6 Owner Name: 
	send, ^s
	send, {ENTER}
	send, {ENTER}
	send, Account 7 Account Number: %NUMBER7%
	send, {ENTER}
	send, Account 7 Passcode: %PASS7%
	send, {ENTER}
	send, Account 7 Owner Name: 
	send, ^s
	if NUMBER8 is not Integer
	{
		MsgBox, 4, Account Number 8, The Account Number of Account Eight appears to be missing.  Do you want to enter it in (Yes) or leave it blank (No)?  If it is left blank, you cannot enter Accounts 9 through 15.
		ifMsgBox, yes
		{
			Goto EIGHTH
			Return
		}
		ifMsgBox, no
		{
			Goto SUCCESS
			Return
		}
	}
	else if NUMBER8 is Integer
	{
		send, {ENTER}
		send, {ENTER}
		send, Account 8 Account Number: %NUMBER8%
		send, {ENTER}
		send, Account 8 Passcode: %PASS8%
		send, {ENTER}
		send, Account 8 Owner Name: 
		send, ^s
	}


	if NUMBER9 is not Integer
	{
		MsgBox, 4, Account Number 9, The Account Number of Account Nine appears to be missing.  Do you want to enter it in (Yes) or leave it blank (No)?  If it is left blank, you cannot enter Accounts 10 through 15.
		ifMsgBox, yes
		{
			Goto NINTH
			Return
		}
		ifMsgBox, no
		{
			Goto SUCCESS
			Return	
		}
	}
	else if NUMBER9 is Integer
	{
		send, {ENTER}
		send, {ENTER}
		send, Account 9 Account Number: %NUMBER9%
		send, {ENTER}
		send, Account 9 Passcode: %PASS9%
		send, {ENTER}
		send, Account 9 Owner Name: 
		send, ^s
	}


	if NUMBER10 is not Integer
	{
		MsgBox, 4, Account Number 10, The Account Number of Account Ten appears to be missing.  Do you want to enter it in (Yes) or leave it blank (No)?  If it is left blank, you cannot enter Accounts 11 through 15.
		ifMsgBox, yes
		{
			Goto TENTH
			Return
		}
		ifMsgBox, no
		{
			Goto SUCCESS
			Return	
		}
	}
	else if NUMBER10 is Integer
	{
		send, {ENTER}
		send, {ENTER}
		send, Account 10 Account Number: %NUMBER10%
		send, {ENTER}
		send, Account 10 Passcode: %PASS10%
		send, {ENTER}
		send, Account 10 Owner Name: 
		send, ^s
	}


	if NUMBER11 is not Integer
	{
		MsgBox, 4, Account Number 11, The Account Number of Account Eleven appears to be missing.  Do you want to enter it in (Yes) or leave it blank (No)?  If it is left blank, you cannot enter Accounts 12 through 15.
		ifMsgBox, yes
		{
			Goto ELEVENTH
			Return
		}
		ifMsgBox, no
		{
			Goto SUCCESS
			Return	
		}
	}
	else if NUMBER11 is Integer
	{
		send, {ENTER}
		send, {ENTER}
		send, Account 11 Account Number: %NUMBER11%
		send, {ENTER}
		send, Account 11 Passcode: %PASS11%
		send, {ENTER}
		send, Account 11 Owner Name: 
		send, ^s
	}


	if NUMBER12 is not Integer
	{
		MsgBox, 4, Account Number 12, The Account Number of Account Twelve appears to be missing.  Do you want to enter it in (Yes) or leave it blank (No)?  If it is left blank, you cannot enter Accounts 13 through 15.
		ifMsgBox, yes
		{
			Goto TWELFTH
			Return
		}
		ifMsgBox, no
		{
			Goto SUCCESS
			Return	
		}
	}
	else if NUMBER12 is Integer
	{
		send, {ENTER}
		send, {ENTER}
		send, Account 12 Account Number: %NUMBER12%
		send, {ENTER}
		send, Account 12 Passcode: %PASS12%
		send, {ENTER}
		send, Account 12 Owner Name: 
		send, ^s
	}


	if NUMBER13 is not Integer
	{
		MsgBox, 4, Account Number 13, The Account Number of Account Thirteen appears to be missing.  Do you want to enter it in (Yes) or leave it blank (No)?  If it is left blank, you cannot enter Accounts 14 through 15.
			ifMsgBox, yes
			{
				Goto THIRTEENTH
				Return
			}
			ifMsgBox, no
			{
				Goto SUCCESS
				Return	
			}
	}
	else if NUMBER13 is Integer
	{
		send, {ENTER}
		send, {ENTER}
		send, Account 13 Account Number: %NUMBER13%
		send, {ENTER}
		send, Account 13 Passcode: %PASS13%
		send, {ENTER}
		send, Account 13 Owner Name: 
		send, ^s
	}


	if NUMBER14 is not Integer
	{
		MsgBox, 4, Account Number 14, The Account Number of Account Fourteen appears to be missing.  Do you want to enter it in (Yes) or leave it blank (No)?  If it is left blank, you cannot enter Account 15.
			ifMsgBox, yes
			{
				Goto FOURTEENTH
				Return
			}
			ifMsgBox, no
			{
				Goto SUCCESS
				Return	
			}
	}
	else if NUMBER14 is Integer
	{
		send, {ENTER}
		send, {ENTER}
		send, Account 14 Account Number: %NUMBER14%
		send, {ENTER}
		send, Account 14 Passcode: %PASS14%
		send, {ENTER}
		send, Account 14 Owner Name: 
		send, ^s
	}

	if NUMBER15 is not Integer
	{
		MsgBox, 4, Account Number 15, The Account Number of Account Fifteen appears to be missing.  Do you want to enter it in (Yes) or leave it blank (No)?  If it is left blank, the program will have finished..
		ifMsgBox, yes
			{
				Goto FIFTEENTH
				Return
			}
			ifMsgBox, no
			{
				Goto SUCCESS
				Return	
			}
	}
	else if NUMBER15 is Integer
	{
		send, {ENTER}
		send, {ENTER}
		send, Account 15 Account Number: %NUMBER15%
		send, {ENTER}
		send, Account 15 Passcode: %PASS15%
		send, {ENTER}
		send, Account 15 Owner Name: 
		send, ^s
		Goto SUCCESS
		Return
	}


}
SUCCESS:
	MsgBox, 0, Restart Application, The data was saved successfully.  This program will restart, wiping variables.  The window with %BankName%'s data in it will be saved and minimized.  Click OK to continue.
	WinActivate, %BankName% information.txt - Notepad
	send, ^s
	WinRestore, %BankName% information.txt - Notepad
	WinMinimize, %BankName% information.txt - Notepad
	Reload
	sleep, 200
	MsgBox, 4, Error, There was an error reloading.  Would you like to edit the script?
	ifmsgbox, no
	{
		Reload
		sleep, 200
		ExitApp
	}
	ifmsgbox, yes
	{
		Edit
		Return
	}
Return
BANK:
InputBox, BankName, Name of the Bank, What is the name of the bank?,,,,,,,,Something International Bank
if errorlevel=1
	{
		COUNT=0
		Return
	}
else if errorlevel=0
	{
		InputBox, BankIP, IP of the Bank, What is the IP Address of the bank?,,,,,,,,
		if errorlevel=1
		{
			COUNT=0
			Return
		}
		else if errorlevel=0
		{
			Goto FIRST
			Return
		}
	}
FIRST:

errorlevel=5
InputBox, NUMBER1, Account Number of Account 1, What is the Account Number of the first account?,,,,,,,,
	{
		if errorlevel=1
		{
			COUNT=.5
			Return
		}
		else if errorlevel=0
		{
			errorlevel=5
			InputBox, PASS1, Passcode of Account 1, What is the Passcode of the first account?,,,,,,,,
			if errorlevel=1
			{
				COUNT=0
				Return
			}
			else if errorlevel=0
			{
				MsgBox, 0, Successful Add,  The user account of %NUMBER1% with the passcode of %PASS1% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
				COUNT=1
				errorlevel=5
				Return
			}
		}
	}

SECOND:
errorlevel=5
InputBox, NUMBER2, Account Number of Account 2, What is the Account Number of the second account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=1
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS2, Passcode of Account 2, What is the Passcode of the second account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=1
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER2% with the passcode of %PASS2% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=2
			errorlevel=5
			Return
		}
	}
}

THIRD:
errorlevel=5
InputBox, NUMBER3, Account Number of Account 3, What is the Account Number of the third account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=2
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS3, Passcode of Account 3, What is the Passcode of the third account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=2
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER3% with the passcode of %PASS3% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=3
			errorlevel=5
			Return
		}
	}
}

FOURTH:
errorlevel=5
InputBox, NUMBER4, Account Number of Account 4, What is the Account Number of the fourth account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=3
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS4, Passcode of Account 4, What is the Passcode of the fourth account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=3
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER4% with the passcode of %PASS4% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=4
			errorlevel=5
			Return
		}
	}
}

FIFTH:
errorlevel=5
InputBox, NUMBER5, Account Number of Account 5, What is the Account Number of the fifth account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=4
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS5, Passcode of Account 5, What is the Passcode of the fifth account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=4
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER5% with the passcode of %PASS5% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=5
			errorlevel=5
			Return
		}
	}
}

SIXTH:
errorlevel=5
InputBox, NUMBER6, Account Number of Account 6, What is the Account Number of the sixth account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=5
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS6, Passcode of Account 6, What is the Passcode of the sixth account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=5
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER6% with the passcode of %PASS6% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=6
			errorlevel=5
			Return
		}
	}
}

SEVENTH:
errorlevel=5
InputBox, NUMBER7, Account Number of Account 7, What is the Account Number of the seventh account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=6
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS7, Passcode of Account 7, What is the Passcode of the seventh account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=6
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER7% with the passcode of %PASS7% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=7
			errorlevel=5
			Return
		}
	}
}

EIGHTH:
errorlevel=5
InputBox, NUMBER8, Account Number of Account 8, What is the Account Number of the eighth account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=7
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS8, Passcode of Account 8, What is the Passcode of the eighth account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=7
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER8% with the passcode of %PASS8% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=8
			errorlevel=5
			Return
		}
	}
}

NINTH:
errorlevel=5
InputBox, NUMBER9, Account Number of Account 9, What is the Account Number of the nint haccount?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=8
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS9, Passcode of Account 9, What is the Passcode of the ninth account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=8
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER9% with the passcode of %PASS9% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=9
			errorlevel=5
			Return
		}
	}
}

TENTH:
errorlevel=5
InputBox, NUMBER10, Account Number of Account 10, What is the Account Number of the tenth account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=9
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS10, Passcode of Account 10, What is the Passcode of the tenth account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=9
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER10% with the passcode of %PASS10% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=10
			errorlevel=5
			Return
		}
	}
}

ELEVENTH:
errorlevel=5
InputBox, NUMBER11, Account Number of Account 11, What is the Account Number of the eleventh account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=10
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS11, Passcode of Account 11, What is the Passcode of the eleventh account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=10
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER11% with the passcode of %PASS11% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=11
			errorlevel=5
			Return
		}
	}
}

TWELFTH:
errorlevel=5
InputBox, NUMBER12, Account Number of Account 12, What is the Account Number of the twelfth account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=11
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS12, Passcode of Account 12, What is the Passcode of the twelfth account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=11
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER12% with the passcode of %PASS12% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=12
			errorlevel=5
			Return
		}
	}
}

THIRTEENTH:
errorlevel=5
InputBox, NUMBER13, Account Number of Account 13, What is the Account Number of the thirteenth account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=12
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS13, Passcode of Account 13, What is the Passcode of the thirteenth account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=12
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER13% with the passcode of %PASS13% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=13
			errorlevel=5
			Return
		}
	}
}

FOURTEENTH:
errorlevel=5
InputBox, NUMBER14, Account Number of Account 14, What is the Account Number of the fourteenth account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=13
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS14, Passcode of Account 14, What is the Passcode of the fourteenth account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=13
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER14% with the passcode of %PASS14% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=14
			errorlevel=5
			Return
		}
	}
}

FIFTEENTH:
errorlevel=5
InputBox, NUMBER15, Account Number of Account 15, What is the Account Number of the fifteenth account?,,,,,,,,
{
	if errorlevel=1
	{
		COUNT=14
		Return
	}
	else if errorlevel=0
	{
		errorlevel=5
		InputBox, PASS15, Passcode of Account 15, What is the Passcode of the fifteenth account?,,,,,,,,
		if errorlevel=1
		{
			COUNT=14
			Return
		}
		else if errorlevel=0
		{
			MsgBox, 0, Successful Add,  The user account of %NUMBER15% with the passcode of %PASS15% |n| for the bank %BankName% with the IP Address of %BankIP% was successfully added.
			COUNT=15
			errorlevel=5
			Return
		}
	}
}
Return
Told you it was big. I should mention that after I finished this, I thought about making the "Successful Add" MsgBoxes ask whether or not the user needs to edit the data, then, if so, jump back to the command and redo it. If I did this, I also should have made it so that the InputBox default values are the variables.

I don't want to do this... but I might eventually.
My other sig is a Porsche.

Veovis
  • Members
  • 389 posts
  • Last active: Mar 17 2009 12:24 AM
  • Joined: 13 Feb 2006
you should use FileAppend, instead of running notepad and then sending that much stuff, also allot of your code could be condensed by using loops or functions. Also
InputBox, PASS15, Passcode of Account 15, What is the Passcode of the fifteenth account?,,,,,,,,
can be written as
InputBox, PASS15, Passcode of Account 15, What is the Passcode of the fifteenth account?
you can leave of unused commas

hmmm, i was going to compress your code, but decided to completely rewrite it. This has no limit for how many accounts you can add, as well as both the account and the password are on the same gui. Press CTRL SHIFT B to open the bank page, then after that it will subsequently open Account pages. Then you are done press CTRL SHIFT WIN B and it will write a file, then open it. Then prompt for restart, if you say no, then you can continue to add info.

#SingleInstance Force
currentnumber = 0
gui, add, text,y10 ,Account Number:
gui, add, text,xm y35 ,PassCode:
gui, add, edit,w200 ym vAccountNumber
gui, add, edit,w200 vPassCode
gui, add, button,xm default gRecordInfo,(Press ENTER when done or click here)

gui, 2:add, text,y10 ,Bank Name:
gui, 2:add, text,xm y35 ,Bank IP Address:
gui, 2:add, edit,w200 ym vBankName
gui, 2:add, edit,w200 vBankIP
gui, 2:add, button,xm default gRecordBank,(Press ENTER when done or click here)

return

^+b::
EnterInfo:
if not BankName
{
   Gosub GetBankInfo
   return
}
if currentlyopen
   return
currentnumber += 1
gui, show, ,Enter Info for Account #%currentnumber%
if currentnumber <> 1
   send, +{tab}
currentlyopen = true
return

RecordInfo:
gui, submit
if (!accountnumber) or (!passcode) or (accountnumber is not integer)
{
   msgbox, something was not correct, please reenter the info
   currentlyopen = false
   gui, show, ,Enter Info for Account #%currentnumber%
   return
}
Pass%currentnumber% := PassCode
AccNum%currentnumber% := AccountNumber
guicontrol,,AccountNumber
guicontrol,,PassCode
currentlyopen = 0
return

GetBankInfo:
Gui, 2:show, ,Enter Bank Info
return

RecordBank:
gui, 2:submit
if (!BankName) or (!BankIP)
{
   msgbox, something was not corrent, please reenter the info
   gosub, GetBankInfo
   return
}
return


^#+b::
if !BankName
{
   msgbox, cannot write file, no data has been entered
   return
}
ifexist, %userprofile%\Desktop\%BankName% information.txt
{
   msgbox, that bank's file excists, the old will be renamed. (if there was already one renamed it will be erased)
   filemove,%userprofile%\Desktop\%BankName% information.txt,%userprofile%\Desktop\%BankName% information OLD.txt,1
}
FileDelete,%userprofile%\Desktop\%BankName% information.txt
FileAppend, 
(
Bank Name: %BankName%
Bank IP: %BankIP%


),%userprofile%\Desktop\%BankName% information.txt

Loop, 
{
   AccNum := AccNum%A_index%
   Pass := Pass%A_index%
   if AccNum
   {
      FileAppend, 
      ( LTrim
      Account %A_index% Number: %AccNum% 

      Account %A_index% Passcode: %Pass%

      Account %A_index% Owner Name:

      ==================================`n`n
      ),%userprofile%\Desktop\%BankName% information.txt
   }
   else
      break
}
run, notepad %userprofile%\Desktop\%BankName% information.txt
winwait, %BankName% information.txt - Notepad
msgbox,4,Completed, file is now open, would you like to restart the script?
ifmsgbox, yes
   reload
return

Please report any bugs, as it is not extensilvely tested. Enjoy!
Posted Image
"Power can be given overnight, but responsibility must be taught. Long years go into its making."

wheeloftime_rules
  • Members
  • 47 posts
  • Last active: Apr 07 2008 12:38 AM
  • Joined: 06 Feb 2006
good script, I don't really want to change it... too much work lol. Will save it as seperate file and add the ability to check and edit the account stuff after each thing. TY.
My other sig is a Porsche.

Veovis
  • Members
  • 389 posts
  • Last active: Mar 17 2009 12:24 AM
  • Joined: 13 Feb 2006
867 -> 109 lines of code.

man i feel bad as i scroll through your code. that must have been a lot of copy and pasting, and then changing the numbers and stuff. I was just trying to help when i rewrite your code. but believe me, whenever you do something repitive use a gosub and a var or even better, use a function. I learned from Laszlo how powerful functions can be in saving script space in my SysInfo script.
Posted Image
"Power can be given overnight, but responsibility must be taught. Long years go into its making."

wheeloftime_rules
  • Members
  • 47 posts
  • Last active: Apr 07 2008 12:38 AM
  • Joined: 06 Feb 2006
the edit thing will be easy with my code.
My other sig is a Porsche.

lekremyelsew
  • Members
  • 19 posts
  • Last active: Feb 17 2007 08:17 PM
  • Joined: 03 Jan 2006
WikyPedia, how long did this take? :?


And how many people here play uplink??? :?

Veovis
  • Members
  • 389 posts
  • Last active: Mar 17 2009 12:24 AM
  • Joined: 13 Feb 2006
*raises hand* I do! :D
Posted Image
"Power can be given overnight, but responsibility must be taught. Long years go into its making."

wheeloftime_rules_forreal
  • Guests
  • Last active:
  • Joined: --
This took about 11 hours straight.

Its Rikipedia.

I don't feel like logging in...