nox`

nox`

Joined
Oct 01, 2012

Activity Stream

nox` commented on a Page, Strawpoll Creator  -  Apr 02, 2017

Hello, i receveid : * /strawpoll: No Cookie Recieved
Possibl update pls ? thx

 Respond  
nox` is now following L4roXyL  -  Jan 24, 2015
nox` is now following Wims  -  Jan 07, 2015
nox` commented on a Page, Calltip Dll  -  Jan 07, 2015

Thank you Wims !
mslDev ? is this software abandoned ?oO

nox` commented on a Comment, Admin DIalog DCX  -  Jun 12, 2014
nox` commented on a Page, Admin DIalog DCX  -  Jun 11, 2014

I do not understand why use dcx?
You can make your dialog without dcx

it lacks a bracket in your code

lines 19-20 :
xdid -C $dname 2 +bk $rgb(0,0,0)
xdid -C $dname 4 +bk $rgb(0,0,0)

-> xdid -C $dname 2,4,+bk 0

alias Admin_Dialog !dialog $iif($dialog(Admin_Dialog),-x,-ma) Admin_Dialog Admin_Dialog

alias Admin_Dialog_cb {
  if $1 == Admin_Dialog {
    if $2 == sclick && $status == connected {
      if ($istok(3 6 7 8 9 10 11 12 13 14,$3,32)) mode %channe $replace($3,3,+q,6,-q,7,+a,8,-a,9,+o,10,-o,11,+h,12,-h,13,+v,14,-v) %nickname
      if ($istok(15 16,$3,32)) $replace($3,15,sajoin,16,sapart) %nickname %channel 
      if ($3 == 17) cs set founder %channel %nickname
      if ($istok(18 19,$3,32)) cs set Securefounder %Channel $replace($3,18,on,19,off)
      if ($3 == 20) cs REGISTER %channel
      if ($3 == 21) cs DROP %channel %Channel
      if ($istok(22 23,$3,32)) cs mode %Channel SET $replace($3,22,+P,23)
      if ($istok(24 25,$3,32)) cs set secure %channel $replace($3,24,on,25,off)
      if ($istok(26 27,$3,32)) cs set keetopic %channel $replace($3,26,on,27,off)
      if ($istok(28 29,$3,32)) cs set secureop %channel $replace($3,28,on,29,off)
      if ($3 == 30) cs users %channel clear
      if ($3 == 31) cs MODE %channel CLEAR
      if ($3 == 37) accesslist
      if ($3 == 38) topic %channel $?="Topic"
      if ($3 isnum 42-65) cs mode %channel set $replace($3,42,+N,43,-N,44,+m,45,-m,46,+s,47,-s,48,+l $$?="Enter New Limit",49,-l,50,+c,51,-c,52,+p,53,-p,54,+O,55,-O,56,+R,57,-R,58,+M,59,-M,60,+T,61,-T,62,+K,63,-K,64,+C,65,-C)
    }
    elseif $2 == edit {
      if ($3 == 32) set %channel $xdid($1,32).text
      elseif ($3 == 35) cs DROP %channel %Channel
      if ($istok(36 39,$3,32)) set %nickname $xdid(%dname,$3).text
    }
  }
}
nox` commented on a Page, dcx colors codes   -  Jun 11, 2014

dcx has a color picker : //echo -ag $dcx(ColorDialog,fullopen dcx anycolor returndefault)

nox` commented on a Comment, digimon mIRC script  -  Apr 01, 2014
nox` is now following TMFKSOFT  -  Feb 18, 2014
nox` is now following hxck  -  Feb 05, 2014
nox` commented on a Page, Imgur URL Recogniser  -  Jan 21, 2014

Http://imgur.com/a/y79xB?gallery
Http://imgur.com/a/y79xB
Http://i.imgur.com/uR68H.jpg
http://imgur.com/uR68H
I do not know if there are other valid formats

on $*:TEXT:$($imgreg):#: {
  if (!$sock(ImgurLookup)) {
    sockopen ImgurLookup imgur.com 80 | sockmark ImgurLookup $+(#,$chr(32),$regml(1))
  }
}
alias imgreg return /https?\72\/\/(?:i\.)?imgur\.com\/((?:a\/)?[a-z\d]+)/Si
on *:sockopen:ImgurLookup:{
  var %a sockwrite -n $sockname
  %a GET $+(/,$gettok($sock(ImgurLookup).mark,2,32)) HTTP/1.1
  %a Host: imgur.com
  %a $crlf
}
on *:sockread:ImgurLookup:{
  var %x
  sockread %x
  if $regex(%x,/([^>]+)<\/title>/) { set %ImgurLookuptitle $gettok($regml(1),-2,45) }
  if $regex(%x,<h2 class="textbox left">([^>]+)<\/h2>) { set %ImgurLookupalbum · $regml(1) }
  if $regex(%x,<span title=".+ GMT">([^>]+)<\/span>) { set %ImgurLookupage $regml(1) }
  if $regex(%x,<span (?:class|id)="stat(?:s-views)?">([^>]+)<\/span>) { set %ImgurLookupview $regml(1) }
  if "nsfw":true isincs %x { set %ImgurLookupnsfw 9· 4NSFW }
  if $regex(%x,"datetime":"([^"]+)") && !%ImgurLookupage { set %ImgurLookupage $timeago($calc($ctime - $ctime($regml(1)))) }
}
on *:sockclose:ImgurLookup: {
  msg $gettok($sock(ImgurLookup).mark,1,32) 9,1i0,1mgur » %ImgurLookuptitle %ImgurLookupalbum · Uploaded: %ImgurLookupage · %ImgurLookupview views %ImgurLookupnsfw
  unset %ImgurLookup*
}
alias timeago {
  if ($1 <= 59) { Return $1 seconds ago }
  if (($1 <= 3599) && ($1 > 59)) { return $floor($calc($1 / 60)) minutes ago }
  if (($1 <= 86399) && ($1 > 3599)) { return $round($calc($1 / 3600),0) hours ago }
  if (($1 <= 2592000) && ($1 > 86399)) { return $floor($calc($1 / 86400)) $iif($floor($calc($1 / 86400)) > 1,days,day) $+ , $round($calc($calc($1 - $calc($floor($calc($1 / 86400))*86400)) / 3600),0) hour(s) ago }
  if (($1 <= 31540000) && ($1 > 2592000)) { return $floor($calc($1 / 2592000)) $iif($floor($calc($1 / 2592000)) > 1,months,months) $+ , $round($calc($calc($1 - $calc($floor($calc($1 / 2592000))*2592000)) / 86400),0) day(s) ago }
  if ($1 > 31104000) { return $floor($calc($1 / 31104000)) $iif($floor($calc($1 / 31104000)) > 1,years,year) $+ , $round($calc($calc($1 - $calc($floor($calc($1 / 31104000))*31104000)) / 2592000),0) month(s) ago }
}
nox` commented on a Comment, WHOIS IP Tracker  -  Jan 15, 2014
nox` commented on a Comment, Another IP tracker  -  Jan 14, 2014
nox` commented on a Page, Another IP tracker  -  Jan 13, 2014

on *:SOCKREAD:ip-tracker: {
if ($sockerr > 0) return
sockread %ip-tracker
if ($regex(%ip-tracker,/

(\S+): ([^<]+)<\/div>/)) echo -atg 8=- $regml(1) $+ :11 $regml(2)
elseif $regex(%ip-tracker,/href="([^"]+)"/) { echo -at 8=- Link: $remove($regml(1),amp;) | run $remove($regml(1),amp;) }
sockclose ip-tracker
}
nox` created a Page  -  Nov 09, 2013
335 

This is a quit display system. one person:

 Respond   mIRC  
nox` commented on Chromatic's Thread  -  Nov 04, 2013
nox` liked a mIRC Script, Pacman online v2.0 for mIRC  -  Sep 11, 2013
nox` commented on a Comment, Pacman online v2.0 for mIRC  -  Sep 11, 2013
nox` liked a Comment, Pacman online v2.0 for mIRC  -  Sep 11, 2013
nox` commented on a Comment, Youtube manager  -  Aug 04, 2013
nox` liked a Comment, Youtube manager  -  Aug 04, 2013
nox` commented on a mIRC Script, Youtube manager  -  Aug 04, 2013

Ther's a small error in the line 259 (version 4.3) which I had not thought if you want to correct it replace this line:

If ($regex($1,/(?:#|\?|&)t=([\ddhms]+)/S)) set -su1 %ythottime $duration($regml(1))

by this one

if ($regex(ytstartime,$1,/(?:[#?&])t=([\ddhms]+)/S)) set -u1 %ythottime $iif($regml(ytstartime,1) isnum,$v1,$duration($replace($v1,d,day $chr(32),h,hr $chr(32),m,min $chr(32),s,sec)))
nox` commented on a mIRC Script, Youtube manager  -  Jul 25, 2013

Hello :D New version 4.3 released !!! The next version will be released soon and will download the videos and sounds
Screenshot early configuration dialog for downloads

nox` commented on a Comment, [REQUEST] User join Script  -  Jul 22, 2013
nox` commented on a Comment, Which Movie To Watch  -  Jul 01, 2013
nox` commented on a mIRC Script, Youtube manager  -  May 23, 2013

Version 3.7 released !

 Respond  
nox` commented on a Comment, Youtube manager  -  Apr 16, 2013
nox` is now following Lindrian  -  Mar 28, 2013
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.