Jump to content

Warrior124

Members
  • Posts

    993
  • Joined

  • Last visited

Everything posted by Warrior124

  1. Great job, guys. Are any of these going to be for public use?
  2. If I'm not mistaken you want a code that will write whatever you type to a remote computer using your script. In essence you want to distribute a script containing a code that when activated will write whatever you type, and save it accordingly. Thus if you type a code to be written you can take control of the remote computer, and basically make it do whatever you want while the other person who has your script has no idea of what is taking place. With this code you can take control of the room, and effectively do other things as well. I apologize, but we can't help you with this.
  3. Happy New Year, everyone!!
  4. As far as the ff alias I'll take a look into it for you.
  5. Ahh, then you'll need to change the coding a little then. instead of using... try using this... dll $nofile($mircexe) $+ Emgine\Dlls\nhtmln_2.95.dll
  6. Try this... alias webpage { window @WebPage dll $nofile($mircexe) $+ Dll\nhtmln_2.95.dll attach $window(@webpage).hwnd dll $nofile($mircexe) $+ Dll\nhtmln_2.95.dll margins -2 dll $nofile($mircexe) $+ Dll\nhtmln_2.95.dll navigate http://www.google.com } The , isn't needed in the code. Also, is your folder the nhtmln_2.95.dll in called Dll, or Dlls, or something else?
  7. If you install mirc on Windows Vista - Windows 7 for some reason it installs in a default directory, and the directory you choose with the mirc.ini file being created in the default directory. For mine it is installed into C:\Users\Administrator\AppData\Roaming\mIRC\, and C:\Program Files\mIRC2010 with my mirc.ini file being created in the C:\Users\Administrator\AppData\Roaming\mIRC\ directory. I forget what the default directory is for Vista. In other words it installs into 2 different directories. The one you choose, and a default directory as well with the mirc.ini only being created in the default directory. So using $mircdir will only give the directory containing the mirc.ini file while $nofile($mircexe) refers to the directory where you ran the mirc.exe program.
  8. Yes, it does work for Windows 7. It works for me. I'm using Windows 7 Ultimate. You just need to make sure you have mirc.ini in the right directory, or change your coding to have $nofile($mircexe) in it to point each coding for using the dll to your directory. dll $nofile($mircexe) $+ Dll\nhtmln_2.95.dll select $window($active).hwnd and so forth...
  9. Exactly, lol. That was what I was trying to convey, and is why I merged the !votekick code with the other on text event. I didn't get to look over all the code, but from what I've seen it looks like some things are indeed missing like what Travis said.
  10. I haven't tested it out, but I did notice you had two on text events pertaining to looking for the text !vote. This could be messing up your code. Try this... on *:nick: { if $nick == %victim && %vote != 0 { msg %vote There's no way to hide, $newnick $+ ! set %victim $newnick } } on *:text:!vote*:*: { if $read(votekick.txt,s,$address) { msg $chan You have voted already, $nick $+ ! } else { if $2 == $null { if %vote == 0 { msg $chan No voting running at the moment } else { msg $chan Syntax: !vote yes/no } } elseif $2 == yes { if %vote == 0 { msg $chan No voting running at the moment } else { inc %yes write votekick.txt $address $address } } elseif $2 == no { if %vote == 0 { msg $chan No voting running at the moment } else { inc %no write votekick.txt $address $address } } else { if %vote == 0 { msg $chan No voting running at the moment } else { msg $chan Syntax: !vote yes/no } } } if *kick iswm $1 { if $nick isop $chan { if %vote != 0 { msg $chan There is a voting running already halt } if $2 == $me { msg $chan I won't start a votekick on myself, $nick $+ ... } else { if $2 ison $chan { set %vote $chan msg $chan $+ $nick has started a votekick against $2 msg $chan Type !vote yes/no to vote for/against the kick msg $chan You can only vote one time and you have [60] seconds to do so timer 1 55 _warning $chan timer 1 60 _vote $chan set %victim $2 } else { msg $chan I don't see $2 in $chan $+ ?! } } } else { msg $chan You do not have permission to do start a votekick! } } } on *:text:!victim*:*: { if %vote == 0 { msg $chan No voting running at the moment } else { msg $chan The current votekick victim is %victim } } alias _warning { if %vote != 0 { msg $1 5 seconds remaining } } alias _vote { if %vote != 0 { var %total = $calc(%yes + %no) var %yes-p = $round($calc(%yes / %total * 100),2) var %no-p = $round($calc(%no / %total * 100),2) msg $1 The vote is over! The victim was %victim msg $1 Total votes: %total - Yes: %yes ( $+ %yes-p $+ $chr(37) $+ ) - No: %no ( $+ %no-p $+ $chr(37) $+ ) if %yes > %no { kick $1 %victim votekicked } else { msg $1 You are lucky this time, %victim;) } set %vote 0 set %yes 0 set %no 0 unset %all remove votekick.txt } } on *:text:!stopvoting:*: { if %vote == 0 { msg $chan No voting running at the moment } else { if $nick isop $chan { set %vote 0 set %yes 0 set %no 0 unset %all remove votekick.txt msg $chan The voting has been stopped by $nick } else { msg $chan You do not have permission to stop the voting! } } }
  11. Are you still looking for testers?
  12. What is it with all this IE bashing?! You'd think this is the worsest thing in the world to use. Just kidding, lol. Actually, it isn't safe to use. I always use Firefox.
  13. TGK is right about that, but other than that the only time when mIRC will show in the box is when mirc is minimized.
  14. Yes, when you buy a new pc, or laptop with Vista installed you get a free version of Windows 7. It seems they really have done alot better with this new OS than previous editions.
  15. Try this one. I removed some brackets, and missing code that was in there. ;------------------------------------------------------------------------------------------------- ;-- Center Dialog ;------------------------------------------------------------------------------------------------- alias loop { var %x 1 :lp did -a $dname 13 $nick($active,%x) inc %x if ($nick($active,%x) == $null) { goto nd } else { goto lp } :nd } alias cd { dialog -m centerd centerd } alias ccd { dll $rebar UnDock center | dialog -x centerd centerd } alias rebar { return dlls/rebar.dll } dialog centerd { title "Center Dialog" size -1 -1 589 437 option dbu list 1, 12 30 314 62, sort size extsel hsbar vsbar button "On", 2, 12 92 17 10, flat button "Off", 3, 31 92 17 10, flat edit $group(#tagged.events), 4, 49 91 15 10 button "Delete All", 6, 67 92 28 10, flat button "Clipboard", 7, 175 92 31 10, flat box "Kicked Users List", 8, 9 213 454 80 button "Ok/Cancel", 9, 8 415 586 12, ok cancel icon 10, -35 -30 647 503, pictures\004.jpg, 0, noborder button "Delete", 11, 99 92 31 10, flat button "View Notepad", 12, 134 92 37 10, flat list 13, 509 31 69 217 button "Owner", 14, 469 32 37 10 button "DeOwner", 15, 469 43 37 10 button "Host", 16, 469 54 37 10 button "DeHost", 17, 469 65 37 10 button "Voice", 18, 469 76 37 10 button "DeVoice", 19, 469 87 37 10 button "Tag", 20, 469 98 37 10 button "UnTag", 21, 469 109 37 10 text "Current Channel :", 22, 184 17 48 8, center edit , 23, 234 16 207 10, read autohs center button "Ban List Nick", 24, 469 120 37 10 button "Kick Nick", 25, 469 131 37 10 box "Nick List Options", 26, 465 23 116 244 edit "", 27, 509 249 70 10, read text "Decoded Nick : ", 28, 467 251 41 8, center box "Clone Lister", 29, 9 118 236 87 button "On", 30, 178 131 19 10 button "Off", 31, 198 131 19 10 edit $group(#CloneDet), 32, 219 131 22 10 button "View Notepad", 33, 189 148 37 10 button "Clipboard", 34, 189 167 37 10 button "Delete List", 35, 189 188 37 10 list 5, 12 126 163 75, sort size extsel hsbar vsbar list 37, 12 219 448 62, sort size extsel hsbar vsbar box "Tagged Users List", 38, 9 23 320 83 button "Delete All", 39, 67 281 28 10, flat button "On", 40, 12 281 17 10, flat button "Off", 41, 30 281 17 10, flat edit $group(#kickevents), 42, 49 281 15 10 button "Delete", 43, 99 281 31 10, flat button "View Notepad", 44, 134 281 37 10, flat button "Clipboard", 45, 175 281 31 10, flat } on *:dialog:centerd:init:*: { dll $rebar Dock $dialog($dname).hwnd > center /loop /loadbuf -ro centerd 5 settings/clonelist.txt /loadbuf -ro centerd 37 settings/snoopkick.txt /set %u 0 :loop /inc %u 1 if ($read -l [ $+ [ %u ] ] settings/snooptext.txt == $null) { goto end1 } else { /did -a centerd 1 $read -l $+ %u settings/snooptext.txt | goto loop } :end1 } on *:Dialog:centerd:sclick:1: { /set %sel.line $did(1).seltext } on *:Dialog:centerd:sclick:5: { /set %sel.line $did(5).seltext } on *:Dialog:centerd:sclick:13: { /set %sel.text $did(13).seltext } on *:Dialog:centerd:sclick:7: { clipboard %sel.line } on *:Dialog:centerd:sclick:34: { clipboard %sel.line } on *:dialog:centerd:sclick:12:{ run notepad.exe settings/snooptext.txt } on *:dialog:centerd:sclick:33:{ run notepad.exe settings/clonelist.txt } on *:Dialog:centerd:sclick:11: { /write -ds $+ %sel.line settings/snooptext.txt | /loadbuf -ro centerd 1 settings/snooptext.txt } on *:Dialog:centerd:sclick:35: { /remove settings/clonelist.txt | write settings/clonelist.txt | /loadbuf -ro centerd 5 settings/clonelist.txt }
  16. I don't think there are any differences at all. I'll post whenever I get any info, though.
  17. Just got a confirmation email. I've been selected to host a Windows 7 Launch Party, and I'll be getting a party pack including a Signature Edition Windows 7 Ultimate.
  18. Have you used Windows Movie Maker? If you have any Windows versions from XP, or above you should have Windows Movie Maker included. When you open WMM drag your AVI file into the timeline, and go to "File > Publish Movie". A box will open up asking you how to publish the file. Select "Email", and follow the instructions. Edit: Correction. Not all Windows version has WMM included. If you have Vista you will need to download WMM from here
  19. Don't worry, lol. I'll be idling with you all soon.
  20. At first I thought you were talking to me. I didn't know I had a chatroom, lol.
  21. Many websites have different ways to handle information. You'd just have to play around to find out how to read the information to use for mIRC. You will need to open a socket to the website... alias webread { sockclose webread sockopen webread www.mainwebaddresshere.com 80 } You will need a sockopen event on *:sockopen:webread: { var %s = $sockname , %ip = $sock($sockname).ip , %port = $sock($sockname).port if ($sockerr > 0) { sockclose %s | sockopen %s %ip %port } sockwrite %s GET /partofadressaftermainhere HTTP/1.1 $+ $crlf $+ Accept: */* $+ $crlf $+ User-Agent: whatever $+ $crlf $+ Host: www.mainwebaddresshere.com $+ $crlf $+ Connection: Close $+ $crlf $+ $crlf :error } Next you will need to retrieve information to be read... on *:sockread:webread: { var %s = $sockname , %ip = $sock($sockname).ip , %port = $sock($sockname).port , %r if ($sockerr > 0) { sockclose %s | sockopen %s %ip %port } sockread -n %r Your own coding goes here } Where your own coding goes you will need your own coding to be able to read the information you want. What I usually do is have it write the information it retrieves to a text file where I then look over to see where it should read from. I then make coding to read just the information I need (use $gettoks, etc) on *:sockread:webread: { var %s = $sockname , %ip = $sock($sockname).ip , %port = $sock($sockname).port , %r if ($sockerr > 0) { sockclose %s | sockopen %s %ip %port } sockread -n %r write $nofile($mircexe) $+ Test.txt %r } After you have your coding exactly as you want it you can replace the write bit with the coding you want.
  22. I'll be getting my Windows 7 Premium free of charge, plus I received an email asking me to sign up to host a party for the release of Windows 7. If selected they will be sending me out a party pack, plus a free version of Windows 7 Ultimate.
  23. Hey err0r. You've got another volunteer if you need another one. Nice work.
  24. What web browser are you running?
×
×
  • Create New...