Regency Posted May 22, 2008 Share Posted May 22, 2008 Right now my script puts numbers in a log file and i need them orginized by the numbers.. like all 1 with each other, and so on.. any possible way to do this? or atleast make it put a tally of numbers like 1- 6 23- 14 the number is first and amount of times it comes up... any idea? Link to comment Share on other sites More sharing options...
Valuater Posted May 22, 2008 Share Posted May 22, 2008 Show a log file so we can see how to manipulate it... Maybe better to show us the actual code. 8) Link to comment Share on other sites More sharing options...
Regency Posted May 22, 2008 Author Share Posted May 22, 2008 This is the scriot that gets the data.. expandcollapse popup#requireadmin #AutoIt3Wrapper_run_debug_mode=Y #include <GUIConstants.au3> #include <Constants.au3> #include <IE.au3> #include <Misc.au3> #include <Date.au3> #include "script\roulette log.au3" ;Opt("MustDeclareVars", 1); having this option set will help find mistakes before you run it. Such as using a variable before setting its value or misspelling a variable Opt("TrayOnEventMode", 1) Opt("TrayAutoPause", 0) Opt("PixelCoordMode", 1) TraySetOnEvent($TRAY_EVENT_PRIMARYDOWN, "_MinimizeToTray") Global $Crimes = '' Global $Gta = '' Global $name1 = '' Global $pass1 = '' Global $url1 = '' Global $Paused = 0 Global $oLoginPage = '' Global $Quick = GUICreate("Auto Scripter - By - ScorpiA", 290, 200, 340, 300) Global $StartUrl = GUICtrlCreateGroup("Address your acct is logged into:", 8, 8, 256, 49) ; You can use proxys if you like, it just needs to get you to The mafia network Global $address = GUICtrlCreateInput("", 16, 24, 145, 21) Global $saveurl = GUICtrlCreateButton("Save", 168, 24, 75, 25, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) Global $log = GUICtrlCreateLabel("", 8, 384, 250, 17) ; The url you posted above Global $Url = GUICtrlCreateLabel("", 8, 384, 250, 17) ; The url you posted above Global $Make = GUICtrlCreateButton("Start Auto Scripter By ScorpiA - Hit ESC to Exit", 8, 168, 267, 25, 0) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $GUI_EVENT_MINIMIZE _MinimizeToTray() Case $saveurl $url1 = GUICtrlRead($address) & "/Authenticated/roulette.aspx" GUICtrlSetData($Url, $url1) Case $address $Cr1 = GUICtrlRead($address) & "/Authenticated/publicforum.aspx" GUICtrlSetData($Url, $Cr1) $Log1 = GUICtrlRead($address) & "/login.aspx" GUICtrlSetData($Url, $Log1) Case $Make MyRun() EndSwitch WEnd Func MyRun() HotKeySet("{Home}", "TogglePause") HotKeySet("{ESC}", "Terminate") $oLoginPage = _IECreate($Log1, 0, 1, 1, 0) _IELoadWait($oLoginPage) Local $begin = '' Local $dif = 0 While 2 Sleep(10) $dif = Int(TimerDiff($begin) / 100) If $dif >= (1 * 60) Then MyFunction2() $begin = TimerInit() EndIf WEnd EndFunc ;==>MyRun Func MyFunction2() _IENavigate($oLoginPage, $cr1,1) _IELoadWait($oLoginPage) $oUser = _IEGetObjByName($oLoginPage, "Login1$UserName") _IEFormElementSetValue($oUser, "HEREERERERE") $oPass = _IEGetObjByName($oLoginPage, "Login1$Password") _IEFormElementSetValue($oPass, "DSDSG") $oLogIn = _IEGetObjByName($oLoginPage, "Login1$LoginLinkButton") _IEAction($oLogIn, "click") _IELoadWait($oLoginPage) _IENavigate($oLoginPage, $url1, 1) _IELoadWait($oLoginPage) $oinsert = _IEGetObjById($oLoginPage, "ctl00_MainPageContent_txt1st12") _IEFormElementSetValue($oinsert, "1000") $ospin = _IEGetObjById($oLoginPage, "ctl00_MainPageContent_btnSpin") _IEAction($ospin, "click") _IELoadWait($oLoginPage) $oDiv = _IEGetObjById($oLoginPage, "ctl00_MainPageContent_lblWinNumber") ConsoleWrite(_IEPropertyGet($oDiv, "innertext") & @CR) $variable = _IEPropertyGet($oDiv, "innertext") If $variable > 0 Then Roulette() ElseIf $variable = 0 Then Roulette() EndIf EndFunc ;==>MyFunction2 Func TogglePause() $Paused = Not $Paused While $Paused Sleep(100) ToolTip('Script is "Paused"', 0, 0) WEnd ToolTip("") EndFunc ;==>TogglePause Func Terminate() Exit EndFunc ;==>Terminate Func _MinimizeToTray() If BitAND(WinGetState($Quick), 2) Then GUISetState(@SW_HIDE) Else GUISetState(@SW_SHOW) EndIf EndfuncoÝ÷ Ù©ÝêÞËazZ x,r¸©µ«¢+Ø¥¹±Õ±Ðí¥±¹ÔÌÐì((ÀÌØí Õ±±Ñ}1½ôMÉ¥ÁѥȵÀìÅÕ½ÐìÀäÈíI½Õ±ÑÑ}1½¹ÑáÐÅÕ½Ðì()Õ¹I½Õ±ÑÑ}1½}]É¥Ñ ÀÌØí¥±9µ°ÀÌØí1¥¹¤($ÀÌØí¥±ô¥±=Á¸ ÀÌØí¥±9µ°ä¤(%% ÀÌØí¥±ôô´Ä¤Q¡¸IÑÕɸÀ(%¥±]É¥Ñ1¥¹ ÀÌØí¥±°ÅÕ½ÐìÅÕ½ÐìµÀìÀÌØí1¥¹¤(%¥± ±½Í ÀÌØí¥±¤(%IÑÕɸÄ)¹Õ¹((ÀÌØíÙÉ¥±ôÅÕ½ÐìÅÕ½Ðì()Õ¹I½Õ±ÑÑ ¤(%I½Õ±ÑÑ}1½}]É¥Ñ ÀÌØí Õ±±Ñ}1½°ÀÌØíÙÉ¥±¤)¹Õ¹ and this is what the log looks like expandcollapse popup22 22 15 3 32 0 33 4 9 35 20 28 0 0 26 12 23 14 27 29 27 0 20 2 32 10 8 34 21 28 13 6 33 11 21 22 16 20 19 18 14 28 36 6 3 0 8 19 7 21 7 11 19 5 20 1 17 25 19 10 28 4 2 22 4 36 32 6 29 10 0 0 Link to comment Share on other sites More sharing options...
Regency Posted May 24, 2008 Author Share Posted May 24, 2008 bump Link to comment Share on other sites More sharing options...
ProgAndy Posted May 24, 2008 Share Posted May 24, 2008 I would use _FileReadToArray, _ArrayAdd, _ArraySort, _FileWriteFromArray With ArraySort, you have to look, if it can sort numeric, or you have to rewrite it *GERMAN* [note: you are not allowed to remove author / modified info from my UDFs]My UDFs:[_SetImageBinaryToCtrl] [_TaskDialog] [AutoItObject] [Animated GIF (GDI+)] [ClipPut for Image] [FreeImage] [GDI32 UDFs] [GDIPlus Progressbar] [Hotkey-Selector] [Multiline Inputbox] [MySQL without ODBC] [RichEdit UDFs] [SpeechAPI Example] [WinHTTP]UDFs included in AutoIt: FTP_Ex (as FTPEx), _WinAPI_SetLayeredWindowAttributes Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now