mIRC Home    About    Download    Register    News    Help

Topic Options
#191474 - 09/12/07 03:27 PM Nicklist problem
PO3 Offline
Babel fish

Registered: 09/12/07
Posts: 61
Hello I'm on Vista and I have a nicklist it works but it will not show icons any idea why please ?


Code:
alias rebar { dll $shortfn($scriptdir\dll\rebar.dll) $$1- }
alias mdxdll return $shortfn($scriptdir\dll\mdx.dll)
alias bars return $shortfn($scriptdir\dll\bars.mdx)
alias _dialog return $shortfn($scriptdir\dll\dialog.mdx)
alias _views  return $shortfn($scriptdir\dll\views.mdx)
alias _mdx dll $shortfn($scriptdir\dll\mdx.dll) $1-
alias _mdxinit dll $shortfn($scriptdir\dll\mdx.dll) SetMircVersion $version | dll $shortfn($scriptdir\dll\mdx.dll) MarkDialog $dname
alias nicklust { dll $+(",$scriptdir\dll\nicklust.dll,") $1- }
alias renklikutu { return $+(",$scriptdir\dll\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 $scriptdir\icon\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),$scriptdir/icon/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 $scriptdir/icon/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 # > $scriptdir\icon\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 $scriptdir/icon/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 $scriptdir/icon/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 $+(",$scriptdir\dll\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
}


script shot of the problem

Top
#191789 - 15/12/07 10:33 PM Re: Nicklist problem [Re: PO3]
PO3 Offline
Babel fish

Registered: 09/12/07
Posts: 61
Shame that over 70 people seen this and not one help crazy

Top
#191790 - 15/12/07 10:37 PM Re: Nicklist problem [Re: PO3]
ik000ike Offline
Babel fish

Registered: 28/12/04
Posts: 87
are you using mirc 6.3.1?

Top
#191814 - 16/12/07 09:19 AM Re: Nicklist problem [Re: ik000ike]
PO3 Offline
Babel fish

Registered: 09/12/07
Posts: 61
yep

Top
#191875 - 17/12/07 11:29 AM Re: Nicklist problem [Re: PO3]
marco50 Offline
Ameglian cow

Registered: 20/08/07
Posts: 21
Loc: Stuttgart, Germany
Originally Posted By: PO3
Shame that over 70 people seen this and not one help crazy

shame?
let's make an optimistic assumption: let's assume that 10% of the folks here ase using mdx. and that 10% are experienced nicklust or whatever-dll users. and that 10% of the folks have enough time to delve into 500 lines of code. Then the probability that you'd find somebody is 0.001%.

I rarely post a problem here. but when I do it, I sometimes spend an hour or so to reduce the code to the essential lines. It's an hour "wasted", ok. but if I would'nt have done this, maybe 10 people would have to waste 30 minutes each to figure out what my code means.

10 x .5 = five hours...

Top
#191886 - 17/12/07 04:06 PM Re: Nicklist problem [Re: PO3]
The_JD Offline
Fjord artisan

Registered: 28/03/06
Posts: 392
Loc: New South Wales, Australia
and I just spent ten minute reading your post wink
_________________________
[02:16] * Titanic has quit IRC (Excess Flood)

Top
#191895 - 17/12/07 07:48 PM Re: Nicklist problem [Re: The_JD]
PO3 Offline
Babel fish

Registered: 09/12/07
Posts: 61
any pointers ?

Top
#191897 - 17/12/07 08:59 PM Re: Nicklist problem [Re: PO3]
The_JD Offline
Fjord artisan

Registered: 28/03/06
Posts: 392
Loc: New South Wales, Australia
You say your nicklist is working, where is it? I can't see it in screenshot. Have you checked the nicklust documentation
_________________________
[02:16] * Titanic has quit IRC (Excess Flood)

Top
#191972 - 19/12/07 08:43 AM Re: Nicklist problem [Re: The_JD]
PO3 Offline
Babel fish

Registered: 09/12/07
Posts: 61
everything were it should be :s

Top
#191981 - 19/12/07 05:37 PM Re: Nicklist problem [Re: PO3]
DJ_Sol Offline
Hoopy frood

Registered: 04/01/07
Posts: 1156
Loc: Seattle
I see two nicklists and yes, I have too much going on to read through all that code. Id try to simplify your code there. If youw ant to use the mdx one, seperate just the mdx list. Same with the nicklust nicklist.

That's a good start. I created a nicklust nicklist and there wasn;t much I had to do with it. Maybe start from scratch again and just use the basics. Test each step to make sure it's working. THEN You can start adding little features.

Top
#191984 - 19/12/07 09:57 PM Re: Nicklist problem [Re: PO3]
argv0 Offline
Planetary brain

Registered: 13/10/03
Posts: 3918
Loc: Montreal, QC, Canada
This may be somewhat mIRC related but why not ask on a forum where people are actually experienced with mdx and the scripts you're using, because most people here are not.

Also, read the http://kthx.net/ftb debugging tutorial and narrow your code down to something more specific so that someone knowledgeable of mdx or otherwise can figure out what you could have done wrong.
_________________________
- argv[0] on EFnet #mIRC
- "Life is a pointer to an integer without a cast"

Top