Log in

View Full Version : Update to Player form/ bank pins



twobac
02-07-2007, 11:30 AM
I think the player array should be update along with the bank login proceedure. Currently this does not support bank pins (for all of the banking scripts such as Agent Smith / Guildminer. As a real user you would have a pin on ur bank account 'just to be sure', so I think that this would be a good idea.

Cheers

WT-Fakawi
02-07-2007, 12:00 PM
Yes. The Player-Array needs tweaking. Problem is: it will render all current scripts useless. It will be done as soon as DIVI comes out I guess. Now, as far as Banking is concerned, you are free to add Inpin; to banking offcourse.

Wizzup?
02-07-2007, 03:41 PM
Yes. The Player-Array needs tweaking. Problem is: it will render all current scripts useless. It will be done as soon as DIVI comes out I guess. Now, as far as Banking is concerned, you are free to add Inpin; to banking offcourse.

Also, please add in bank finders.


Until BankScreen Or PinScreen;

twobac
02-07-2007, 03:51 PM
Hi,

Thought something like this would work, but I cannot get it to work and have really confused myself and almost given up the will to live.

Define as constants the pins nos for each player


In User defined section
const Pin0 = '0103'; //<-Pin for player 0
const Pin1 = '0000'; //<-Pin for player 1 - Add more for additional players


Then get

In Code
procedure WhatsMyPin;
begin
Case 'Pin'+ [CurrentPlayer] Of
Pin0 : Begin BankPin end;
Pin1 : Begin BankPin end;
Pin2 : Begin BankPin end;//etc add more for...
End;

Then amended ur banking script to


procedure Bank(InOut:String);
begin
MarkTime(Mark);
while ( (not BankScreen) or (TimeFromMark(Mark) > 120000) ) do
begin
if PinScreen then //added twobac
WriteLn('PinScreen'); //added twobac (just to test Pinscreen found)
InPin(BankPin); //added twobac

if BankScreen then Break; //from this point ur original code.




The only way I think it could work otherwise is


procedure Bank(InOut:String);
begin
MarkTime(Mark);
while ( (not BankScreen) or (TimeFromMark(Mark) > 120000) ) do
begin
if PinScreen then //added twobac
WriteLn('PinScreen'); //added twobac (just to test Pinscreen found)
InPin('1111'); //added twobac - where all players have the same pin number??? Dodgy!

if BankScreen then Break; //from this point ur original code.

Starblaster100
02-07-2007, 05:17 PM
or we could just add in another variable into the Player array:


Players[currentplayer].Pin := 0000;

Simple

WT-Fakawi
02-07-2007, 05:46 PM
or we could just add in another variable into the Player array:


Players[currentplayer].Pin := 0000;

Simple

Brilliant!

Wizzup?
02-07-2007, 06:00 PM
I already added all this two days ago.. Look in my essence miner. :)

twobac
02-07-2007, 08:24 PM
or we could just add in another variable into the Player array:


Players[currentplayer].Pin := 0000;

Simple

Ok I have tried and now I have found where to declare the new variable :)
so this is now working great for me.

Many Thanks all

whales
02-09-2007, 01:00 AM
A new banking procedure would be great too...

Boreas
02-09-2007, 04:02 AM
Do you mean bank booth finding or deposit/withdraw? (I am working on the latter)

whales
02-09-2007, 02:37 PM
Do you mean bank booth finding or deposit/withdraw? (I am working on the latter)

I mean booth finding.. But new deposit/withdraw would be very beneficial too.

julle13
02-09-2007, 02:42 PM
I think too that improved booth finding could be awesome:D

Boreas
02-09-2007, 11:50 PM
I think part of why the SRL bank booth finders are not great is that they work for multiple banks. The less convenient but more effective way is to write one for each bank. Yakman wrote a great one for edgeville in a members script, which I use for all my in-bank scripts. Now for those looking for something to script, individual bank booth finders would be great.