RGB Renk Katalog

[Goemon]

Gençler Her mIRC Scriptde Olmasını Düşündüğüm Çalışmalardan Biri Daha Code Sahibi Difuzyon mIRC RBG Kodları Hakkında Bilgiler Alıp Öğrene Bilirsiniz.

alias katalog {
  window -pdoa +Let @Katalog -1 -1 257 550
  drawfill -r @Katalog $rgb(150,80,107) 1 1 264 570
  var %dify 1 | while %dify <= 255 {
    drawdot -r @Katalog $rgb(%dify,0,0) 2 %dify 2
    drawdot -r @Katalog $rgb(%dify,25,0) 2 %dify 5
    drawdot -r @Katalog $rgb(%dify,50,0) 2 %dify 8
    drawdot -r @Katalog $rgb(%dify,75,0) 2 %dify 11
    drawdot -r @Katalog $rgb(%dify,100,0) 2 %dify 14
    drawdot -r @Katalog $rgb(%dify,125,0) 2 %dify 17
    drawdot -r @Katalog $rgb(%dify,150,0) 2 %dify 20
    drawdot -r @Katalog $rgb(%dify,175,0) 2 %dify 23
    drawdot -r @Katalog $rgb(%dify,200,0) 2 %dify 26
    drawdot -r @Katalog $rgb(%dify,225,0) 2 %dify 29
    drawdot -r @Katalog $rgb(%dify,250,0) 2 %dify 32
    drawdot -r @Katalog $rgb(%dify,25,75) 2 %dify 62
    drawdot -r @Katalog $rgb(%dify,50,75) 2 %dify 59
    drawdot -r @Katalog $rgb(%dify,75,75) 2 %dify 56
    drawdot -r @Katalog $rgb(%dify,100,75) 2 %dify 53
    drawdot -r @Katalog $rgb(%dify,125,75) 2 %dify 50
    drawdot -r @Katalog $rgb(%dify,150,75) 2 %dify 47
    drawdot -r @Katalog $rgb(%dify,175,75) 2 %dify 44
    drawdot -r @Katalog $rgb(%dify,200,75) 2 %dify 41
    drawdot -r @Katalog $rgb(%dify,225,75) 2 %dify 38
    drawdot -r @Katalog $rgb(%dify,250,75) 2 %dify 35
    drawdot -r @Katalog $rgb(0,%dify,225) 2 %dify 65
    drawdot -r @Katalog $rgb(25,%dify,225) 2 %dify 68
    drawdot -r @Katalog $rgb(50,%dify,225) 2 %dify 71
    drawdot -r @Katalog $rgb(75,%dify,225) 2 %dify 74
    drawdot -r @Katalog $rgb(100,%dify,225) 2 %dify 77
    drawdot -r @Katalog $rgb(125,%dify,225) 2 %dify 80
    drawdot -r @Katalog $rgb(150,%dify,225) 2 %dify 83
    drawdot -r @Katalog $rgb(175,%dify,225) 2 %dify 86
    drawdot -r @Katalog $rgb(200,%dify,225) 2 %dify 89
    drawdot -r @Katalog $rgb(225,%dify,225) 2 %dify 92
    drawdot -r @Katalog $rgb(250,%dify,225) 2 %dify 95
    drawdot -r @Katalog $rgb(0,%dify,175) 2 %dify 128
    drawdot -r @Katalog $rgb(25,%dify,175) 2 %dify 125
    drawdot -r @Katalog $rgb(50,%dify,175) 2 %dify 122
    drawdot -r @Katalog $rgb(75,%dify,175) 2 %dify 119
    drawdot -r @Katalog $rgb(100,%dify,175) 2 %dify 116
    drawdot -r @Katalog $rgb(125,%dify,175) 2 %dify 113
    drawdot -r @Katalog $rgb(150,%dify,175) 2 %dify 110
    drawdot -r @Katalog $rgb(175,%dify,175) 2 %dify 107
    drawdot -r @Katalog $rgb(200,%dify,175) 2 %dify 104
    drawdot -r @Katalog $rgb(225,%dify,175) 2 %dify 101
    drawdot -r @Katalog $rgb(250,%dify,175) 2 %dify 98
    drawdot -r @Katalog $rgb(0,%dify,75) 2 %dify 131
    drawdot -r @Katalog $rgb(25,%dify,75) 2 %dify 134
    drawdot -r @Katalog $rgb(50,%dify,75) 2 %dify 137
    drawdot -r @Katalog $rgb(75,%dify,75) 2 %dify 140
    drawdot -r @Katalog $rgb(100,%dify,75) 2 %dify 143
    drawdot -r @Katalog $rgb(125,%dify,75) 2 %dify 146
    drawdot -r @Katalog $rgb(150,%dify,75) 2 %dify 149
    drawdot -r @Katalog $rgb(175,%dify,75) 2 %dify 152
    drawdot -r @Katalog $rgb(200,%dify,75) 2 %dify 155
    drawdot -r @Katalog $rgb(225,%dify,75) 2 %dify 158
    drawdot -r @Katalog $rgb(250,%dify,75) 2 %dify 161
    drawdot -r @Katalog $rgb(0,%dify,0) 2 %dify 194
    drawdot -r @Katalog $rgb(25,%dify,0) 2 %dify 191
    drawdot -r @Katalog $rgb(50,%dify,0) 2 %dify 188
    drawdot -r @Katalog $rgb(75,%dify,0) 2 %dify 185
    drawdot -r @Katalog $rgb(100,%dify,0) 2 %dify 182
    drawdot -r @Katalog $rgb(125,%dify,0) 2 %dify 179
    drawdot -r @Katalog $rgb(150,%dify,0) 2 %dify 176
    drawdot -r @Katalog $rgb(175,%dify,0) 2 %dify 173
    drawdot -r @Katalog $rgb(200,%dify,0) 2 %dify 170
    drawdot -r @Katalog $rgb(225,%dify,0) 2 %dify 167
    drawdot -r @Katalog $rgb(250,%dify,0) 2 %dify 164
    drawdot -r @Katalog $rgb(%dify,%dify,15) 2 %dify 227
    drawdot -r @Katalog $rgb(%dify,%dify,20) 2 %dify 224
    drawdot -r @Katalog $rgb(%dify,%dify,35) 2 %dify 221
    drawdot -r @Katalog $rgb(%dify,%dify,45) 2 %dify 218
    drawdot -r @Katalog $rgb(%dify,%dify,60) 2 %dify 215
    drawdot -r @Katalog $rgb(%dify,%dify,70) 2 %dify 212
    drawdot -r @Katalog $rgb(%dify,%dify,85) 2 %dify 209
    drawdot -r @Katalog $rgb(%dify,%dify,95) 2 %dify 206
    drawdot -r @Katalog $rgb(%dify,%dify,105) 2 %dify 203
    drawdot -r @Katalog $rgb(%dify,%dify,130) 2 %dify 200
    drawdot -r @Katalog $rgb(%dify,%dify,140) 2 %dify 197
    drawdot -r @Katalog $rgb(%dify,%dify,0) 2 %dify 230
    drawdot -r @Katalog $rgb(%dify,%dify,25) 2 %dify 233
    drawdot -r @Katalog $rgb(%dify,%dify,50) 2 %dify 236
    drawdot -r @Katalog $rgb(%dify,%dify,75) 2 %dify 239
    drawdot -r @Katalog $rgb(%dify,%dify,100) 2 %dify 242
    drawdot -r @Katalog $rgb(%dify,%dify,125) 2 %dify 245
    drawdot -r @Katalog $rgb(%dify,%dify,150) 2 %dify 248
    drawdot -r @Katalog $rgb(%dify,%dify,175) 2 %dify 251
    drawdot -r @Katalog $rgb(%dify,%dify,200) 2 %dify 254
    drawdot -r @Katalog $rgb(%dify,%dify,225) 2 %dify 257
    drawdot -r @Katalog $rgb(%dify,$calc(%dify +2),$calc(%dify +2)) 2 %dify 260
    drawdot -r @Katalog $rgb(%dify,$calc(%dify +2),$calc(%dify +2)) 2 %dify 263
    inc %dify
  }
  cenk
}
alias cenk {
  drawrect -f @Katalog 0 2 12 270 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 17 272 0
  drawrect -f @Katalog 1 2 42 270 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 47 272 1 
  drawrect -f @Katalog 2 2 72 270 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 77 272 2
  drawrect -f @Katalog 3 2 102 270 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 107 272 3
  drawrect -f @Katalog 4 2 132 270 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 138 272 4 
  drawrect -f @Katalog 5 2 162 270 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 168 272 5
  drawrect -f @Katalog 6 2 192 270 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 198 272 6 
  drawrect -f @Katalog 7 2 222 270 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 228 272 7
  drawrect -f @Katalog 8 2 12 295 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 18 297 8 
  drawrect -f @Katalog 9 2 42 295 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 48 297 9 
  drawrect -f @Katalog 10 2 72 295 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 73 297 10 
  drawrect -f @Katalog 11 2 102 295 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 103 297 11 
  drawrect -f @Katalog 12 2 132 295 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 134 297 12 
  drawrect -f @Katalog 13 2 162 295 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 164 297 13 
  drawrect -f @Katalog 14 2 192 295 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 194 297 14 
  drawrect -f @Katalog 15 2 222 295 20 20 | drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 224 297 15
  drawrect -fr @Katalog $rgb(150,80,107) 1 10 325 264 600
  drawline @Katalog 1 2 1 322 260 322 
  drawline @Katalog 1 2 1 509 260 509
  drawrect -f @Katalog $color(background) 2 12 330 12 12 | drawtext @Katalog $color(background) Tahoma 11 30 330 Background
  drawrect -f @Katalog $color(listbox) 2 12 350 12 12 | drawtext @Katalog $color(listbox) Tahoma 11 30 350 Listbox
  drawrect -f @Katalog $color(treebar) 2 12 370 12 12 | drawtext @Katalog $color(treebar) Tahoma 11 30 370 Treebar
  drawrect -f @Katalog $color(quit) 2 12 390 12 12 | drawtext @Katalog $color(quit) Tahoma 11 30 390 Quit
  drawrect -f @Katalog $color(ctcp) 2 12 410 12 12 | drawtext @Katalog $color(ctcp) Tahoma 11 30 410 CTCP
  drawrect -f @Katalog $color(part) 2 12 430 12 12 | drawtext @Katalog $color(part) Tahoma 11 30 430 Part
  drawrect -f @Katalog $color(join) 2 12 450 12 12 | drawtext @Katalog $color(join) Tahoma 11 30 450 Join
  drawrect -f @Katalog $color(mode) 2 12 470 12 12 | drawtext @Katalog $color(mode) Tahoma 11 30 470 Mode
  drawrect -f @Katalog $color(kick) 2 12 490 12 12 | drawtext @Katalog $color(kick) Tahoma 11 30 490 Kick
  drawrect -f @Katalog $color(Normal) 2 90 330 12 12 | drawtext @Katalog $color(Normal) Tahoma 11 108 330 Normal
  drawrect -f @Katalog $color(Notice) 2 90 350 12 12 | drawtext @Katalog $color(Notice) Tahoma 11 108 350 Notice
  drawrect -f @Katalog $color(Whois) 2 90 370 12 12 | drawtext @Katalog $color(Whois) Tahoma 11 108 370 Whois
  drawrect -f @Katalog $color(Info2) 2 90 390 12 12 | drawtext @Katalog $color(Info2) Tahoma 11 108 390 Info2
  drawrect -f @Katalog $color(topic) 2 90 410 12 12 | drawtext @Katalog $color(topic) Tahoma 11 108 410 Topic
  drawrect -f @Katalog $color(wallops) 2 90 430 12 12 | drawtext @Katalog $color(wallops) Tahoma 11 108 430 Wallops
  drawrect -f @Katalog $color(Highlight) 2 90 450 12 12 | drawtext @Katalog $color(Highlight) Tahoma 11 108 450 Highlight
  drawrect -f @Katalog $color(Editbox) 2 90 470 12 12 | drawtext @Katalog $color(Editbox) Tahoma 11 108 470 Editbox
  drawrect -f @Katalog $color(Own) 2 90 490 12 12 | drawtext @Katalog $color(Own) Tahoma 11 108 490 Own
  drawrect -f @Katalog $color(Other) 2 163 330 12 12 | drawtext @Katalog $color(Other) Tahoma 11 180 330 Other
  drawrect -f @Katalog $color(Topic Text) 2 163 350 12 12 | drawtext @Katalog $color(Topic Text) Tahoma 11 180 350 Topic Text
  drawrect -f @Katalog $color(Editbox Text) 2 163 370 12 12 | drawtext @Katalog $color(Editbox Text) Tahoma 11 180 370 Editbox Text
  drawrect -f @Katalog $color(Listbox Text) 2 163 390 12 12 | drawtext @Katalog $color(Listbox Text) Tahoma 11 180 390 Listbox Text
  drawrect -f @Katalog $color(Title Text) 2 163 410 12 12 | drawtext @Katalog $color(Title Text) Tahoma 11 180 410 Title Text
  drawrect -f @Katalog $color(Action) 2 163 430 12 12 | drawtext @Katalog $color(Action) Tahoma 11 180 430 Action
  drawrect -f @Katalog $color(Treebar Text) 2 163 450 12 12 | drawtext @Katalog $color(Treebar Text) Tahoma 11 180 450 Treebar Text
  drawrect -f @Katalog $color(Gray Text) 2 163 470 12 12 | drawtext @Katalog $color(Gray Text) Tahoma 11 180 470 Gray Text
  drawrect -f @Katalog $color(Nick) 2 163 490 12 12 | drawtext @Katalog $color(Nick) Tahoma 11 180 490 Nick
  drawtext -r @Katalog $rgb(249,249,0) Script 15 85 510 Product by Difuzyon
}



menu @Katalog {
  sclick:{
    if %difycolor && $mouse.x isnum 1-246 && $mouse.y isnum 1-266 { 
      drawrect -fr @Katalog $getdot(@Katalog,$mouse.x,$mouse.y) 2 %difycolor 
      drawtext -r @Katalog $rgb(0,0,0) Fixedsys 9 $token(%difyfont,1-2,32) $token(%difyfont,3,32)
      color -r $token(%difyfont,3,32)
      color $token(%difyfont,3,32) $getdot(@Katalog,$mouse.x,$mouse.y)
      cenk 
    }
    if %difybox {
      if $inrect($mouse.x,$mouse.y,12,270,20,20) { color %difybox 0 }
      if $inrect($mouse.x,$mouse.y,42,270,20,20) { color %difybox 1 }
      if $inrect($mouse.x,$mouse.y,72,270,20,20) { color %difybox 2 }
      if $inrect($mouse.x,$mouse.y,102,270,20,20) { color %difybox 3 }
      if $inrect($mouse.x,$mouse.y,132,270,20,20) { color %difybox 4 }
      if $inrect($mouse.x,$mouse.y,162,270,20,20) { color %difybox 5 }
      if $inrect($mouse.x,$mouse.y,192,270,20,20) { color %difybox 6 }
      if $inrect($mouse.x,$mouse.y,222,270,20,20) { color %difybox 7 }
      if $inrect($mouse.x,$mouse.y,12,295,20,20) { color %difybox 8 }
      if $inrect($mouse.x,$mouse.y,42,295,20,20) { color %difybox 9 }
      if $inrect($mouse.x,$mouse.y,72,295,20,20) { color %difybox 10 }
      if $inrect($mouse.x,$mouse.y,102,295,20,20) { color %difybox 11 }
      if $inrect($mouse.x,$mouse.y,132,295,20,20) { color %difybox 12 }
      if $inrect($mouse.x,$mouse.y,162,295,20,20) { color %difybox 13 }
      if $inrect($mouse.x,$mouse.y,192,295,20,20) { color %difybox 14 }
      if $inrect($mouse.x,$mouse.y,222,295,20,20) { color %difybox 15 }
      cenk
    }
  }
  rclick: {
    if $inrect($mouse.x,$mouse.y,12,330,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 12 330 12 12 | set %difybox Background } 
    if $inrect($mouse.x,$mouse.y,12,350,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 12 350 12 12 | set %difybox Listbox } 
    if $inrect($mouse.x,$mouse.y,12,370,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 12 370 12 12 | set %difybox Treebar } 
    if $inrect($mouse.x,$mouse.y,12,390,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 12 390 12 12 | set %difybox Quit } 
    if $inrect($mouse.x,$mouse.y,12,410,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 12 410 12 12 | set %difybox CTCP } 
    if $inrect($mouse.x,$mouse.y,12,430,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 12 430 12 12 | set %difybox Part } 
    if $inrect($mouse.x,$mouse.y,12,450,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 12 450 12 12 | set %difybox Join } 
    if $inrect($mouse.x,$mouse.y,12,470,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 12 470 12 12 | set %difybox Mode } 
    if $inrect($mouse.x,$mouse.y,12,490,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 12 490 12 12 | set %difybox Kick } 
    if $inrect($mouse.x,$mouse.y,90,330,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 90 330 12 12 | set %difybox Normal } 
    if $inrect($mouse.x,$mouse.y,90,350,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 90 350 12 12 | set %difybox Notice } 
    if $inrect($mouse.x,$mouse.y,90,370,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 90 370 12 12 | set %difybox Whois } 
    if $inrect($mouse.x,$mouse.y,90,390,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 90 390 12 12 | set %difybox Info2 } 
    if $inrect($mouse.x,$mouse.y,90,410,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 90 410 12 12 | set %difybox Topic } 
    if $inrect($mouse.x,$mouse.y,90,430,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 90 430 12 12 | set %difybox Wallops } 
    if $inrect($mouse.x,$mouse.y,90,450,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 90 450 12 12 | set %difybox Highlight } 
    if $inrect($mouse.x,$mouse.y,90,470,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 90 470 12 12 | set %difybox Editbox } 
    if $inrect($mouse.x,$mouse.y,90,490,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 90 490 12 12 | set %difybox Own } 
    if $inrect($mouse.x,$mouse.y,163,330,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 163 330 12 12 | set %difybox Other } 
    if $inrect($mouse.x,$mouse.y,163,350,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 163 350 12 12 | set %difybox Topic Text } 
    if $inrect($mouse.x,$mouse.y,163,370,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 163 370 12 12 | set %difybox Editbox Text } 
    if $inrect($mouse.x,$mouse.y,163,390,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 163 390 12 12 | set %difybox Listbox Text } 
    if $inrect($mouse.x,$mouse.y,163,410,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 163 410 12 12 | set %difybox Title Text } 
    if $inrect($mouse.x,$mouse.y,163,430,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 163 430 12 12 | set %difybox Action } 
    if $inrect($mouse.x,$mouse.y,163,450,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 163 450 12 12 | set %difybox Treebar Text } 
    if $inrect($mouse.x,$mouse.y,163,470,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 163 470 12 12 | set %difybox Gray Text } 
    if $inrect($mouse.x,$mouse.y,163,490,12,12) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(246,246,246) 1 163 490 12 12 | set %difybox Nick } 
    if $inrect($mouse.x,$mouse.y,12,270,20,20) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(195,50,75) 1 12 270 20 20 | set %difycolor 12 270 20 20 | set %difyfont 17 272 0 }
    if $inrect($mouse.x,$mouse.y,42,270,20,20) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(195,50,75) 1 42 270 20 20 | set %difycolor 42 270 20 20 | set %difyfont 47 272 1 }
    if $inrect($mouse.x,$mouse.y,72,270,20,20) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(195,50,75) 1 72 270 20 20 | set %difycolor 72 270 20 20 | set %difyfont 77 272 2 }
    if $inrect($mouse.x,$mouse.y,102,270,20,20) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(195,50,75) 1 102 270 20 20 | set %difycolor 102 270 20 20 | set %difyfont 107 272 3 }
    if $inrect($mouse.x,$mouse.y,132,270,20,20) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(195,50,75) 1 132 270 20 20 | set %difycolor 132 270 20 20 | set %difyfont 137 272 4 }
    if $inrect($mouse.x,$mouse.y,162,270,20,20) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(195,50,75) 1 162 270 20 20 | set %difycolor 162 270 20 20 | set %difyfont 167 272 5 }
    if $inrect($mouse.x,$mouse.y,192,270,20,20) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(195,50,75) 1 192 270 20 20 | set %difycolor 192 270 20 20 | set %difyfont 197 272 6 }
    if $inrect($mouse.x,$mouse.y,222,270,20,20) { unset %dify* | cenk | drawrect -cr @Katalog $rgb(195,50,75) 1 222 270 20 20 | set %difycolor 222 270 20 20 | set %difyfont 227 272 7 }
    if $inrect($mouse.x,$mouse.y,12,295,20,20) { unset %dify* | cenk | drawrect -rc @Katalog $rgb(195,50,75) 1 12 295 20 20 | set %difycolor 12 295 20 20 | set %difyfont 17 297 8 }
    if $inrect($mouse.x,$mouse.y,42,295,20,20) { unset %dify* | cenk | drawrect -rc @Katalog $rgb(195,50,75) 1 42 295 20 20 | set %difycolor 42 295 20 20 | set %difyfont 47 297 9 }
    if $inrect($mouse.x,$mouse.y,72,295,20,20) { unset %dify* | cenk | drawrect -rc @Katalog $rgb(195,50,75) 1 72 295 20 20 | set %difycolor 72 295 20 20 | set %difyfont 74 297 10 }
    if $inrect($mouse.x,$mouse.y,102,295,20,20) { unset %dify* | cenk | drawrect -rc @Katalog $rgb(195,50,75) 1 102 295 20 20 | set %difycolor 102 295 20 20 | set %difyfont 104 297 11 }
    if $inrect($mouse.x,$mouse.y,132,295,20,20) { unset %dify* | cenk | drawrect -rc @Katalog $rgb(195,50,75) 1 132 295 20 20 | set %difycolor 132 295 20 20 | set %difyfont 134 297 12 }
    if $inrect($mouse.x,$mouse.y,162,295,20,20) { unset %dify* | cenk | drawrect -rc @Katalog $rgb(195,50,75) 1 162 295 20 20 | set %difycolor 162 295 20 20 | set %difyfont 164 297 13 }
    if $inrect($mouse.x,$mouse.y,192,295,20,20) { unset %dify* | cenk | drawrect -rc @Katalog $rgb(195,50,75) 1 192 295 20 20 | set %difycolor 192 295 20 20 | set %difyfont 194 297 14 }
    if $inrect($mouse.x,$mouse.y,222,295,20,20) { unset %dify* | cenk | drawrect -rc @Katalog $rgb(195,50,75) 1 222 295 20 20 | set %difycolor 222 295 20 20 | set %difyfont 224 297 15 }
  }
}
menu channel,status,nicklist {
  Renk Katalog:katalog
}
on *:close:@Katalog:unset %dify*