Jump to content

Azu

Active Members
  • Posts

    410
  • Joined

  • Last visited

Everything posted by Azu

  1. How do I do that?
  2. When you say "publicly exposed" what comes to mind is a visible gui, E.G. the buttons that I can see and click on. And I'm not really sure what your meaning is. You made one for that piece of shit ie, why can't one be made for Firefox? And saying "read the fucking source code" doesn't help much..
  3. So basically.. there isn't one for FF yet.. even though it's more secure/faster then IE and there is an IE one.. and there is a bunch of COM stuff in FF that you can uses to make one? Then can someone please make one? Or tell me how I can make one? Please?
  4. Thanks, that's EXACTLY what I was looking very. Most helpful reply EVER.
  5. You could try using winwait to check for the window and you can set a timeout on it so it won't hang. OR you could make the if timerdiff statement into an adlib, and have it exit the script instead of exitloop. WinWait("Untitled", "", 5) Makes the winwait timeout after 5 seconds
  6. I have no clue why I made this or why anyone would want it but I'm going to post it anyways. Use the GUI to control it or press end to generate message/alt to close it. I'm to lazy to make a better description sorry. Oh and it's very buggy no-where near complete. kthxbai #include<guiConstants.au3> #include<misc.au3> opt("SendKeyDelay",0) opt("SendKeyDownDelay",0) Dim $m[10] Dim $wd[9999] Local $objSpeach=ObjCreate ("Sapi.SpVoice") $objSpeach.Volume=100 hotkeyset("{end}","gen") hotkeyset("{alt}","qx") func qx() exit endfunc guiCreate("Thought of the Day",314,94) $maintext=guictrlcreateinput("",0,0,314,17,$es_readonly,$ws_ex_transparent) guictrlCreateGroup("",-99,-99,1,1) $go=guictrlcreatebutton("Generate",48,68,89,25) $cl=guictrlcreatebutton("Close",184,68,89,25) $ac=guictrlcreatecheckbox("",85,38,10,10) guictrlcreatelabel("Auto",81,50) $as=guictrlcreateinput("1000",103,49,42,16) guictrlcreatelabel("Speed",145,50) $ts=guictrlcreateinput("1000",176,49,42,16) guictrlcreatelabel("Talk",218,50) $tc=guictrlcreatecheckbox("",222,38,10,10) guiSetState() While 1 $objSpeach.Rate=(guictrlRead($ts))/500 $1=guiGetMsg() If $1=$gui_event_close then Exit If $1=$cl then Exit if _ispressed("12") then exit If $1=$go then gen() if guictrlRead($ac)=$gui_checked then gen() WEnd Func gen() $ab=random(1,12,1) $wd[1]=rnd(StringSplit("I have to/I must/I gotta/I should/Sorry but I gotta/I ought to/I was about to/Can you help me/I still need to/First let me/Oh! I forgot to/I just learned how to/I can't unless I/I need to/I want to/You should/Now I must/I got to/Do you know how to/I forgot I had to/Sorry but I need to/I'd rather/Please/Can you","/")) $wd[2]=rnd(StringSplit("water/do/beat/beat up/make/chase/run from/choose/walk with/type/move/grow/try/eat/test/hear/paint/jump over/check on/catch/throw/wax/fix/avoid/smack/slam/find/kiss/ignite/insult/trade with/obfuscate/study/explore/beat up/find something for/wash/kill/sniff/delete/watch a movie with/watch TV with/create/hug/drool on","/")) $wd[3]=rnd(StringSplit("some/his/her/the/your/my/any/the best/the worst/a","/")) $wd[4]=rnd(StringSplit("cauldron/ton/barrel/lot/horde/little bit/large amount/","/")) $wd[5]=rnd(StringSplit("s/","/")) $wd[6]=rnd(StringSplit(" of / full of ","/")) $wd[7]=rnd(StringSplit("sexy /ugly /opaque /invisible /strong /weak /shy /bold /brave /cowardly /heroic /wimpy /adventurous /unadventurous /decisive /indecisive /colorful /colorless /ambiguous /unambiguous /primitive /civilized /attractive /unattractive /truthful /deceitful /prudent /vulgar /clean /dirty /modest /vain /pure /soiled ","/")) $wd[8]=rnd(StringSplit("hamster/dog/cake/flower/friend/pie/cat/gum/foot/pet lizard/keyboard/house/sister/brother/nuclear missile/wife/slave/president/toy/something/log/mom/mother/Napoleon/bed/grandma/arm/computer/grandpa/cracker/soup/TV/lamp/plant/light bulb/table/dad/shoe/door/telephone/window/DVD/calendar/key/blow-up boat/motorcycle/chimney/wall/door bell/sneaker/sock/yogurt/desk/money/calculator/present/gift/ice cube/mop/frisbee/pizza/pet rock/toaster oven/toaster/wall socket/barber/princess/wheel/stick shift/paper house/french bread/cigar/clock hand/bicycle tire/faucet/nose hair trimmer/poker chip/ashtray/barbecue/bird house/laser printer/stick man/scrabble game/cane/trash compactor/dishwasher/blender/bus token/stamp collection/stapler/copy machine/melted candle/toy box/telescope/microscope/diving board/jump rope/medicine cabinet/lawyer/screen door/no vacancy sign/phone bill/camera/door knob/toilet/plexiglass window/battery charger/paper bag/mushroom/shroom/elevator/escalator/ladder/angel cake/angel/hair dryer/PDA/remote control/pencil set/pencil/fire pit/window blind/blueberry pie/chili/poinsettia","/")) if $ab=10 then $wd[8]=rnd(StringSplit("secret thing/arm/secretar/canop/dictionar/cand/pant","/")) if $ab=11 then $wd[8]=rnd(StringSplit("toothbrush/wooden box/candy dish","/")) if $ab=12 then $wd[8]=rnd(StringSplit("pants/hair/mail/champaign/dental floss/dentures/glasses/goldfish","/")) $wd[9]=rnd(StringSplit("s/","/")) if $ab=10 then $wd[9]=rnd(StringSplit("ies/y","/")) if $ab=11 then $wd[9]=rnd(StringSplit("es/","/")) if $ab=12 then $wd[9]="" $wd[10]=rnd(StringSplit("!/./.../?!/!?/!!!/..?/?/..!","/")) if $wd[4]="little bit" then $wd[6]=" of " if $wd[4]="large amount" then $wd[6]=" of " if $wd[4]="ton" then $wd[6]=" of " if $wd[4]="horde" then $wd[6]=" of " if $wd[3]="some"&$wd[4]="lot" then $wd[3]="a" if $wd[4]="" then $wd[5]="" $wd[6]="" endif if $wd[3]="a" then $wd[5]="" endif $b="" for $a = 1 to 10 if $wd[$a]<>"" then $b=$b&$wd[$a] if $a<4 then $b=$b&" " guictrlsetdata($maintext,$B) guictrlsetcolor($maintext,abc()) ;if guictrlRead($tc)=$gui_unchecked and $a<>5 and $a<>8 and $a<>9 then sleep(100) next guictrlsetcolor($maintext,abc()) clipput (guictrlRead($maintext)) send("{enter}") sleep(50) send($B) sleep(50) send("{enter}") if guictrlRead($tc)=$gui_checked then $objSpeach.Speak (guictrlRead($maintext)) if guictrlRead($ac)=$gui_checked then sleep(guictrlRead($as)) EndFunc Func abc() Local $clr="0x" for $a = 1 to 6 $clr=$clr&Random(1,9,1) next $clr=Number($clr) Return $clr EndFunc func rnd($array) return $array[Random(1,$array[0],1)] endfunc
  7. Put$a=timerinit() at the start of your code. Then, in your loop, but something like if timerdiff($a)>1000 then exitloop timerdiff($a) equals the amount of milliseconds since $a=timerinit() was run.
  8. How do programs automatically update themselves? I thought files can't be changed while they are running.. but how else would they do it?
  9. Thanks. It seems to work with every key on my keyboard. One problem though, it gets them mixed up :s With the a-z and 0-9 keys it gets them all perfect, but with ctrl, alt, shift, caps lock, tab, tilde, backspace, and all the G keys on the G15, it displays some kind of ASCII symbol which isn't on my keyboard.. (like the kind you can make with alt+numpad keys) Why is this happening? It probably isn't really a problem, since it detects it persistently, but it's piqued my curiosity. O_o
  10. I'm pretty sure it does by default. If you don't give it a gui, then it's running in the background, no?
  11. You know how in some applications there is an option to bind a key, and it says to press the key you wanna use, and it knows which one you pressed? How do I do this in autoit? Would I have to make if conditions for every single key on the keyboard (which would be retarded), or is there a way for it to tell which key is pressed?
  12. Yep. And the game that you're trying to make a bot for, it knows that Autoit is commonly used for making bots, and it's blocking it.
  13. I know how to include ie.au3 and use it to control ie, however I can't find the one for Firefox! (It says FF.au3 doesn't exist) Can someone please tell me what is the name of the one for Firefox? I'd REALLY appreciate it.
  14. They work fine for me except that they type so SLOW, sometimes I can type stuff faster then autoit does with send/controlsend. How can I make it type faster? In other macros, like the one for G15, it can send all of the text instantly, rather then with long delays between each character. How can I set autoit to work like this, rather then taking forever? NVM I found it.. opt("SendKeyDelay",0) opt("SendKeyDownDelay",0)
  15. It thinks autoit is a cheat and it's blocking it.
  16. #include<misc.au3> while 1 if _ispressed("04") then run(@comspec&" /c Start YourAutoItScript.au3") sleep(2000) endif wend Edit: Aww you beat me to it lol
  17. Uh... Just make a backup of the one, single, self contained file. If anything goes wrong, all you need to restore is that one file, which will have everything in it. I'm not sure how having the settings stored separately (this having two files that could be corrupted, and two files that need backed up) is more convenient or safe then having it all in one.
  18. What's that do exactly? Just back up the HKEY_CURRENT_USER\SOFTWARE\Autoit v3 key?
  19. Press winkey + rregedit enter file export Rar or zip it to make bring it down to about 5% size.
  20. Why was this moved to the GUI section lol..
  21. Why would it get corrupted?Unless the power went out right at the exact instant when it was in the middle of saving..
  22. Anything that you want to make harder to detect. Off the top of my head; Emulation software Bots Anti-DRM software Stuff you want to be harder for viruses to mess with E.G. could be useful for anti virus programs themselves My personal reason, though, is seeing what can be achieved in AutoIt.
  23. Yes it does, if you know how to get around the protection.
  24. If, for example, you wanted to make it harder for other programs to detect your's based on checksums/file size. I think an easy way to get around the "can't be able already running" limitation is this; Have the file make another file adding some data of where it's at, and what it does is close the main file, and then the editing stuff, and then run the file again. When the main file is ran, it checks to see if the spawned file exists, and if it does, it checks the data at the end of it, so it can tell where it was at, and resume to that point, so to the user it won't look like it closed to begin with. And then delete the spawn file. Of course, the second to the last stuff I mentioned wouldn't be necessary for this, unless you wanted it to do it in the middle of it's execution, and seamlessly pick back up where it left off. I'm going to try your code erifash and see if I can get it to accomplish what I'm aiming for. Thanks for your contribution. Oh BTW, another thing this could be used for, is auto updating. And storing settings inside of itself.
  25. Hi, thanks for the reply. I don't understand how the script would edit itself in notepad though. Would you please explain? I was hoping there was some command I missed, like a fileeditline or something like that. And it would be really great if it would work with it in exe form also rather then only working uncompiled.
×
×
  • Create New...