Jump to content

Warrior124

Members
  • Posts

    993
  • Joined

  • Last visited

Everything posted by Warrior124

  1. I've got an addon out where you just put in the url to a website containing files. It will show the file names, the creation dates of each file, and the size of each file. It is called, Download'M, and you can get it from here if you want to take a look at the coding. Basically you can find the creation date in $gettok($gettok($bvar(&bvar,1-).text,7,34),2-3,32) in the sockread event. Then, you can compare that to the same filename you have by using $asctime($file($nofile($mircexe) $+ script0.txt).ctime,dd-mmm-yyyy hh:nn). If the file on the website is greater than the one you already have then just have download, and install the new file.
  2. Here is another code you can use... on *:INPUT:*: { $eval($replace($1-,$chr(36) $+ mircdir,$nofile($mircexe)),2) haltdef } With this code you can still use $findfile($mircdir,mdx.dll,1) to reveal where mdx.dll in the correct mirc folder.
  3. You can use this code instead of $findfile to help you find files more easily, and faster... alias ff { if (!%ff. [ $+ [ $1- ] ]) || (!$exists(%ff. [ $+ [ $1- ] ])) set %ff. [ $+ [ $1- ] ] $qt($longfn($findfile($nofile($mircexe),$1-,1))) return %ff. [ $+ [ $1- ] ] } To use type in something like...
  4. err0r is right. The only way we'll be able to help you is if you give us the entire script so we can figure out what is going on. Can you give us what you have, and we'll try to help.
  5. mstat is an alias. I took a look at your code, and you donot have an alias for mstat. So, I'm guessing that is why it isn't working.
  6. Warrior124

    Views.dll

    You'd basically need to have a timer to check for boxes checked, and then if a box is checked to join that channel. Here is what you can do... alias checkum .timerboxcheck 1 1 checkboxes alias checkboxes { if ($dialog(<dialognamehere>)) { var %l = $did(<dialog name here>,<dialog id here>).lines , %a = 2 :next if ($gettok($did(<dialog name here>,<dialog id here>,%a).text,5,32) == 2) { if (!$chan($gettok($gettok($did(DownloadM,1,2).text,2,9),5-,32))) join $gettok($gettok($did(DownloadM,1,2).text,2,9),5-,32) } inc %a if (%a <= %l) goto next else checkum } } on *:dialog:<dialognamehere>:init:*: { <mdx coding here> checkum } What this should do is check each line for a checked box. If found it should join the channel if the channel doesn't already exist. Then, it will go to the next line. If all lines have been checked, and the dialog is still open it will begin again until the dialog is finally closed.
  7. You can also try WebchatZ
  8. Is this your own nicklist addon, or is it someone elses? Also if it is yours, could you show us the code you have for adding nicknames to the nicklist? That way we can be better able to help you.
  9. Today, I got an email saying that I was eligible to receive a tax refund of a little over $2000.00. It gave me a link to go to so I could fill out my information, and bank account details. What gave it away for me was two things. First, I looked at the url which was http://mtlpercussion.org/catalog/images/mi...ing(50);%20?%3E. Next, I clicked on some links the website had such as Help, and Contact IRS. Every link I clicked on took me back to the same page where I was suppose to fill in my information. So, I reported this site. The website looks like a legitimate IRS website. However, don't be fooled. Always be suspicious of anything where you have to fill in personal information. If you get an email like this you can report it to [email protected].
  10. No problem, mate. I'm currently working on another version atm. The reason it isn't setting the vars it was suppose to set is because for some odd reason it seems the websites changes their source code from time to time. I'll continue working on this, and hopefully have a solution soon.
  11. Awesome work, mate. Can't wait to see the release.
  12. I agree. If you don't know someone/some people you can't really make a good judgement about them. When you script there is only so many ways one can code something to do something in particular, and to say that one bit of coding belongs specifically to one person is rediculous. It is like making on on text event, and saying that someone stole the "on *:TEXT:*:#:" part of the coding. If anyone has a right to complain about having codes stolen it is khaled, the creator of mIRC. We just borrow his coding to make our own scripts. I haven't had a very good chance yet to try out the buzzen soulfly, yet. However, from what I've seen it is an awesome script. Travis has worked very hard on it. It is easy to throw a script together, but it isn't as easy when you take your time, and do it the right way. From what I've seen of Travis he has done it the right way.
  13. I do know this. Travis has asked me a few times if he could use some of my coding for his scripts, and I have gladly said yes. Travis, you are a great scripter. Don't let what some people say get to you. I don't think you're a ripper at all. Keep scripting, mate.
  14. That's why I gave the alias ff code so that the path would be found. However, Dippy says it doesn't work, and he runs Vista. I tried his nicklist on my system running the same version mirc as Dippy does, mirc 6.31, and it works on XP. So, the code is finding the files, but since Dippy says it isn't working that means it has to be something else then.
  15. If you're running Windows Vista you may have to right click on the files in your scripts folder, and choose to run as administrator. I run XP, and Dippy gave me his nicklist he was working on. The icons shown just fine for me. So, this is a Vista problem.
  16. lol, you both have forced me to look up others who puts commas before "and". Here is one example. It asks which is the best answer for combining two sentences into one, and shows the best answer is answer "D" which has ", and" in it to form two sentences into one. So, time for you two to go back to school, lol. Just kidding. P.S.: Thanks for the invite concerning the emots. I recently had to delete everything from my pc, and start fresh, because of something my brother did that caused me to not be able to boot up, lol. I'll redownload your connection, and make an emot script for it.
  17. takaharu, concerning the multiple definitions starting at 2 well you will need to talk to the ones who has the website about that, lol. For some odd reason that is how it is displayed in the source code. Concerning the grammar, I may have not been in school for quite some time, but I seem to remember you use commas along with and, or, but, etc so that you can form two sentences into one sentence. Concerning the colons I just added them in so that it looks a little more proffesional. At least it does to me, lol. I think it is a good idea concerning the directory dialog to eliminate the title. I see what you mean about the drop down boxes, and the buttons on the mapquest dialog, and they will be fixed before the release. I made the buttons oversized on mapquest, because I don't like to have too much unused space on my dialogs. To me, unused space gives me the crepes, lol. I'll try to think of something to add, and make the buttons smaller.
  18. Here are the current addons, and what they look like now. Please let me know of any improvements you would like to see.
  19. If you are using mirc version 6+ there may be some things you need to change as $scriptdir references where mirc was installed, and not your actual directory you are running mirc from. Here is what I've come up with for you. Let me know if it works. I wasn't able to test it, because I don't have the needed icons. alias ff { if (!%ff. [ $+ [ $1- ] ]) || (!$exists(%ff. [ $+ [ $1- ] ])) set %ff. [ $+ [ $1- ] ] $longfn($findfile($nofile($mircexe),$1-,1)) return %ff. [ $+ [ $1- ] ] } alias rebar { dll $ff(rebar.dll) $$1- } alias mdxdll return $ff(mdx.dll) alias bars return $ff(bars.mdx) alias _dialog return $ff(dialog.mdx) alias _views return $ff(views.mdx) alias _mdx dll $ff(mdx.dll) $1- alias _mdxinit dll $ff(mdx.dll) SetMircVersion $version | dll $ff(mdx.dll) MarkDialog $dname alias nicklust { dll $ff(nicklust.dll) $1- } alias renklikutu { return $+(",$ff(colorcombo.dll),") } menu channel,status,nicklist,menubar { - NickList Preferences .Preferences General:nicklist .Colours Preferences:dialog -m rgb2 rgb2 | acinca2 .- .Unload :/unload -rs $shortfn($script) } alias nicklist { if ($dialog(nicklist)) { dialog -x nicklist } | dialog -ma nicklist nicklist | echo -a 0,1Warning Dialog: 12Now Menu of NickList 1Preferences General 12is Opened. } dialog nicklist { title " NickList Preferences v2.0 " size -1 -1 188 185 option dbu icon $ff(simge.ico) box "",19, 4 -1 180 34 text "", 12, 4 3 180 30 list 13, 150 9 28 32, size disable text " NickList Preferences v2.0", 14, 8 4 90 10 text "You can only select colored nicklist or nicklist with icon only.", 15, 9 16 140 16 box "", 322, 4 33 180 130 text "Own Nick :", 329, 9 44 29 8, center combo 330, 44 43 50 44, size drop text "Op (@) :", 323, 9 58 29 8, center combo 324, 44 57 50 50, size drop text "Halfop (+h) :", 333, 9 72 33 8, center combo 334, 44 71 50 20, size drop text "Voice (+v) :", 325, 9 86 29 8, center combo 326, 44 85 50 50, size drop text "Users :", 327, 9 100 29 8, center combo 328, 44 99 50 50, size drop text "Ignore :", 331, 9 114 29 8, center combo 332, 44 113 50 50, size drop check "Use Colour NickList", 353, 25 145 65 10, flat check "Use Icons NickList", 354, 115 145 62 10, flat box "", 335, 100 38 2 120 text "Owner channel :", 340, 108 44 40 8 text "Super Op :", 347, 108 58 40 8 text "Operator (@) :", 336, 108 72 40 8 text "Halfop (+h) :", 339, 108 86 40 8 text "Voice (+v) :", 337, 108 100 40 8 text "Users :", 338, 108 114 40 8 combo 346, 155 43 24 70, size combo 348, 155 57 24 70, size combo 342, 155 71 24 70, size combo 345, 155 85 24 70, size combo 343, 155 99 24 70, size combo 344, 155 113 24 70, size button "OK", 10, 140 168 40 13, ok button "Colours Settings", 112, 134 128 45 15 } on *:dialog:nicklist:init:0:{ _mdxinit renk _mdx SetControlMDX $dname 342,343,344,345,346,348 ComboBoxEx drop > $_views _mdx SetBorderStyle $dname 10,112 staticedge did -i $dname 342,343,344,345,346,348 1 iconsize small var %x = 1 while (%x <= 40) { did -i $dname 342,343,344,345,346,348 1 seticon 0 $+($calc(%x -1),$chr(44),$ff(list.icl)) did -a $dname 342,343,344,345,346,348 %x inc %x 1 _mdx SetBorderStyle $dname 12,14,15 _mdx SetControlMDX $dname 13 toolbar flat list nodivider arrows > $bars did -i $dname 13 1 bmpsize 35 35 _mdx SetBorderStyle $dname 13 _mdx SetColor $dname 13 background $rgb(255,255,255) did -i $dname 13 1 setimage +nhd 0 icon large $ff(simge.ico) did -i $dname 13 1 bwidth 200 200 did -a $dname 13 1 a mdx SetColor $dname 12,14,15 background $rgb(255,255,255) mdx SetColor $dname 12,14,15 textbg $rgb(255,255,255) mdx SetColor $dname 14 text $rgb(255,0,0) mdx SetColor $dname 14 text $rgb(0,0,255) mdx SetFont $dname 14 17 800 Tahoma mdx SetFont $dname 15 13 600 Tahoma } did -c $dname 342 $calc(%op.ico + 2) did -c $dname 343 $calc(%voice.ico + 2) did -c $dname 344 $calc(%normal.ico + 2) did -c $dname 345 $calc(%halfop.ico + 2) did -c $dname 346 $calc(%sahip.ico + 2) did -c $dname 348 $calc(%sop.ico + 2) ;--- Nicklist colours renk did -c $dname 324 $calc(%rengli.324 + 2) did -c $dname 326 $calc(%rengli.326 + 2) did -c $dname 328 $calc(%rengli.328 + 2) did -c $dname 330 $calc(%rengli.330 + 2) did -c $dname 332 $calc(%rengli.332 + 2) did -c $dname 334 $calc(%rengli.334 + 2) if (%nkreng.aktiv) { did -c $dname 353 | did -b $dname 342,336,343,337,344,338,345,339,346,347,348,340,112 } if (%icon.nl) { did -c $dname 354 | did -b $dname 324,326,328,330,332,323,325,327,329,331,333,334 } } on *:dialog:nicklist:sclick:11: on *:dialog:nicklist:sclick:112:rgb2 | echo -a 0,1Warning Dialog: 12Now Menu of 1Colours Preferences 12is Opened, 4Menu of NickList 1Preferences General 4is Closed. } on *:dialog:nicklist:sclick:*:{ if ($did == 354) { if ($did(354).state == 1) { set %icon.nl on .disable #renkli .unset %nkreng.aktiv did -u $dname 353 did -b $dname 324,326,328,330,332,323,325,327,329,331,333,334 did -e $dname 342,336,343,337,344,338,345,339,346,347,348,340,112 nick.rengsiz } else { unset %icon.nl did -e $dname 324,326,328,330,332,323,325,327,329,331,333,334 } } if ($did == 353) { if ($did(353).state == 1) { .enable #renkli | set %nkreng.aktiv on | nick.rengle did -u $dname 354 .unset %icon.nl did -e $dname 324,326,328,330,332,323,325,327,329,331,333,334 did -b $dname 342,336,343,337,344,338,345,339,346,347,348,340,112 } else { unset %nkreng.aktiv .disable #renkli nick.rengsiz did -e $dname 342,336,343,337,344,338,345,339,346,347,348,340,112 } } if ($did isnum 324-334) { set %rengli. $+ $did $calc($did($dname,$did).sel - 2) | nick.rengle } if ($did == 342) { echo -a set %op.ico $calc($did(342).sel - 2) } if ($did == 343) { echo -a set %voice.ico $calc($did(343).sel - 2) } if ($did == 344) { echo -a set %normal.ico $calc($did(344).sel - 2) } if ($did == 345) { echo -a set %halfop.ico $calc($did(345).sel - 2) } if ($did == 346) { echo -a set %sahip.ico $calc($did(346).sel - 2) } if ($did == 348) { echo -a set %sop.ico $calc($did(348).sel - 2) } } alias -l renk { var %x = dll $renklikutu COMBO $dname | %x 324 | %x 326 | %x 328 | %x 330 | %x 332 | %x 334 } #renkli off on *:nick:{ var %rbg = $comchan($newnick,0) var %rbg2 = 1 while (%rbg < %rbg2) { if ($nick = $me) && $comchan($newnick,%rbg2) { cline %rengli.330 $comchan($newnick,%rbg2) $newnick | nick.rengle } elseif ($newnick isop $comchan($newnick,%rbg2)) { cline %rengli.324 $comchan($newnick,%rbg2) $newnick | nick.rengle } elseif ($newnick isvo $comchan($newnick,%rbg2)) { cline %rengli.326 $comchan($newnick,%rbg2) $newnick | nick.rengle } elseif ($newnick ishelp $comchan($newnick,%rbg2)) { cline %rengli.334 $comchan($newnick,%rbg2) $newnick | nick.rengle } elseif ($address($newnick,5) isignore) { cline %rengli.332 $comchan($newnick,%rbg2) $newnick | nick.rengle } elseif $comchan($newnick,%rbg2) { cline %rengli.22 $comchan($newnick,%rbg2) $newnick | nick.rengle } else { break } inc %rbg2 } } on *:op:#:{ if ($opnick != $me) { cline %rengli.324 $chan $opnick | nick.rengle } } on *:deop:#:{ if ($opnick != $me) { cline %rengli.328 $chan $opnick | nick.rengle } } on *:voice:#:{ if ($vnick != $me) { cline %rengli.326 $chan $vnick } | nick.rengle } on *:devoice:#:{ if ($vnick != $me) { cline %rengli.328 $chan $vnick | nick.rengle } } on *:help:#:{ if ($hnick != $me) { cline %rengli.334 $chan $hnick | nick.rengle } } on *:dehelp:#:{ if ($hnick != $me) { cline %rengli.334 $chan $hnick | nick.rengle } } on *:join:#:{ set %rbg.c $chan if $nick = $me { .enable #renklenen | nick.rengle } else { cline %rengli.328 $chan $nick | nick.rengle } } #renkli end #renklenen off raw 366:*:{ var %tot = $nick(%rbg.c,0) var %cont = 1 while (%cont <= %tot) { if ($nick(%rbg.c,%cont) = $me) { cline %rengli.330 %rbg.c $me } elseif ($nick(%rbg.c,%cont) isop %rbg.c) { cline %rengli.324 %rbg.c $nick(%rbg.c,%cont) } elseif ($nick(%rbg.c,%cont) isvo %rbg.c) { cline %rengli.326 %rbg.c $nick(%rbg.c,%cont) } elseif ($nick(%rbg.c,%cont) ishelp %rbg.c) { cline %rengli.334 %rbg.c $nick(%rbg.c,%cont) } else { cline %rengli.328 %rbg.c $nick(%rbg.c,%cont) } inc %cont } .disable #renklenen | unset %rbg.c } #renkleken end alias nick.rengle { var %rbg = $chan(0) %rbg2 = 1 while %rbg2 <= %rbg { var %rbg3 = $nick($chan(%rbg2),0) var %rbg6 = $chan(%rbg2) var %rbg4 = 1 while %rbg4 <= %rbg3 { if $1 = -r { cline $color(listbox text) %rgb6 $nick(%rbg6,%rbg4) } else { if $nick(%rbg6,%rbg4) = $me { cline %rengli.330 %rbg6 $nick(%rbg6,%rbg4) } elseif $nick(%rbg6,%rbg4) isop %rbg6 { cline %rengli.324 %rbg6 $nick(%rbg6,%rbg4) } elseif $nick(%rbg6,%rbg4) isvo %rbg6 { cline %rengli.326 %rbg6 $nick(%rbg6,%rbg4) } elseif $nick(%rbg6,%rbg4) ishelp %rbg6 { cline %rengli.334 %rbg6 $nick(%rbg6,%rbg4) } elseif $address($nick(%rbg6,%rbg4),5) isignore { cline %rengli.332 %rbg6 $nick(%rbg6,%rbg4) } elseif $nick(%rbg6,%rbg4) isreg %rbg6 { cline %rengli.328 %rbg6 $nick(%rbg6,%rbg4) } } inc %rbg4 } inc %rbg2 } } alias nick.rengsiz { set -u0 %i 1 while (%i <= $chan(0)) { set -u0 %j 1 while (%j <= $nick($chan(%i),0)) { if ($nick($chan(%i),%j) ison $chan(%i)) { cline 01 $chan(%i) $nick($chan(%i),%j)) } inc %j } inc %i } } on 1:load:{ echo -a 0,4« NickList Preferences v2.0 » 11,12 NickList Preferences mIRC Loaded. } on 1:unload:{ echo -a 0,4« NickList Preferences v2.0 » 11,12 NickList Preferences mIRC Unloaded. } on *:join:#:{ if ($nick == $me) && (%icon.nl != $null) { who # | nlust.chan $chan } } alias nlust.chan { if ($nick == $me) { nicklust Mark $window(#).hwnd nLUST_CallBack rowselect tooltips balloontips hideempty hottrack dlgframe clientedge nicklust AddIcon # > echo -a %op.ico $+ ,nicklist\icon\list.icl nicklust AddIcon # > echo -a %voice.ico $+ ,nicklist\icon\list.icl nicklust AddIcon # > echo -a %normal.ico $+ ,nicklist\icon\list.icl nicklust AddIcon # > echo -a %halfop.ico $+ ,nicklist\icon\list.icl nicklust AddIcon # > echo -a %op.ico $+ ,nicklist\icon\list.icl nicklust AddIcon # > echo -a %sop.ico $+ ,nicklist\icon\list.icl nicklust AddIcon # > echo -a %sahip.ico $+ ,nicklist\icon\list.icl nicklust SetGroupText # 1 > User's nicklust AddGroup # 10 + 2 > Voice's (+v) nicklust AddGroup # 11 @ 1 > Op's (@) nicklust AddGroup # 12 % 4 > Halfop's (+h) nicklust AddGroup # 13 - 5 > Op's (@) nicklust AddGroup # 14 & 6 > Sop's nicklust AddGroup # 15 . 7 > Owner nicklust SetGroupView # 1 normal nicklust SetGroupView # 10 normal nicklust SetGroupView # 11 normal nicklust SetGroupView # 12 normal nicklust SetGroupView # 13 normal nicklust SetGroupView # 14 normal nicklust SetGroupView # 15 normal nicklust SetGroupIcon # 1 3 nicklust SetGroupPos # 15 start nicklust SetGroupPos # 14 end nicklust SetGroupPos # 13 end nicklust SetGroupPos # 11 end nicklust SetGroupPos # 12 end nicklust SetGroupPos # 10 end nicklust SetGroupPos # 1 end nicklust SetHotCursor # > $ff(red.cur) nicklust SetHeaderFontStyle # bold theme_nlist # } } alias nlust_callback { if ($1 = tooltip) { var %extra if ($3 == $me) %extra = (Your name) nicklust SetTipTitle $2 1 > Info on $3 %extra return Status: $nlist_pnick($remove($nick($2,$3).pnick,$3)) $+ $crlf $+ Idle: $duration($nick($2,$nick($2,$3)).idle) $+ $crlf $+ Notify: $iif($notify($3),Yes,No) $+ $crlf $+ Adrress: $iif($address($3,1),$ifmatch,Unknown) $+ $crlf $+ Channel: $_comchans($3,32)) } } alias nlist_pnick { if ($1 = @) { return Kanal Operatörü } elseif ($1 = .) { return Owner channel } elseif ($1 = &) { return Super Op (Sop) } elseif ($1 = +) { return Voice } elseif ($1 = %) { return Halfop } elseif ($1 = -) { return Operator } elseif ($1 = $null) { return Users } } alias _isnotifylist { if ($notify($1)) return $2 return $3 } alias _comchans { var %tokk = $iif($2,$ifmatch,$chr(32)), %iii = 1, %chh while (%iii <= $comchan($1,0)) { %chh = $addtok(%chh,$comchan($1,%iii),%tokk) | inc %iii } return $sorttok(%chh,%tokk) } if (($1 == nickAdding) && ($notify($3))) return 11 if ($1 == nickadded) { if ($3 == $me) return 2 $rgb(255,0,255) > $me $crlf $+ This is you } alias theme_nlist { nicklust SetColor $1 bkg %rgbcode nicklust SetColor $1 text %rgbcode2 nicklust SetColor $1 hottext %rgbcode9 nicklust SetColor $1 tipbkg %rgbcode10 nicklust SetColor $1 tiptext %rgbcode11 nicklust SetColor $chan divider %rgbcode3 nicklust SetHeaderColor $chan 1 %rgbcode4 nicklust SetHeaderColor $chan 10 %rgbcode5 nicklust SetHeaderColor $chan 11 %rgbcode6 nicklust SetHeaderColor $chan 12 %rgbcode7 nicklust SetHeaderColor $chan 15 %rgbcode8 nicklust SetHeaderColor $chan 14 %rgbcode12 } ON *:JOIN:#:{ if ($nick == $me) { haltdef } } alias Rgb2 { dialog -m rgb2 rgb2 | acinca2 | dialog -x nicklist nicklist } dialog rgb2 { title " Colours Settings - (Icon's Nicklist) " size -1 -1 410 490 option pixels icon $ff(renk.ico), 0 box "", 32, 5 -4 360 77 box "&Colour Box", 1, 30 75 310 143 edit "", 2, 45 95 31 20, disable list 3, 100 96 155 20, size list 4, 265 91 63 83, size edit "", 5, 45 120 31 20, disable list 6, 100 120 155 20, size edit "", 7, 45 145 31 20, disable list 8, 100 145 155 20, size text "Hex Code:", 9, 47 174 62 16 edit "", 10, 45 190 100 19 text "Rgb Code:", 11, 178 175 55 16 edit "", 12, 175 190 103 19 button "Background ", 13, 15 245 110 25, ok button "Nick text", 15, 130 245 110 25, ok button "Group text line", 16, 245 245 110 25, ok button "User Grup's text", 17, 245 314 110 25, ok button "Voice Grup's text", 18, 130 315 110 25, ok button "Sop Grup's text", 33, 130 280 110 25, ok button "Op Grup's text", 19, 245 280 110 25, ok button "Halfop Grup's text", 20, 15 315 110 25, ok button "Owner channel text", 21, 15 280 110 25, ok button "Hot text", 22, 15 350 110 25, ok button "Ýnfo background", 23, 130 350 110 25, ok button "Ýnfo text", 24, 245 350 110 25, ok button "Nicklist Preferences", 25, 6 399 120 30, ok box "&Colours Settings", 14, 4 222 358 165 text "", 26, 5 2 360 68 list 27, 305 14 53 40, disable text " Colours Settings - (Icon's Nicklist) ", 28, 5 7 255 20 text " To change the settings of colour, first select the colours from box of colour, then press the position which you want to change.", 29, 5 27 285 40 button "Close", 30, 263 396 100 30, ok } on *:dialog:rgb2:init:*:{ mdxini mdx SetMircVersion $version mdx MarkDialog $dname mdx SetColor $dname 4 background %rgbcode mdx SetColor $dname 2 background $rgb(255,0,0) mdx SetColor $dname 5 background $rgb(0,255,0) mdx SetColor $dname 7 background $rgb(0,0,255) mdx SetFont $dname 2,5,7,9,10,11,12 +a 12 600 Arial mdx SetBorderStyle $dname 2,5,7,10,12 staticedge mdx SetBorderStyle $dname 13,15,16,17,18,19,20,21,22,23,24,33 staticedge mdx SetControlMDX $dname 3,6,8 TrackBar autoticks > $bars mdx SetBorderStyle $dname 3,6,8 windowedge did -i $dname 3,6,8 1 params 0 0 255 * * * * 12 did -i $dname 3,6,8 1 tickfreq 1 mdx SetBorderStyle $dname 26,28,29 mdx SetControlMDX $dname 27 toolbar flat list nodivider arrows > $bars did -i $dname 27 1 bmpsize 35 35 mdx SetBorderStyle $dname 27 mdx SetColor $dname 27 background $rgb(255,255,255) did -i $dname 27 1 setimage +nhd 0 icon large $ff(renk.ico) did -i $dname 27 1 bwidth 250 250 did -a $dname 27 1 a mdx SetColor $dname 26,28,29 background $rgb(255,255,255) mdx SetColor $dname 26,28,29 textbg $rgb(255,255,255) mdx SetColor $dname 28 text $rgb(255,0,0) mdx SetColor $dname 1,14 text $rgb(0,0,255) mdx SetFont $dname 28,30 17 800 Tahoma mdx SetFont $dname 1,14,25,29 13 600 Tahoma } on *:dialog:rgb2:sclick:3,6,8:{ mdx SetColor $dname 4 background $rgb($gettok($did(3).seltext,1,32),$gettok($did(6).seltext,1,32),$gettok($did(8).seltext,1,32)) did -ra $dname 12 $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) did -ra $dname 10 $base($gettok($did(3).seltext,1,32),10,16,2) $+ $base($gettok($did(6).seltext,1,32),10,16,2) $+ $base($gettok($did(8).seltext,1,32),10,16,2) } alias mdx_fullpath { return $+(",$ff(mdx.dll),") } alias mdx { dll $mdx_fullpath $1- } alias mdxini { dll $mdx_fullpath SetMircVersion $version dll $mdx_fullpath MarkDialog $dname } on *:dialog:rgb2:sclick:13:{ set %rgbcode $rgb( $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) ) alias theme_nlist | /hop $active # } on *:dialog:rgb2:sclick:15:{ set %rgbcode2 $rgb( $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) ) alias theme_nlist | /hop $active # } on *:dialog:rgb2:sclick:16:{ set %rgbcode3 $rgb( $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) ) alias theme_nlist | /hop $active # } on *:dialog:rgb2:sclick:17:{ set %rgbcode4 $rgb( $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) ) alias theme_nlist | /hop $active # } on *:dialog:rgb2:sclick:18:{ set %rgbcode5 $rgb( $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) ) alias theme_nlist | /hop $active # } on *:dialog:rgb2:sclick:19:{ set %rgbcode6 $rgb( $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) ) alias theme_nlist | /hop $active # } on *:dialog:rgb2:sclick:20:{ set %rgbcode7 $rgb( $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) ) alias theme_nlist | /hop $active # } on *:dialog:rgb2:sclick:21:{ set %rgbcode8 $rgb( $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) ) alias theme_nlist | /hop $active # } on *:dialog:rgb2:sclick:22:{ set %rgbcode9 $rgb( $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) ) alias theme_nlist | /hop $active # } on *:dialog:rgb2:sclick:23:{ set %rgbcode10 $rgb( $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) ) alias theme_nlist | /hop $active # } on *:dialog:rgb2:sclick:24:{ set %rgbcode11 $rgb( $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) ) alias theme_nlist | /hop $active # } on *:dialog:rgb2:sclick:33:{ set %rgbcode12 $rgb( $gettok($did(3).seltext,1,32) $+ , $+ $gettok($did(6).seltext,1,32) $+ , $+ $gettok($did(8).seltext,1,32) ) alias theme_nlist | /hop $active # } on *:dialog:rgb2:sclick:25:/dialog -m nicklist nicklist | dialog -x rgb2 rgb2 | echo -a 0,1Warning Dialog: 12Now Menu of NickList 1Preferences General 12is Opened, 4Menu of 1Colours Preferences 12is Closed. on *:dialog:rgb2:sclick:31:/run http://www.mirc.com.tr alias acinca2 { var %i = 10 while (%i < 264) { dialog -s rgb2 %i $calc(%i - 110) 370 440 inc %i } dialog -v rgb2 }
  20. Warrior124

    Quick Q!

    You'd have to set the width, and heigth coordinates to a variable instead of a preset value, such as %nicksize. Then, you can use this code. set %nicksize $dll(dlls\nicklist.dll,GetSize,$1-) Here is a sample dialog. alias ff { if (!%ff. [ $+ [ $1- ] ]) || (!$exists(%ff. [ $+ [ $1- ] ])) set %ff. [ $+ [ $1- ] ] $longfn($findfile($nofile($mircexe),$1-,1)) return %ff. [ $+ [ $1- ] ] } dialog nick { title "" size 0 0 %nicksize option pixels list 1, 0 0 %nicksize, size } on *:JOIN:#: { if ($nick == $me) { set %nicksize $dll($ff(nicklist.dll),GetSize,$chan) dialog -m nick $+ $chan nick } } on *:dialog:nick*:init:*: { dll $ff(mdx.dll) SetMircVersion $version dll $ff(mdx.dll) MarkDialog $dname dll $ff(mdx.dll) SetDialog $dname style dll $ff(mdx.dll) SetControlMDX $dname 1 listview report showsel > $ff(views.mdx) dll $ff(nicklist.dll) Nicklist $dname $right($dname,-4) }
  21. Unfortunately it doesn't return 100% correct. I've checked out other sites that uses online translations, and all the ones I've checked out doesn't offer 100% accurate translations. The online translator this addon utilizes is babelfish from altavista.com.
  22. The reason for that is because I'm running Spyware Terminator with ClamAV which Windows doesn't detect as an AV. TY guys.
  23. It was done in Dutch. I just accidentally hit the german button when I was moving things around preparing for the screen shot.
  24. Happy Thanksgiving, everyone. Here is a screen shot of some addons I'm making currently. Let me know if you can think of any improvements.
×
×
  • Create New...