Jump to content

Golbez

Active Members
  • Posts

    596
  • Joined

  • Last visited

About Golbez

  • Birthday 04/10/1987

Profile Information

  • Member Title
    Programer
  • Location
    New York
  • WWW
    http://z11.invisionfree.com/Zarox/index.php?&CODE=00

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

Golbez's Achievements

  1. soo i went to edit it like you suggested.. it is 1 line already.
  2. #include <Inet.au3> #include <String.au3> Global $fun4 = 'https://raw.githubusercontent.com/Zephino/funs/main/fun4.kik' Global $sResponse $sResponse = _INetGetSource($fun4, True) ConsoleWrite("fun4.kik (Binary): =>" & Binary($sResponse) & "<=" & @CRLF) ConsoleWrite("fun4.kik (String): =>" & $sResponse & "<=" & @CRLF) if $sResponse = "yes" then MsgBox(0,"works","works") Else MsgBox(0,"Does Not Work","$sReponse: " & $sResponse & @CRLF _ & "Binary of $sReponse: " & Binary($sResponse) & @CRLF _ & "String: " & _INetGetSource($fun4, True) & @CRLF _ & "Binary: " & _INetGetSource($fun4, False) & @CRLF _ & "Binary of 'yes': " & Binary("yes") & @CRLF _ & "BinarytoString of 'yes': " & StringToBinary("yes", 1) & @CRLF _ & "Compare $fun4 & 'yes': " & StringCompare( _INetGetSource($fun4, True),"yes") & @CRLF _ & "Compare $sResonse & 'yes': " & StringCompare( _INetGetSource($sResponse, True),"yes") & @CRLF _ & "Compare $sResonse & $fun4: " & StringCompare( _INetGetSource($sResponse, True), $fun4)) ;0: string1 and string2 are equal ;> 0: string1 is greater than string2 ;< 0: string1 is less than string2 EndIf i added the compare in, im not sure what is different between them or why it does not work. i have a slight feeling it involves the amount of characters it is returning in the binary code
  3. i am not trying to write a file, i am trying to just pull a value and compare it with what i know it should be and it does not work. if you pull any value from the links provided and compare them with the known value example: #include <Inet.au3> #include <String.au3> Global $fun4 = 'https://raw.githubusercontent.com/Zephino/funs/main/fun4.kik' if _INetGetSource($fun4, True) = "yes" then MsgBox(0,"works","works") Else MsgBox(0,"Does Not Work","Webcode: " & _INetGetSource($fun4, True)) EndIf this should work, and it does not
  4. okay i understand i can read it but it is not the same as when i try to compare it to what i know it says. heres another test i did, it does not equal the same. #include <Inet.au3> #include <String.au3> #include <MsgBoxConstants.au3> ;fun2.kik = Normal INI, fun3.kik = converted binary Global $fun2 = 'https://raw.githubusercontent.com/Zephino/funs/main/fun2.kik' Global $fun3 = 'https://raw.githubusercontent.com/Zephino/funs/main/fun3.kik' Global $fun4 = 'https://raw.githubusercontent.com/Zephino/funs/main/fun4.kik' Global $location ;ConvertBItoKIK() ;ConvertKIKtoBI() if String(_INetGetSource($fun4)) = "yes" then MsgBox(0,"","") Else Local $webcode = String(_INetGetSource($fun4, True)) local $bi= Binary($webcode) local $co= BinaryToString($bi) Local $key = 'yes' MsgBox(0, "", "1: Webcode: " & $webcode & @CRLF _ & "2: CapWebCode: " & StringUpper($co) & @CRLF _ & "2: binary: " & $bi & @CRLF & @CRLF _ & "3: Converted: " & $co & @CRLF _ & "4: Compare: " & StringCompare($co, _StringInsert(Binary($key),"0A", 8), 0) & @CRLF & @CRLF _ & "5: Key Convert: " & Binary($key)& @CRLF & @CRLF _ & "6: Key Insert: " & _StringInsert(Binary($key),"0A", 8)) If StringUpper($co) = "YES" Then MsgBox(0,"yay","yay") EndIf Exit Func ConvertBItoKIK() $location= @ScriptDir & "\fun2.kik" local $BItoKIK = IniRead($location, "KEY", "funtime", "") MsgBox(0, "Convert Binary: " & $location, "1: BItoKIK: " & $BItoKIK & @CRLF & @CRLF _ & "2: Location: " & $location & @CRLF & @CRLF _ & "2: Kik2: " & $fun2 & @CRLF & @CRLF _ & "3: InetRead kik2: " & InetRead($fun2) & @CRLF & @CRLF _ & "4: StringToBinary: " & StringToBinary($BItoKIK) & @CRLF & @CRLF _ & "5: Binary: " & Binary($BItoKIK)) ClipPut(Binary($BItoKIK)) EndFunc func ConvertKIKtoBI() $location= @ScriptDir & "\fun3.kik" local $KIKtoBI = FileReadLine ($location, 1) MsgBox(0, "Convert KIK: " & $location, "1: KIKtoBI: " & $KIKtoBI & @CRLF & @CRLF _ & "2: Location: " & $location & @CRLF & @CRLF _ & "2: Kik3: " & $fun3 & @CRLF & @CRLF _ & "3: InetRead kik2: " & InetRead($fun2) & @CRLF & @CRLF _ & "4: BinaryToString: " & BinaryToString($KIKtoBI) & @CRLF & @CRLF _ & "5: Binary: " & Binary($KIKtoBI)& @CRLF & @CRLF _ & "6: String: " & $KIKtoBI & @CRLF & @CRLF _ & "7: INetSource: " & _INetGetSource($fun3) & @CRLF & @CRLF _ & "8: INetSource Convert: " & BinaryToString(String(_INetGetSource($fun3, False))) & @CRLF & @CRLF _ & "9: is a binary?: " & IsBinary(BinaryToString(String(_INetGetSource($fun3, False)))) & @CRLF & @CRLF _ & "7: funs4: " & _INetGetSource($fun4)) EndFunc #cs converted file: file location. 0x5B4B45595D0A70686F6E65686F6D65203D207965730A converted files: means yes: 0x796573 converted fun2.kik 0x433A5C55736572735C7264735C4465736B746F705C4E657720666F6C6465725C66756E322E6B696B 0x433A5C55736572735C7264735C4465736B746F705C4E657720666F6C6465725C66756E322E6B696B #ce
  5. did you check the box to make sure it adds all the included files needed?
  6. im attempting to turn the whole ini binary or have the result be binary which i would read from online. #include <Inet.au3> #include <MsgBoxConstants.au3> ;fun2.kik = Normal INI, fun3.kik = converted binary Global $fun2 = 'https://raw.githubusercontent.com/Zephino/funs/main/fun2.kik' Global $fun3 = 'https://raw.githubusercontent.com/Zephino/funs/main/fun3.kik' Global $location ConvertBItoKIK() ConvertKIKtoBI() Exit Func ConvertBItoKIK() $location= @ScriptDir & "\fun2.kik" local $BItoKIK = IniRead($location, "KEY", "funtime", "") MsgBox(0, "Convert Binary: " & $location, "1: BItoKIK: " & $BItoKIK & @CRLF & @CRLF _ & "2: Location: " & $location & @CRLF & @CRLF _ & "2: Kik2: " & $fun2 & @CRLF & @CRLF _ & "3: InetRead kik2: " & InetRead($fun2) & @CRLF & @CRLF _ & "4: StringToBinary: " & StringToBinary($BItoKIK) & @CRLF & @CRLF _ & "5: Binary: " & Binary($BItoKIK)) ClipPut(Binary($location)) EndFunc func ConvertKIKtoBI() $location= @ScriptDir & "\fun3.kik" local $KIKtoBI = FileReadLine ($location, 1) MsgBox(0, "Convert KIK: " & $location, "1: KIKtoBI: " & $KIKtoBI & @CRLF & @CRLF _ & "2: Location: " & $location & @CRLF & @CRLF _ & "2: Kik3: " & $fun3 & @CRLF & @CRLF _ & "3: InetRead kik2: " & InetRead($fun2) & @CRLF & @CRLF _ & "4: BinaryToString: " & BinaryToString($KIKtoBI) & @CRLF & @CRLF _ & "5: Binary: " & Binary($KIKtoBI)& @CRLF & @CRLF _ & "6: String: " & $KIKtoBI & @CRLF & @CRLF _ & "7: INetSource: " & _INetGetSource($fun3) & @CRLF _ & "8: INetSource Convert: " & BinaryToString(_INetGetSource($fun3, false))) EndFunc #cs converted file: file location. 0x5B4B45595D0A70686F6E65686F6D65203D207965730A converted files: means yes: 0x796573 converted fun2.kik 0x433A5C55736572735C7264735C4465736B746F705C4E657720666F6C6465725C66756E322E6B696B 0x433A5C55736572735C7264735C4465736B746F705C4E657720666F6C6465725C66756E322E6B696B #ce with this code, i can get the info off the website but it doesnt seem to be converting it correctly BinaryToString(_INetGetSource($fun3, false))) this is what isnt working for some reason, it just returns the Binary value
  7. Hi guys, im trying to convert my ini file (i labeled them kik) to a binary file so i can then read them off the internet without having to download anything. i cant seem to get it to work, and im unsure as to how to fix. code: #include <Inet.au3> #include <MsgBoxConstants.au3> ;fun2.kik = Normal INI, fun3.kik = converted binary Global $fun2 = 'https://raw.githubusercontent.com/Zephino/funs/main/fun2.kik' Global $fun3 = 'https://raw.githubusercontent.com/Zephino/funs/main/fun3.kik' Global $location Global $location convertBItoKIK() ConvertKIKtoBI() Func convertBItoKIK() $location= @ScriptDir & "\fun2.kik" MsgBox(0, "Convert Binary: " & $location, "1: inetread " & InetRead($location) & @CRLF & @CRLF & "2:Binarytoscring " & StringToBinary($location) & @CRLF & @CRLF & "3: binary " & Binary($location)) ClipPut(Binary($location)) EndFunc func ConvertKIKtoBI() $location= @ScriptDir & "\fun3.kik" MsgBox(0, "Convert KIK: " & $location, "1: inetread " & InetRead($location) & @CRLF & @CRLF & "2:Binarytoscring " & StringToBinary($location) & @CRLF & @CRLF & "3: binary " & Binary($location)) EndFunc funs2.kik [KEY] funtime = yes funs3.kik 0x433A5C55736572735C7264735C4465736B746F705C4E657720666F6C6465725C66756E322E6B696B i think funs3 is just the location but it is not converting it like it should
  8. I'm trying to find a way to use the command from the ini. I'm pretty sure I can't but I wanted to ask if there was a way I didn't know about. Nvm I seemy mistake you. Ty for fix Lol I always overlook the small things.
  9. Hi im trying to set an ini directory from within an ini. Basically i have made a queing system for users to use my program and i need a way for all users to read the same ini from the same file. QueFileLocation="@ScriptDir & '\Que.ini'" this is what i have in my settings ini file for my program to read for the queing ini, but the code puls it at @scriptdir and not as a command. was wondering if there is a way to make this work or if i have to hardcode the location. (C:\Users\rds\Desktop\csi)
  10. i tried that, but i couldnt get it to work.
  11. is there a way for autoit to read a github that contains an ini? i cant seem to find anything when i search.
  12. MsgBox(0,"", "New Location: " & IniRead($file, "Settings", "WindowLocation", "6") & _ @CRLF & "Old Location: " & $oldlocation & _ @CRLF & "winWIDTH: " & $winWIDTH & _ @CRLF & "winHEIGHT: " & $winHEIGHT & _ @CRLF & "winWIDTHOLD: " & $winWIDTHOLD & _ @CRLF & "winHEIGHTOLD: " & $winHEIGHTOLD & _ @CRLF & "If/Else Status: " & $nt) figured it out -.-
  13. i cant remember how to do it as ive only needed to do it a few times. MsgBox(0,"", "New Location: " & IniRead($file, "Settings", "WindowLocation", "6") & @CRLF & "Old Location: " & $oldlocation & @CRLF & "winWIDTH: " & $winWIDTH & @CRLF & "winHEIGHT: " & $winHEIGHT & @CRLF & "winWIDTHOLD: " & $winWIDTHOLD & @CRLF & "winHEIGHTOLD: " & $winHEIGHTOLD & @CRLF & "If/Else Status: " & $nt) trying to turn this into something easier to read lol
  14. my guess is 2 mousedown commands at the same time
×
×
  • Create New...