Trainstation bot

08/09/2014, 17:11

#31

samhamilton

elite*gold: 0

The Black Market: 0/0/0

Join Date: Aug 2014

Posts: 1

Received Thanks: 0

Quote:

Originally Posted by shyden

Instructions:

Download ACTool and set your start/stop hotkeys

I'm not familiar with ACTool but have used AutoHotKey extensively. From what I've seen so far by looking at your code and the ACT help file, ACT seems to be much better than AHK.

But, in looking thru the help file, I can't find anything about start/stop hotkeys - or any hotkeys for that matter.

Can you give me a little more direction on setting the start/stop hotkeys, as in where they must be set?

09/19/2014, 22:49	#32
zuzu500 elite*gold: 0 The Black Market: 0/0/0 Join Date: May 2012 Posts: 3 Received Thanks: 0	hello , this scricpt work now ? because i try to use and there happened nothing...

10/25/2014, 21:43	#33
jusztt_me elite*gold: 0 The Black Market: 0/0/0 Join Date: Oct 2014 Posts: 1 Received Thanks: 0	pleas can anybody help me with this! my skype is boost124

10/27/2014, 14:40	#34
Linzy elite*gold: 0 The Black Market: 0/0/0 Join Date: Mar 2010 Posts: 11 Received Thanks: 3	Eny give help video?

10/30/2014, 11:08	#35
Tenebrae00 elite*gold: 0 The Black Market: 0/0/0 Join Date: Oct 2014 Posts: 4 Received Thanks: 3	Trainstation bot update ! Hello guys, i believe that Flum is not working on this Trainstation bot anymore, so i decided to help him with my own customization of Trainstation bot, feel free to test it, report bugs to my email address mentioned in documentation of this bot click on spoiler if you want to see whole bot (its quite long 1000 rows) Spoiler (* Trainstation bot by flum (modified by Tenebrae and Nukli) flum contact info: Have problems or questions feel free to contact me on teamspeak 3 Address: flum.aionallstars.com:11807 I believe that flum is not working on this trainstation bot anymore so i changed it a little bit and started to develop it after him. to contact me use my Email address: -Functions Send your trains out every 6/10/30/1h/2h/3h minutes + goes to docking to click on the trains. Delete flags for you. Keeps track and logs the amount of trains it dispatches. Keeps tracks of errors, able to reconnect if ur internet connection restarts. Makes screenshots of ur materials + exp bar. Collect trains from your neighbours Send IT trains to your friends Collect gifts from your friends Send gifts to your friends (MUST BE CONFIGURED TO WORK PROPERRLY) Send IT trains to your friends Send gifts to your friends -Requirements Screen resolution 1366 768 Chrome or Firefox. The 1 click passenger and cargo upgrade for ur station. Basic knowledge about AC tool scripting -Run notes Start the script first, then within 5 sec open trainstation fullscreen. << Changelog >> 0.2 send trains every 10 min 0.3 minor bug fixes 0.4 added del flag function 0.5 changed flag function for easy use 0.6 send int function added 0.7 click dockin station implemented 0.8 color check implemented for better check 0.9 changed mouse cord. for int trains 1.0 code clean up 1.1 error logger 1.2 train send tracker 1.3 screenshot material/exp 1.4 reconnecter 1.4.1 Minor fix issue for Chrome (by Nukli) -Adjusting setup for The Train Station portal page -Changes clicks for new achievements -Added small pause after starting macro -Different pathe for exported files 1.4.2 minor fix on reconnect (By Tenebrae) updated position of trains on mainscreen restart chrome every 5 hours to fix lag 1.4.3 added automatical support for 350gem event bar(By Tenebrae) 1.4.4 passengers set to 3 hours (By Tenebrae) 1.5 added script for IT trains (By Tenebrae) 1.6 added neighbour check trains (By Tenebrae) 1.7 added gift send / recieve (By Tenebrae) 1.8 modified connect procedure, now automatically setup your browser 1.9 code clean up, still testin phase, modified some of scripts (main), now should be working with any theme -Config notes If you want to use IT trains you have to set up you friends in custom tab this bot will send it trains only to your friends on !!!CUSTOM!!! tab ! For GIFTS bot will send gifts only to your friends under !!!GOLDEN STAR!!! for working trainstation bot propperly you need to have your browser pinned on your taskbar like this it means double start bar, with first pinned aplication your browser *) constants // change to set up your train bot send = 30 // sending local trains \|6=6min\|10=10min\|30=30min\|100=1hod\|200=2hod\|300=3h od\| others not scripted yet it = 1 // set to 0 if u dont want to send IT trains achievshare = 1 // set to 0 if u dont want to share achiev lvlshare = 1 // set to 0 if u dont want to share lvl up neighbours = 1 // set to 0 if u dont want recieve trains gifts from neighbours setupgetgifts = 1 // set to 0 if u dont want to recieve gifts automatically setupsendgifts = 1 // set to 0 if u dont want to send gifts automatically gift = 4 // whitch gift u want send? 1/2/3/4 ? first is left //--------------------------------------------------------------------------------------------------------------------------------------------------------- // ----------------------------------------------------DO NOT CHANGE ANYTHING BELOW THIS LINE-------------------------------------------------------------- //--------------------------------------------------------------------------------------------------------------------------------------------------------- sendgifts = 1 getgifts = 1 delflag = 0 train = 0 run = 0 dock = 0 date = 0 time = 0 timer = 0 reason = 0 trigger = 0 dockcolor = 0 loadeddockcolor = 0 main = 1 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- constructs File1=File File2=File File3=File end //--------------------------------------------------------------------------------------------------------------------------------------------------------- delay 3 sec call connect call main //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure main //Clicks on all the trains on the main screen call flag while $main = 1 if $neighbours = 1 call CheckNeighbours // check your neighbours for trains else end if $setupgetgifts = 1 if $getgifts = 1 call GetGifts // collect gifts else end else end if $setupsendgifts = 1 if $sendgifts = 1 call SendGifts // send gifts to your friends else end else end if $it = 1 call CheckIT else end call dispatchtrains MousePos 212, 69 Call click delay 2 sec compute time = $time + 3000 compute timer = $timer + 3000 LoadRGB 30, 715 If {RGBred} = 99 Call dock else end delay 1 sec compute time = $time + 1000 compute timer = $timer + 1000 call errorlog if $timer > 3600000 call reconnect SetConst timer = 0 end if $time > 3600000 //every hour make a screenshot of your materials and exp bar call screenexp call screenmaterial call log Setconst sendgifts = 1 Setconst getgifts = 1 SetConst time = 0 SetConst train = 0 SetConst dock = 0 end end end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure dispatchtrains compute trigger = $trigger + 1 //set trigger timer compute run = $run + 1 MousePos 841, 413 // teamviewer sponsoring call click MousePos 1100, 650 call clickshort MousePos 1100, 650 call cc MousePos 1100, 639 call clickshort MousePos 1100, 639 call cc MousePos 1100, 630 call clickshort MousePos 1100, 630 call cc MousePos 1100, 619 call clickshort MousePos 1100, 619 call cc MousePos 1100, 605 call clickshort MousePos 1100, 605 call cc MousePos 1100, 590 call clickshort MousePos 1100, 590 call cc MousePos 1100, 580 call clickshort MousePos 1100, 580 call cc MousePos 1100, 570 call clickshort MousePos 1100, 570 call cc MousePos 1100, 550 call clickshort MousePos 1100, 550 call cc MousePos 1100, 530 call clickshort MousePos 1100, 530 call cc end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure flag //If deflag set, delete $deflag number if $delflag > 0 set main = 0 MousePos 71, 717 call click MousePos 807, 238 call click loop $delflag MousePos 387, 420 call click MousePos 734, 492 call click end else end end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure dock //If dock is avaiable go there and click on the trains compute dock = $dock + 1 delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 1250, 667 call clickshort MousePos 1250, 656 call clickshort MousePos 1250, 646 call clickshort MousePos 1250, 636 call clickshort MousePos 1250, 625 call clickshort MousePos 1250, 616 call clickshort MousePos 1250, 609 call clickshort MousePos 1250, 600 call clickshort MousePos 1250, 590 call clickshort MousePos 1250, 575 call clickshort MousePos 1250, 560 call clickshort MousePos 1250, 545 call clickshort MousePos 1250, 530 call clickshort MousePos 1250, 515 call clickshort MousePos 1250, 500 call clickshort MousePos 30, 715 call click delay 2 sec compute time = $time + 2000 compute timer = $timer + 2000 //Timestamp DOK load screen not found Red {RGBRed} Blue {RGBblue} Green {RGBGreen} end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure getcolor //checks if the train clicked from main is a "dispatchable train" if yes dispatch it delay 200 compute time = $time + 200 compute timer = $timer + 200 LoadRGB 339, 143 if {RGBGreen} = 247 compute train = $train + 1 CASE $send when 6 LoadRGB 978, 530 //trains with passengers send to 3 hours automatically if {RGBRed} = 85 MousePos 547, 419 else MousePos 969, 594 end when 10 LoadRGB 978, 530 //trains with passengers send to 3 hours automatically if {RGBRed} = 85 MousePos 758, 419 else MousePos 969, 594 end when 30 MousePos 969, 419 when 100 MousePos 547, 594 when 200 MousePos 758, 594 when 300 MousePos 969, 594 if $trigger > 2 FormatDateTime date = {now}, m/d/yy h-n //If train is dispatched bot it still active FileOpen File3, D:\train\a_active.txt FileAppend File3 FileWrite File3, $date $train FileClose File3 setconst trigger = 0 end else end call click else end end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure screenmaterial //Makes a screenshot of your material FormatDateTime date = {now}, m.d.yy h.n MousePos 1319, 70 call click SaveScreen D:\train\screens\material\$date .bmp MousePos 590, 641 call click end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure screenexp //Makes a screenshot of your exp bar FormatDateTime date = {now}, m.d.yy h.n MousePos 774, 76 delay 500 compute time = $time + 500 compute timer = $timer + 500 SaveScreen D:\train\screens\exp\$date .bmp delay 500 compute time = $time + 500 compute timer = $timer + 500 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure errorlog //Checks if there is any errors going on + handling them. LoadRGB 634, 350 FormatDateTime date = {now}, m/d/yy h:n case {RGBGreen} when 173 setconst reason = normal when 216 setconst reason = normal when 159 setconst reason = normal when 28 setconst reason = normal when 50 setconst reason = normal when 254 setconst reason = disconnect when 103 setconst reason = lvlup when 233 setconst reason = achievment else setconst reason = normal end if $reason = normal else FileOpen File2, D:\train\a_errorlog.txt //Logs any error FileAppend File2 FileWrite File2, $date $reason Red {RGBRed} Blue {RGBblue} Green {RGBGreen} FileClose File2 end if $reason = achievment if $achievshare = 0 MousePos 967, 204 //cancel achiev call click else MousePos 685, 585 //share achiev call click end end if $reason = disconnect call reconnect end if $reason = lvlup if $lvlshare = 0 MousePos 970, 192 // cancel lvl up Call click else MousePos 685, 585 // share lvl up call click end end end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure reconnect //Reconnects keys {esc} delay 2 sec compute time = $time + 2000 compute timer = $timer + 2000 MousePos 1363, 2 //chrome end call click delay 10 sec compute time = $time + 10000 compute timer = $timer + 10000 call connect end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure connect MousePos 77, 730 //chrome start call click delay 10 sec compute time = $time + 10000 compute timer = $timer + 10000 MousePos 320, 43 // select bar where you type hyperlink address Call Click keys http: keys {keypad /} keys {keypad /} keys portal.pixelfederation.com keys {keypad /} keys trainstation keys {keypad /} keys ?lang=SK keys {RETURN} delay 20 sec compute time = $time + 20000 compute timer = $timer + 20000 LoadRGB 648, 469 // if not logged, log in via facebook if {RGBblue} = 157 Mousepos 648, 469 call click delay 20 sec compute time = $time + 20000 compute timer = $timer + 20000 else end Mousepos 1357, 320 Dragto 1357,105 call setup delay 5 sec compute time = $time + 5000 compute timer = $timer + 5000 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure setup //Sets trainstation full screen and decide if there is 350gem (event) bar or not delay 5 sec compute time = $time + 5000 compute timer = $timer + 5000 LoadRGB 1266, 246 if {RGBblue} = 255 MousePos 1076, 468 call click else LoadRGB 1266, 277 if {RGBblue} = 255 MousePos 1076, 497 call click else 191 MousePos 1076, 528 call click end end delay 1 sec compute time = $time + 1000 compute timer = $timer + 1000 MousePos 780, 203 call click delay 2 sec compute time = $time + 2000 compute timer = $timer + 2000 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure checkIT MousePos 90,70 //choose train on left top call click delay 1000 compute time = $time + 1000 compute timer = $timer + 1000 MousePos 430, 210 Call click // change tab to IT trains delay 1000 compute time = $time + 1000 compute timer = $timer + 1000 LoadRGB 370, 325 if {RGBblue} = 140 // check if first it train is free delay 1000 compute time = $time + 1000 compute timer = $timer + 1000 call sendIT //if is then send else MousePos 465, 635 // if not, cancel call click delay 500 compute time = $time + 500 compute timer = $timer + 500 end end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure sendIT MousePos 841, 413 // teamviewer sponsoring call click MousePos 370, 325 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 371, 325 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 372, 325 Call click //select train delay 1000 compute time = $time + 1000 compute timer = $timer + 1000 MousePos 815, 635 Call click // send to friend delay 5000 compute time = $time + 5000 compute timer = $timer + 5000 MousePos 620, 350 Call click //custom tab delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 520, 375 Call click // choose first 8 friends from custom tab, and then send to them delay 500 compute time = $time + 500 compute timer = $timer + 500 Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 800, 635 Call click // confirm train delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 800, 585 Call click // confirm order / passenger or material Delay 500 compute time = $time + 500 compute timer = $timer + 500 Call checkIT end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure checkNeighbours LoadRGB 1289, 733 if {RGBblue} = 204 // check if MB bill have trains MousePos 1346, 745 //move to beggining of your friendlist call ClickShort call ClickShort call ClickShort call ClickShort call ClickShort call ClickShort call ClickShort call ClickShort call ClickShort call ClickShort call getTrains //check trains of your friends else end end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure getTrains LoadRGB 1289, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1289, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 1. neighbour LoadRGB 1226, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check či má sused voľné vlaky MousePos 1226, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 2. neighbour LoadRGB 1226, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1226, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 3. neighbour LoadRGB 1163, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1163, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 4. neighbour LoadRGB 1100, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1100, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 5. neighbour LoadRGB 1037, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1037, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 6. neighbour LoadRGB 974, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 974, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 7. neighbour LoadRGB 911, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 911, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 8. neighbour LoadRGB 848, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 848, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 9. neighbour LoadRGB 785, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 785, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 10. neighbour LoadRGB 722, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 722, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 11. neighbour LoadRGB 659, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 659, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 12. neighbour LoadRGB 596, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 596, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 13. neighbour LoadRGB 533, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 533, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 14. neighbour LoadRGB 470, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 470, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 15. neighbour LoadRGB 407, 733 if {RGBblue} = 91 MousePos 30, 725 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 407, 733 Call Click delay 30000 compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end MousePos 380, 713 //posuň sa o stranu naspať Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 Call GetTrains end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure NeighbourTrainClick //clicks on your neighbour trains MousePos 684, 545 // abbandoned station Call Click Mousepos 1240, 670 Call ClickShort Mousepos 1240, 670 Call ClickShort Mousepos 1240, 650 Call ClickShort Mousepos 1240, 630 Call ClickShort Mousepos 1240, 610 Call ClickShort Mousepos 1240, 590 Call ClickShort Mousepos 1240, 570 Call ClickShort Mousepos 1240, 550 Call ClickShort Mousepos 1240, 530 Call ClickShort Mousepos 1240, 510 Call ClickShort Mousepos 1240, 490 Call ClickShort Mousepos 1240, 470 Call ClickShort Mousepos 1240, 450 Call ClickShort Mousepos 1240, 430 Call ClickShort Mousepos 1240, 410 Call ClickShort Mousepos 1240, 390 Call ClickShort Mousepos 1240, 370 Call ClickShort end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure GetGifts MousePos 70, 730 //open gift tab Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 480, 175 //Collect gifts tab Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 410, 210 //collect all Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 1055, 110 // Close gift box Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 Setconst getgifts = 0 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- Procedure SendGifts MousePos 70, 730 //open gift tab Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 860, 175 // Send gifts Tab Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 CASE $gift when 1 MousePos 415, 245 Call click when 2 MousePos 593, 245 Call click when 3 MousePos 771, 245 Call click when 4 MousePos 949, 245 Call click end Mousepos 658, 418 //golden star friends Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 Mousepos 410, 625 // select all Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 Mousepos 850, 625 //send gifts Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 Mousepos 1055, 110 //close giftbox Call click SetConst sendgifts = 0 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure log //Keeps track on every train u dispatch, + amount of times it went to docks FormatDateTime date = {now}, m/d/yy h:n FileOpen File1, D:\train\a_trainlog.txt FileAppend File1 FileWrite File1, $date - train: $train - dock: $dock - run: $run FileClose File1 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure cc call click call getcolor end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure click leftclick delay 400 compute time = $time + 400 compute timer = $timer + 400 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure ClickShort leftclick delay 100 compute time = $time + 100 compute timer = $timer + 100 end

Thanks

1 User

11/11/2014, 09:54	#36
Tenebrae00 elite*gold: 0 The Black Market: 0/0/0 Join Date: Oct 2014 Posts: 4 Received Thanks: 3	NEW BOT UPDATE ! version 2.1 with full hd support and many more, see changelist to get new info Spoiler (* Trainstation bot by flum (modified by Tenebrae and Nukli) flum contact info: Have problems or questions feel free to contact me on teamspeak 3 Address: flum.aionallstars.com:11807 I believe that flum is not working on this trainstation bot anymore so i changed it a little bit and started to develop it after him. to contact me use my Email address: -Functions Send your trains out every 6/10/30/1h/2h/3h minutes + goes to docking to click on the trains. Keeps tracks of errors, able to reconnect if ur internet connection restarts. Makes screenshots of ur materials + exp bar. Collect trains from your neighbours Send IT trains to your friends Collect gifts from your friends Send gifts to your friends (MUST BE CONFIGURED TO WORK PROPERRLY) Send IT trains to your friends Send gifts to your friends -Requirements Screen resolution 1920 * 1080 (FULL HD !) Chrome or Firefox. The 1 click passenger and cargo upgrade for ur station. Basic knowledge about AC tool scripting Windows basic (win98 theme) not aero or aero similar theme ! Your browser pinned as first aplication on your windows bar (it should open as a fullscreen) your initial setup should looks like this : On your C disk create three folders C:\train\material and C:\train\exp -Run notes Start the script first, then within 5 sec open trainstation fullscreen. << Changelog >> 0.2 send trains every 10 min 0.3 minor bug fixes 0.6 send int function added 0.7 click dockin station implemented 0.8 color check implemented for better check 0.9 changed mouse cord. for int trains 1.0 code clean up 1.1 error logger 1.2 train send tracker 1.3 screenshot material/exp 1.4 reconnecter 1.4.1 Minor fix issue for Chrome (by Nukli) -Adjusting setup for The Train Station portal page -Changes clicks for new achievements -Added small pause after starting macro -Different pathe for exported files 1.4.2 minor fix on reconnect (By Tenebrae) updated position of trains on mainscreen restart chrome every 5 hours to fix lag 1.4.3 added automatical support for 350gem event bar(By Tenebrae) 1.4.4 passengers set to 3 hours (By Tenebrae) 1.5 added script for IT trains (By Tenebrae) 1.6 added neighbour check trains (By Tenebrae) 1.7 added gift send / recieve (By Tenebrae) 1.8 modified connect procedure, now automatically setup your browser 1.9 code clean up, still testin phase, modified some of scripts (main), now should be working with any theme 1.9.1 logs modified 2.0 bot resolution changed to full hd (hd ready not more supported, use older version for hd ready resolution) 2.1 redesigned check it function, now it doesnt care how many it trains u have, it will send all -Config notes If you want to use IT trains you have to set up you friends in custom tab this bot will send it trains only to your friends on !!!CUSTOM!!! tab ! For GIFTS bot will send gifts only to your friends under !!!GOLDEN STAR!!! for working trainstation bot propperly you need to have your browser pinned on your taskbar like this it means double start bar, with first pinned aplication your browser *) constants // change to set up your train bot send = 30 // sending local trains \|6=6min\|10=10min\|30=30min\|100=1hod\|200=2hod\|300=3h od\| others not scripted yet it = 1 // set to 0 if u dont want to send IT trains achievshare = 1 // set to 0 if u dont want to share achiev lvlshare = 1 // set to 0 if u dont want to share lvl up neighbours = 1 // set to 0 if u dont want recieve trains gifts from neighbours setupgetgifts = 1 // set to 0 if u dont want to recieve gifts automatically setupsendgifts = 1 // set to 0 if u dont want to send gifts automatically gift = 3 // whitch gift u want send? 1/2/3/4 ? first is left //--------------------------------------------------------------------------------------------------------------------------------------------------------- // ----------------------------------------------------DO NOT CHANGE ANYTHING BELOW THIS LINE-------------------------------------------------------------- //--------------------------------------------------------------------------------------------------------------------------------------------------------- sendgifts = 1 getgifts = 1 train = 0 run = 0 dock = 0 date = 0 time = 0 timer = 0 reason = 0 trigger = 0 dockcolor = 0 loadeddockcolor = 0 ittrainsent = 0 main = 1 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- constructs File1=File File2=File File3=File end //--------------------------------------------------------------------------------------------------------------------------------------------------------- delay 3 sec call connect call main //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure main //Clicks on all the trains on the main screen while $main = 1 if $neighbours = 1 call CheckNeighbours // check your neighbours for trains else end if $setupgetgifts = 1 if $getgifts = 1 call GetGifts // collect gifts else end else end if $setupsendgifts = 1 if $sendgifts = 1 call SendGifts // send gifts to your friends else end else end if $it = 1 call preCheckIT else end call dispatchtrains //MousePos 212, 69 MousePos 212, 69 Call click delay 2 sec compute time = $time + 3000 compute timer = $timer + 3000 LoadRGB 30, 1027 If {RGBred} = 99 Call dock else end delay 1 sec compute time = $time + 1000 compute timer = $timer + 1000 call errorlog if $timer > 3600000 call reconnect SetConst timer = 0 end if $time > 3600000 //every hour make a screenshot of your materials and exp bar call screenexp call screenmaterial call log Setconst sendgifts = 1 Setconst getgifts = 1 SetConst time = 0 SetConst train = 0 SetConst dock = 0 SetConst ittrainsent = 0 end end end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure dispatchtrains compute trigger = $trigger + 1 //set trigger timer // ?? MousePos 841, 413 // teamviewer sponsoring // call click MousePos 1715, 980 call clickshort MousePos 1715, 980 call cc MousePos 1715, 960 call clickshort MousePos 1715, 960 call cc MousePos 1715, 940 call clickshort MousePos 1715, 940 call cc MousePos 1715, 920 call clickshort MousePos 1715, 920 call cc MousePos 1715, 900 call clickshort MousePos 1715, 900 call cc MousePos 1715, 880 call clickshort MousePos 1715, 880 call cc MousePos 1715, 860 call clickshort MousePos 1715, 860 call cc MousePos 1715, 840 call clickshort MousePos 1715, 840 call cc MousePos 1715, 820 call clickshort MousePos 1715, 820 call cc MousePos 1715, 800 call clickshort MousePos 1715, 800 call cc MousePos 1715, 780 call clickshort MousePos 1715, 780 call cc MousePos 1715, 760 call clickshort MousePos 1715, 760 call cc MousePos 1715, 740 call clickshort MousePos 1715, 740 call cc end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure dock //If dock is avaiable go there and click on the trains compute dock = $dock + 1 delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 1835, 975 call clickshort MousePos 1835, 960 call clickshort MousePos 1835, 945 call clickshort MousePos 1835, 930 call clickshort MousePos 1835, 915 call clickshort MousePos 1835, 900 call clickshort MousePos 1835, 885 call clickshort MousePos 1835, 870 call clickshort MousePos 1835, 855 call clickshort MousePos 1835, 840 call clickshort MousePos 1835, 825 call clickshort MousePos 1835, 810 call clickshort MousePos 30, 1027 call click delay 2 sec compute time = $time + 2000 compute timer = $timer + 2000 //Timestamp DOK load screen not found Red {RGBRed} Blue {RGBblue} Green {RGBGreen} end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure getcolor //checks if the train clicked from main is a "dispatchable train" if yes dispatch it delay 200 compute time = $time + 200 compute timer = $timer + 200 LoadRGB 615, 300 if {RGBGreen} = 247 compute train = $train + 1 CASE $send when 6 MousePos 820, 575 when 10 MousePos 1040, 575 when 30 MousePos 1260, 575 when 100 MousePos 820, 740 when 200 MousePos 1040, 740 when 300 MousePos 1260, 740 if $trigger > 2 FormatDateTime date = {now}, m/d/yy h-n //If train is dispatched bot it still active FileOpen File3, C:\train\a_active.txt FileAppend File3 FileWrite File3, $date - train: - $train FileClose File3 setconst trigger = 0 end else end call click else end end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure screenmaterial //Makes a screenshot of your material FormatDateTime date = {now}, m.d.yy h.n MousePos 1873, 70 call click SaveScreen C:\train\screens\material\$date .bmp MousePos 960, 790 call click end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure screenexp //Makes a screenshot of your exp bar FormatDateTime date = {now}, m.d.yy h.n MousePos 1040, 76 delay 500 compute time = $time + 500 compute timer = $timer + 500 SaveScreen C:\train\screens\exp\$date .bmp delay 500 compute time = $time + 500 compute timer = $timer + 500 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure errorlog //Checks if there is any errors going on + handling them. LoadRGB 911, 506 FormatDateTime date = {now}, m/d/yy h:n case {RGBGreen} when 254 setconst reason = disconnect when 103 setconst reason = lvlup when 233 setconst reason = achievment else setconst reason = normal end if $reason = normal else FileOpen File2, C:\train\a_errorlog.txt //Logs any error FileAppend File2 FileWrite File2, $date $reason Red {RGBRed} Blue {RGBblue} Green {RGBGreen} FileClose File2 end if $reason = achievment if $achievshare = 0 MousePos 1244, 360 //cancel achiev call click else MousePos 960, 730 //share achiev call click end end if $reason = disconnect call reconnect end if $reason = lvlup if $lvlshare = 0 MousePos 1247, 348 // cancel lvl up Call click else MousePos 960, 740 // share lvl up call click end end end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure reconnect //Reconnects keys {esc} delay 2 sec compute time = $time + 2000 compute timer = $timer + 2000 MousePos 1917, 2 //chrome end call click delay 10 sec compute time = $time + 10000 compute timer = $timer + 10000 call connect end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure connect MousePos 80, 1044 //chrome start call click delay 10 sec compute time = $time + 10000 compute timer = $timer + 10000 MousePos 250, 43 // select bar where you type hyperlink address Call Click keys http: keys {keypad /} keys {keypad /} keys portal.pixelfederation.com keys {keypad /} keys trainstation keys {keypad /} keys ?lang=SK keys {RETURN} delay 20 sec compute time = $time + 20000 compute timer = $timer + 20000 LoadRGB 925, 506 // if not logged, log in via facebook if {RGBblue} = 157 Mousepos 925, 506 call click delay 20 sec compute time = $time + 20000 compute timer = $timer + 20000 else end Mousepos 1912, 94 call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call clickshort call setup delay 5 sec compute time = $time + 5000 compute timer = $timer + 5000 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure setup //Sets trainstation full screen and decide if there is 350gem (event) bar or not delay 5 sec compute time = $time + 5000 compute timer = $timer + 5000 LoadRGB 1820, 246 if {RGBblue} = 255 MousePos 1632, 465 // 1 bar call click else LoadRGB 1820, 277 if {RGBblue} = 255 MousePos 1632, 496 // 2 bary call click else 191 MousePos 1632, 527 // 3 bary call click end end delay 2 sec compute time = $time + 2000 compute timer = $timer + 2000 MousePos 1055, 230 // potvrdiť fullscreen call click delay 2 sec compute time = $time + 2000 compute timer = $timer + 2000 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure precheckIT MousePos 90,70 //choose train on left top call click delay 1000 compute time = $time + 1000 compute timer = $timer + 1000 MousePos 710, 365 Call click // change tab to IT trains delay 1000 compute time = $time + 1000 compute timer = $timer + 1000 MousePos 1300, 422 DragTo 1300, 755 call checkIT end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure checkIT LoadRGB 640, 730 if {RGBblue} = 140 // check if first it train is free MousePos 640, 730 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 730 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 720 if {RGBblue} = 140 // check if first it train is free MousePos 640, 720 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 720 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 710 if {RGBblue} = 140 // check if first it train is free MousePos 640, 710 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 710 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 700 if {RGBblue} = 140 // check if first it train is free MousePos 640, 700 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 700 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 690 if {RGBblue} = 140 // check if first it train is free MousePos 640, 690 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 690 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 680 if {RGBblue} = 140 // check if first it train is free MousePos 640, 680 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 680 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 670 if {RGBblue} = 140 // check if first it train is free MousePos 640, 670 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 670 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 660 if {RGBblue} = 140 // check if first it train is free MousePos 640, 660 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 660 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 650 if {RGBblue} = 140 // check if first it train is free MousePos 640, 650 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 650 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 640 if {RGBblue} = 140 // check if first it train is free MousePos 640, 640 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 640 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 630 if {RGBblue} = 140 // check if first it train is free MousePos 640, 630 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 630 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 620 if {RGBblue} = 140 // check if first it train is free MousePos 640, 620 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 620 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 610 if {RGBblue} = 140 // check if first it train is free MousePos 640, 610 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 610 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 600 if {RGBblue} = 140 // check if first it train is free MousePos 640, 600 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 600 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 590 if {RGBblue} = 140 // check if first it train is free MousePos 640, 590 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 590 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 580 if {RGBblue} = 140 // check if first it train is free MousePos 640, 580 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 580 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 570 if {RGBblue} = 140 // check if first it train is free MousePos 640, 570 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 570 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 560 if {RGBblue} = 140 // check if first it train is free MousePos 640, 560 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 560 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 550 if {RGBblue} = 140 // check if first it train is free MousePos 640, 550 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 550 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 540 if {RGBblue} = 140 // check if first it train is free MousePos 640, 540 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 540 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 530 if {RGBblue} = 140 // check if first it train is free MousePos 640, 530 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 530 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 520 if {RGBblue} = 140 // check if first it train is free MousePos 640, 520 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 520 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 510 if {RGBblue} = 140 // check if first it train is free MousePos 640, 510 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 510 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 500 if {RGBblue} = 140 // check if first it train is free MousePos 640, 500 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 500 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 490 if {RGBblue} = 140 // check if first it train is free MousePos 640, 490 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 490 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 480 if {RGBblue} = 140 // check if first it train is free MousePos 640, 480 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 480 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 470 if {RGBblue} = 140 // check if first it train is free MousePos 640, 470 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 470 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 460 if {RGBblue} = 140 // check if first it train is free MousePos 640, 460 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 460 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 450 if {RGBblue} = 140 // check if first it train is free MousePos 640, 450 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 450 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 440 if {RGBblue} = 140 // check if first it train is free MousePos 640, 440 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 440 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 430 if {RGBblue} = 140 // check if first it train is free MousePos 640, 430 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 430 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 420 if {RGBblue} = 140 // check if first it train is free MousePos 640, 420 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 420 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 410 if {RGBblue} = 140 // check if first it train is free MousePos 640, 410 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 410 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 640, 400 if {RGBblue} = 140 // check if first it train is free MousePos 640, 400 delay 100 compute time = $time + 100 compute timer = $timer + 100 MousePos 641, 400 delay 100 compute time = $time + 100 compute timer = $timer + 100 Call click call sendIT //if is then send else end LoadRGB 1300, 422 if {RGBred} = 244 // if ball on scroll bar is totally up MousePos 670, 788 // cancel call click delay 500 compute time = $time + 500 compute timer = $timer + 500 else MousePos 1300, 400 Call clickshort Call clickshort Call clickshort Call clickshort Call clickshort Call clickshort Call clickshort Call clickshort call CheckIT end end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure sendIT // MousePos 841, 413 // teamviewer sponsoring // call click MousePos 1165, 790 Call click // send to friend delay 5000 compute time = $time + 5000 compute timer = $timer + 5000 MousePos 900, 505 Call click //custom tab delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 810, 532 Call click // choose first 8 friends from custom tab, and then send to them Call click Call click Call click Call click Call click Call click Call click MousePos 1145, 785 Call click // confirm train delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 1070, 745 Call click // confirm order / passenger or material Delay 500 compute time = $time + 500 compute timer = $timer + 500 compute ittrainsent = $ittrainsent + 1 Call precheckIT end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure checkNeighbours LoadRGB 1843, 1045 if {RGBblue} = 204 // check if MB bill have trains MousePos 1900, 1057 //move to beggining of your friendlist call ClickShort call ClickShort call ClickShort call ClickShort call ClickShort call ClickShort call ClickShort call ClickShort call ClickShort call ClickShort call getTrains //check trains of your friends else end end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure getTrains LoadRGB 1843, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1843, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 1. neighbour LoadRGB 1780, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1780, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 2. neighbour LoadRGB 1717, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1717, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 3. neighbour LoadRGB 1654, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1654, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 4. neighbour LoadRGB 1591, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1591, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 5. neighbour LoadRGB 1528, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1528, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 6. neighbour LoadRGB 1465, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1465, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 7. neighbour LoadRGB 1402, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1402, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 8. neighbour LoadRGB 1339, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1339, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 9. neighbour LoadRGB 1276, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1276, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 10. neighbour LoadRGB 1213, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1213, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 11. neighbour LoadRGB 1150, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1150, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 12. neighbour LoadRGB 1150, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1150, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 13. neighbour LoadRGB 1087, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1087, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 14. neighbour LoadRGB 1024, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 1024, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 15. neighbour LoadRGB 961, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 961, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 16. neighbour LoadRGB 898, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 898, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 17. neighbour LoadRGB 835, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 835, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 18. neighbour LoadRGB 772, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 772, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 19. neighbour LoadRGB 709, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 709, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 20. neighbour LoadRGB 646, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 646, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 21. neighbour LoadRGB 583, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 583, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 22. neighbour LoadRGB 520, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 520, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 23. neighbour LoadRGB 457, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 457, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end //-------------------------------------- check 24. neighbour LoadRGB 394, 1045 if {RGBblue} = 91 MousePos 30, 1040 Call click Call main else if {RGBblue} = 204 // check if neighbour has free trains MousePos 394, 1045 Call Click delay 30 sec compute time = $time + 30000 compute timer = $timer + 30000 call NeighbourTrainClick else end end MousePos 365, 1025 //posuň sa o stranu naspať Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 Call GetTrains end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure NeighbourTrainClick //clicks on your neighbour trains //MousePos 684, 545 // abbandoned station //Call Click Mousepos 1800, 990 Call ClickShort Mousepos 1800, 980 Call ClickShort Mousepos 1800, 970 Call ClickShort Mousepos 1800, 960 Call ClickShort Mousepos 1800, 950 Call ClickShort Mousepos 1800, 940 Call ClickShort Mousepos 1800, 930 Call ClickShort Mousepos 1800, 920 Call ClickShort Mousepos 1800, 910 Call ClickShort Mousepos 1800, 900 Call ClickShort Mousepos 1800, 890 Call ClickShort Mousepos 1800, 880 Call ClickShort Mousepos 1800, 870 Call ClickShort Mousepos 1800, 860 Call ClickShort Mousepos 1800, 850 Call ClickShort Mousepos 1800, 840 Call ClickShort Mousepos 1800, 830 Call ClickShort Mousepos 1800, 820 Call ClickShort Mousepos 1800, 810 Call ClickShort Mousepos 1800, 800 Call ClickShort Mousepos 1800, 790 Call ClickShort Mousepos 1800, 780 Call ClickShort Mousepos 1800, 770 Call ClickShort Mousepos 1800, 760 Call ClickShort Mousepos 1800, 750 Call ClickShort Mousepos 1800, 740 Call ClickShort Mousepos 1800, 730 Call ClickShort Mousepos 1800, 720 Call ClickShort Mousepos 1800, 710 Call ClickShort Mousepos 1800, 700 Call ClickShort Mousepos 1800, 690 Call ClickShort end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure GetGifts MousePos 70, 1040 //open gift tab Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 800, 330 //Collect gifts tab Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 700, 370 //collect all Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 1332, 265 // Close gift box Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 Setconst getgifts = 0 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- Procedure SendGifts MousePos 70, 1040 //open gift tab Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 MousePos 1140, 330 // Send gifts Tab Call Click delay 500 compute time = $time + 500 compute timer = $timer + 500 CASE $gift when 1 MousePos 695, 410 Call click when 2 MousePos 873, 410 Call click when 3 MousePos 1051, 410 Call click when 4 MousePos 1229, 410 Call click end Mousepos 935, 575 //golden star friends Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 Mousepos 690, 780 // select all Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 Mousepos 1135, 780 //send gifts Call click delay 500 compute time = $time + 500 compute timer = $timer + 500 Mousepos 1332, 265 //close giftbox Call click SetConst sendgifts = 0 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure log //Keeps track on every train u dispatch, + amount of times it went to docks FormatDateTime date = {now}, m/d/yy h:n FileOpen File1, C:\train\a_trainlog.txt FileAppend File1 FileWrite File1, $date - train:$train - ITtrain:$ittrainsent FileClose File1 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure cc call click call getcolor end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure click leftclick delay 400 compute time = $time + 400 compute timer = $timer + 400 end //--------------------------------------------------------------------------------------------------------------------------------------------------------- procedure ClickShort leftclick delay 100 compute time = $time + 100 compute timer = $timer + 100 end

Thanks

1 User

11/12/2014, 20:33	#37
grrantry elite*gold: 0 The Black Market: 0/0/0 Join Date: Jul 2009 Posts: 27 Received Thanks: 1	hey how can I get this to work with 1680*1050??

11/14/2014, 03:54

#38

Tenebrae00

elite*gold: 0

The Black Market: 0/0/0

Join Date: Oct 2014

Posts: 4

Received Thanks: 3

Quote:

Originally Posted by grrantry

hey how can I get this to work with 1680*1050??

its very complicated to make it for all resolutions, i recommend you to change your resolution to 1366*768 for the time you use your bot

Thanks

1 User

11/26/2014, 10:26	#39
ibogdandxz elite*gold: 0 The Black Market: 0/0/0 Join Date: Nov 2014 Posts: 1 Received Thanks: 0	I`m using the 1366 768 only for sending trains at 30mins , all others are set to 0 and I get an error every hour regarding the screenshot. How can I simplify this to not have screenshots taken and stuff ? Also bot does not close the achievment window. Did they change the window with the new update ? An update on the bot would be nice tnx

11/26/2014, 15:47	#40
Tenebrae00 elite*gold: 0 The Black Market: 0/0/0 Join Date: Oct 2014 Posts: 4 Received Thanks: 3	Since approximately week ago, im not working on ACtool bot anymore, now new part of my project is to make bot with graphical user interface. Stay tuned for more info here on this topic ! Now it is in beta testing i will relase it maybe in week from now (when i catch all of bugs included) STAY TUNED FOR MORE INFORMATION !

11/04/2015, 16:12	#41
Darkdesire71 elite*gold: 0 The Black Market: 0/0/0 Join Date: Nov 2015 Posts: 1 Received Thanks: 0	so... not really a ts bot, just an edited mouse clicker, pathetic

12/21/2015, 00:18	#42
arnesson elite*gold: 0 The Black Market: 0/0/0 Join Date: Apr 2011 Posts: 1 Received Thanks: 0	Mouse positions does not work Hi, I tested your script with the specified resolution. Unfortunately, the mouse does not hit the buttons. I have it in 1920x1080. Again, it does not. Thx Arne