AlecSadler

Updated to version 0.0.8.2 Changes: ->Added ability to generate/use 32 OR 64 bit keys. Note: 32 bit keys are much less secure than 64 bit keys, but may be used on older systems which don't support 64 bit software. Note: 64 bit keys may be used with either version of SIM. If you don't have enough RAM to use 64 bit keys, you should fall back to using 32 bit keys.

Over 1,000 views and not a single reply yet?!?!

Updated to version 0.0.8.0Changes:->KeyFile Blueprints (for DARTIS) are now 1,416,752,005 bits (168 MB)->SIM/DARTIS Now requires an x64 OS to run.->Highmem library used to allocate additional memory->ReduceMem function intregrated from winswap(to reduce RAM use) (you can try running on a 32 bit machine by commenting out the high-mem function that allocates memory and compiling for 32 bit windows, but this is not guaranteed to work) Updated to version 0.0.8.1 Changes: ->Includes 32 bit source and binary. (use at your own risk, it may crash when loading keyfile blueprints) ->Better memory management when loading contacts from server.

winsettrans() worked for me in this case, thanks anyways!

Hello I am looking for a way to make a GUI transparent but not the controls on it. Does anyone have some advice on how to do this? I found some info pointing to using _WinAPI_UpdateLayeredWindow() but there is no example code in the help file on how to use it. Func loading() Global $hGUI = GUICreate("", 500, 500, -1, -1, $WS_POPUP + $WS_EX_LAYERED) GUISetBkColor("0xFFFFFF") Global $hGIF = GUICtrlCreatePic("", 50, 50, 400, 400) _GUICtrlSetGIF($hGIF, $loading_image, Default, 1) GUICtrlCreateLabel("Loading.... Please Wait...", 85, 450, 400, 100) GUICtrlSetFont(-1, 24) GUISetState() EndFunc ;==>loading

Okay this code is working as I need it to, no changes needed!

I hope I'm not gravedigging when I ask this, but is there a way to re-direct the frame to a new url after the previous one has loaded? Also would there be a way to scroll the window all the way to the bottom. I am working on an IM program and am thinking about trying to use google chrome to display the formatted text instead of IE.

Found my answer here

Thanks! However the example shows only how to create a bitmap onto a whole window, how do I go about creating a graphic from an image control?

Hello all, I am looking for a way to set an image control with the raw binary of the image instead of having to use a saved file. Any advice on this?

I got it figured out. Am using the following pattern "(?i)<div(.*?)</div>(.*?)</div>"

Hello all I am still working on my instant messenger project and I have came across a nasty bug. When too many messages are placed in a conversation it slows my program way down, so I'm trying to trim old messages off the conversation text. I am trying to do this with regular expressions, however I'm having no luck so far. Here is what I'm trying (want to replace everything except "Some text to keep" with a blank string "" $msg = "<div style='float: left;width: 90%;border: 3px solid #11AAFF;padding: 10px;text-align:left;margin-bottom:10px;' > STORM: Hello World<br/></div><div style='float: left;margin-top:-8px;margin-bottom:5px;width:100%;font-size: 8px;'>2017-16-07 21:08:21</div>" $msg &= "Some text to keep" $msg = StringRegExpReplace($msg, '<div([^%]*?)<br\/><\/div><div([^%]*?)<\/div>', "", 1) ConsoleWrite($msg&@CRLF)

Update: ->Added an error handler/bug reporter.->Message delivery is now less buggy->Added some new emoticons->Other minor miscelaious bug fixes ->Message polling now occurs every 42 MS ->Can now receive bulk amounts of messages and process them accordingly ->Message frame now refreshes on resize of window ->Message frame now scrolls to the bottom when a user is selected (even if there are a lot of messages) ->Limited message buffer to 300 messages per conversation->Limited message sending to 1 message per second(to prevent spam)->Put toast into a seperate thread to avoid main thread from pausing

Thanks, this works perfect for links that are followed by a white-space, but what about raw links sent without any white spaces behind them? How to go about detecting a link when not followed by a space? (how do I detect the end of the link when there's nothing following it)

Hello, as the title said I'm trying to capture the error output of an autoit script that has been compiled. However I don't seem to be able to capture the error stream. Here is my simple code below, please advise what I'm doing wrong $sErrorMsg = '' $iPID = Run(@ScriptFullPath & ' MAIN', @ScriptDir, 0, 6) While 1 $sErrorMsg &= StdoutRead($iPID) If @error Then ExitLoop Sleep(1) WEnd (main executes the main loop) everything works except for capturing the error of the launched process.

I don't know how I would go about doing this, I need to take an existing string and put it into an anchor link. Could you please show an example?

Hello friends! I am rather new to using regular expressions. So please mind my noob question. I have an instant messenger and I use in it an embeded IE control to display messages. How would I go about detecting links (http and https) and turn them into anchors <a href="https://someurl.org/blahblah">https://someurl.org/blahblah Thanks much in advance.

Thanks, I found it!

Hello I have searched the help file but can't seem to find info on how to detect when the maximize button has been pressed. How do I go about detecting this?

Update: -Contacts now have online/offline icons beside their names -Removed some redundant code(a lot actually)

Thanks for the response, however I've already switched to using listviews as opposed to listboxes

Fixed this problem by using _GUICtrlListView_MapIndexToID() and _GUICtrlListView_MapIDToIndex() interchangeably Func _getcontacts() $oHTTP.Open("GET", "https://pdglobal.net?sid=contactslist&session=" & $session, False) $oHTTP.Send() $contacts = $oHTTP.ResponseText $clist = StringSplit(StringTrimLeft($contacts, 1), "|") $index = 0 _GUICtrlListBox_ResetContent($List2) For $i = 1 To $clist[0] If $clist[$i] <> "" Then $conversations[0][0] += 1 $conversations[$i][0] = $clist[$i] $conversations[$i][2] = _bang(FileRead(IniRead(@ScriptDir & "\settings.ini", "userkeys", $clist[$i], "NA"))) $conversations[$i][3] = 0 $conversations[$i][4] = _GUICtrlListView_MapIndexToID($list2,_GUICtrlListView_AddItem($List2, $clist[$i], 1)) ConsoleWrite($conversations[$i][0]&"="&$conversations[$i][4]&@CRLF) EndIf Next EndFunc ;==>_getcontacts func _getonlinestatus() $index_old = _GUICtrlListView_GetHotItem($list2) for $i = 1 to $conversations[0][0] $oHTTP.Open("GET", "https://pdglobal.net?sid=getonlinestatus&USER="&$conversations[$i][0], False) $oHTTP.Send() $online = $oHTTP.ResponseText ConsoleWrite($conversations[$i][0]&"-"&$online&";") if $online = 1 Then _GUICtrlListView_BeginUpdate($list2) _GUICtrlListView_DeleteItem($list2, _GUICtrlListView_MapIDToIndex($list2, $conversations[$i][4])) if $conversations[$i][3] > 0 Then $conversations[$i][4] = _GUICtrlListView_MapIndexToID($list2, _GUICtrlListView_AddItem($list2, $conversations[$i][0]&" ("&$conversations[$i][3]&")", 0)) Else $conversations[$i][4] = _GUICtrlListView_MapIndexToID($list2, _GUICtrlListView_AddItem($list2, $conversations[$i][0], 0)) EndIf ConsoleWrite($conversations[$i][0]&"="&$conversations[$i][4]&@CRLF) _GUICtrlListView_EndUpdate($list2) Else _GUICtrlListView_BeginUpdate($list2) _GUICtrlListView_DeleteItem($list2,_GUICtrlListView_MapIDToIndex($list2, $conversations[$i][4])) if $conversations[$i][3] > 0 Then $conversations[$i][4] = _GUICtrlListView_MapIndexToID($list2, _GUICtrlListView_AddItem($list2, $conversations[$i][0]&" ("&$conversations[$i][3]&")", 1)) Else $conversations[$i][4] = _GUICtrlListView_MapIndexToID($list2, _GUICtrlListView_AddItem($list2, $conversations[$i][0], 1)) EndIf ConsoleWrite($conversations[$i][0]&"="&$conversations[$i][4]&@CRLF) _GUICtrlListView_EndUpdate($list2) EndIf Next if $index_old <> -1 Then ;_GUICtrlListBox_ClickItem($list2, $index_old) _GUICtrlListView_SetHotItem($list2, $index_old) EndIf ConsoleWrite(@CRLF) EndFunc

I found out the problem I'm having is that the listview automatically assigns the new string to the last index of the listview, so as I delete and re-add values the value of the current listview is always the same... any workarounds for this?

However now I am having a new problem. When I re-create the strings in the listbox it's not maping the new IDs to the array, so it re-creates the whole listview over again.

Figured out how to make it work Func _getcontacts() $oHTTP.Open("GET", "https://pdglobal.net?sid=contactslist&session=" & $session, False) $oHTTP.Send() $contacts = $oHTTP.ResponseText $clist = StringSplit(StringTrimLeft($contacts, 1), "|") $index = 0 _GUICtrlListBox_ResetContent($List2) For $i = 1 To $clist[0] If $clist[$i] <> "" Then $conversations[0][0] += 1 $conversations[$i][0] = $clist[$i] $conversations[$i][2] = _bang(FileRead(IniRead(@ScriptDir & "\settings.ini", "userkeys", $clist[$i], "NA"))) $conversations[$i][3] = 0 $conversations[$i][4] = _GUICtrlListView_AddItem($List2, $clist[$i], 1) $index += 1 EndIf Next EndFunc ;==>_getcontacts func _getonlinestatus() $index_old = _GUICtrlListView_GetHotItem($list2) for $i = 1 to $conversations[0][0] $oHTTP.Open("GET", "https://pdglobal.net?sid=getonlinestatus&USER="&$conversations[$i][0], False) $oHTTP.Send() $online = $oHTTP.ResponseText ConsoleWrite($conversations[$i][0]&"-"&$online&";") if $online = 1 Then _GUICtrlListView_BeginUpdate($list2) _GUICtrlListView_DeleteItem($list2, _GUICtrlListView_MapIDToIndex($list2, $conversations[$i][4])) if $conversations[$i][3] > 0 Then $conversations[$i][4] = _GUICtrlListView_AddItem($list2, $conversations[$i][0]&" ("&$conversations[$i][3]&")", 0) Else $conversations[$i][4] = _GUICtrlListView_AddItem($list2, $conversations[$i][0], 0) EndIf _GUICtrlListView_EndUpdate($list2) Else _GUICtrlListView_BeginUpdate($list2) _GUICtrlListView_DeleteItem($list2,_GUICtrlListView_MapIDToIndex($list2, $conversations[$i][4])) if $conversations[$i][3] > 0 Then $conversations[$i][4] = _GUICtrlListView_AddItem($list2, $conversations[$i][0]&" ("&$conversations[$i][3]&")", 1) Else $conversations[$i][4] = _GUICtrlListView_AddItem($list2, $conversations[$i][0], 1) EndIf _GUICtrlListView_EndUpdate($list2) EndIf Next if $index_old <> -1 Then ;_GUICtrlListBox_ClickItem($list2, $index_old) _GUICtrlListView_SetHotItem($list2, $index_old) EndIf ConsoleWrite(@CRLF) EndFunc The helpfile contains invalid description for _GUICtrlListView_AddItem() it says it returns an index but it really returns an ID