SpiralKinetics Flowers — File Browser

SpiralKineticsFlowersv1.0 / SpiralKineticsFlowersv1.0 / SKflowers / scripts / 00-flowers.mrc

00-flowers.mrc — 53.23 KB — Download this file

alias logo return 掳 13S6镁铆r盲拢 13K6铆帽猫t铆莽s 13F6拢酶w猫rs 掳
on *:start: {
  .inc %opens
  .splaystartup
  .down
  .titleicon
  .timer.Ram 0 2 bRam
  .timestamp -f (14HH:14nn:14ss)``
  .echo -s $str(--===--,10)
  .echo -s 
  .echo -s 1. The reproductive structure of some seed-bearing plants, characteristically having either specialized male or female organs or both male and female organs, such as stamens and a pistil, enclosed in an outer envelope of petals and sepals.
  .echo -s 2. Such a structure having showy or colorful parts; a blossom.
  .echo -s 3. A plant that is cultivated or appreciated for its blossoms.
  .echo -s 4. The condition or a time of having developed flowers: The azaleas were in full flower.
  .echo -s 5. Something, such as an ornament or a figure of speech, that resembles a flower in shape, fineness, or attractiveness.
  .echo -s 6. The period of highest development; the peak. See Synonyms at bloom1.
  .echo -s 7. The highest example or best representative: the flower of our generation.
  .echo -s 8. A natural development or outgrowth: "His attitude was simply a flower of his general good nature" (Henry James).
  .echo -s 9. flowers Chemistry A fine powder produced by condensation or sublimation of a compound.
  .echo -s 
  .echo -s $str(--===--,10)
  .echo -s 
  .echo 11 -s Thanks for using SpiralKinetics Flowers 
  .echo 11 -s You are using this script for ( %opens ) times
  .echo 11 -s Date: $date Day: $day Time: $time
  .echo 11 -s mIRC uptime: $uptime(mirc,1)
  .echo 11 -s System uptime: $uptime(system,1)
  .echo 11 -s Windows: $os
  .echo 11 -s Load Scripts: $script(0)
  .echo -s 
  .echo -s $str(--===--,10)
  .echo -s 
  .halt
}
raw 301:*: {
  echo -a 0潞路4away9:0 $3- 
  halt
}
raw 307:*: {
  echo -a 0潞路4registred9:0 Yes 
  halt
}
raw 309:*:{
  .echo -a 0潞路4language9:0 $3-
  halt
}
raw 310:*: {
  echo -a 0潞路4IRC helper9:0 Yes
  halt
}
raw 311:*: {
  echo -a 4-------------=[ /whois0 $2 4]=------------- 
  echo -a 0潞路4username9:0 $6-
  echo -a 0潞路4vhost9:0 $3 $+ 4@0 $+ $4 
  halt
}
raw 378:*: {
  echo -a 0潞路4localhost9:0 $6  
  echo -a 0潞路4IP9:0 $7 
  halt
}
raw 379:*: {
  echo -a 0潞路4usermodes9:0 $6- 
  halt
}
raw 671:*: {
  echo -a 0潞路4secure connection9:0 Yes 
  halt
}
raw 312:*: {
  echo -a 0潞路4network9:0 $network
  echo -a 0潞路4server9:0 $3 
  echo -a 0潞路4description9:0 $4- 
  halt
}
raw 313:*: {
  echo -a 0潞路4network rank9:0 $5-9 
  halt
}
raw 319:*: {
  echo -a 0潞路4channels9:0 $Replace($3-,~,4~14,&,4&4,@,4@14,%,4%14,+,2+14)
  halt
}
raw 317:*: {
  echo -a 0潞路4signed on9:0 $asctime($4,dddd mm/dd/yyyy HH:nn'tt) 
  echo -a 0潞路4idle9:0 $duration($3) 
  echo -a 0潞路4total online time9:0 $duration($calc($ctime - $4)) 
  halt
}
raw 334:*:{
  echo -a 0潞路4uprop9:0 $3-
  halt
}
raw 335:*: { 
  echo -a 0潞路4bot9:0 Yes
  halt
}
raw 318:*: {
  haltdef
  var %whois.Clones $ial($address($2,2),0)
  if (%whois.Clones > 1) {
    echo -a 0潞路4user9:0 $2 have $calc($ial($address($2,2),0) - 1) 4clones 0on $server 
    var %iee $ial($address($2,2),0)
    while %iee {
      if ($gettok($ial($address($2,2),%iee),1,33) != $2) {
        echo -a 0潞路4clone detected at9:14 $addtok($replace($ial($v1),!,$chr(40)),$chr(32),41)
      }
      dec %iee
    }
  }
  echo -a 4---------=[ end of /whois0 $2 4]=---------
}
dialog mamp {
  size -1 -1 221 342
  title "Flowers Mp3 player"
  playlist
  list 1,2 172 217 136,extsel size
  playlisttoolbar
  list 2,2 313 217 30, size
  nowplaying
  list 3,2 144 216 28,extsel size
  button "",11,0 0 0 0
  box "", 4, 1 136 219 175
  list 5,2 114 217 30, size
  box "", 6, 1 106 219 36
  list 7,2 80 217 30,size
  button "",8,2 2 200 73
  box "", 10, 1 305 219 36
  icon 13,202 57 16 16,$mircdirimage\volume.jpg,0
  icon 14,202 48 16 5,$mircdirimage\14.jpg,0 noborder
  icon 15,202 43 16 5,$mircdirimage\15.jpg,0 noborder
  icon 16,202 38 16 5,$mircdirimage\16.jpg,0 noborder
  icon 17,202 33 16 5,$mircdirimage\17.jpg,0 noborder
  icon 18,202 28 16 5,$mircdirimage\18.jpg,0 noborder
  icon 19,202 23 16 5,$mircdirimage\19.jpg,0 noborder
  icon 20,202 18 16 5,$mircdirimage\20.jpg,0 noborder
  icon 21,202 13 16 5,$mircdirimage\21.jpg,0 noborder
  icon 22,202 8 16 5,$mircdirimage\22.jpg,0 noborder
  icon 23,202 3 16 5,$mircdirimage\23.jpg,0 noborder
  box "", 12, 201 -4 19 59
}
on *:dialog:mamp:init:*:{
  mdx SetMircVersion $version
  mdx MarkDialog $dname
  mdx SetControlMDX $dname 1 ListView report noheader nosortheader single showsel > $mircdirdll\views.mdx
  mdx SetControlMDX $dname 2 Toolbar flat list wrap nodivider arrows > $mircdirdll\bars.mdx
  mdx SetControlMDX $dname 3 ListView  report noheader nosortheader single noscroll > $mircdirdll\views.mdx
  mdx SetControlMDX $dname 1000 MouseInput
  mdx SetControlMDX $dname 5 Toolbar flat list nodivider arrows > $mircdirdll\bars.mdx
  mdx SetControlMDX $dname 7 TrackBar autoticks > $mircdirdll\bars.mdx
  mdx SetControlMDX $dname 8 Window > $mircdirdll\dialog.mdx
  mdx SetBorderStyle $dname 2 
  mdx SetBorderStyle $dname 7 
  mdx SetBorderStyle $dname 5 
  mdx SetBorderStyle $dname 3
  mdx SetBorderStyle $dname 1 
  mdx SetBorderStyle $dname 9
  did -i $dname 1 1 page event
  did -i $dname 1 1 getdrop 1
  mdx SetFont 3 12 700 tahoma
  mdx SetFont 1 12 400 tahoma
  mdx SetColor mamp 2 background $rgb(239,241,241)
  mdx SetColor mamp 5 background $rgb(239,241,241)
  did -i $dname 1 1 iconsize normal small
  did -i $dname 1 1 seticon normal 0, $+ $mircdiricons\mp3.ico
  did -i $dname 1 1 seticon normal 0, $+ $mircdiricons\volume.ico
  did -i $dname 1 1 headerdims 145 55
  did -i $dname 1 1 headertext Column $chr(9) $+ +r Column 2
  did -i $dname 2 1 bmpsize 16 16
  did -i $dname 2 1 setimage icon small $mircdiricons\wave_file.ico
  did -i $dname 2 1 setimage icon small $mircdiricons\folder_music.ico
  did -i $dname 2 1 setimage icon small $mircdiricons\folder_favorites.ico
  did -i $dname 2 1 setimage icon small $mircdiricons\text_file.ico
  did -i $dname 2 1 setimage icon small $mircdiricons\search.ico
  did -i $dname 2 1 setimage icon small $mircdiricons\recyclebin.ico
  did -i $dname 2 1 setimage icon small $mircdiricons\up.ico
  did -i $dname 2 1 setimage icon small $mircdiricons\down.ico
  did -a $dname 2 +a 1 $chr(32) $+ $chr(9) $+ Open file
  did -a $dname 2 +a 2 $chr(32) $+ $chr(9) $+ Open folder
  did -a $dname 2 +a 3 $chr(32) $+ $chr(9) $+ Open playlist
  did -a $dname 2 +a 4 $chr(32) $+ $chr(9) $+ Save playlist
  did -a $dname 2 +a 5 $chr(32) $+ $chr(9) $+ Search playlist
  did -a $dname 2 +a 6 $chr(32) $+ $chr(9) $+ delete selected file from playlist
  did -a $dname 2 +a 7 $chr(32) $+ $chr(9) $+ up
  did -a $dname 2 +a 8 $chr(32) $+ $chr(9) $+ down
  did -i $dname 3 1 headerdims 105 90
  did -i $dname 3 1 headertext Column $chr(9) $+ +r Column 2
  did -i $dname 3 1 iconsize normal small
  did -i $dname 3 1 seticon normal 0, $+ $mircdiricons\mp3.ico
  did -i $dname 3 1 seticon normal 0, $+ $mircdiricons\music.ico
  did -i $dname 3 2 0 $calc($did(mamp,1).lines - 1) 
  did -i $dname 5 1 bmpsize 16 16
  did -i $dname 5 1 setimage icon small $mircdiricons\prev.ico
  did -i $dname 5 1 setimage icon small $mircdiricons\play.ico
  did -i $dname 5 1 setimage icon small $mircdiricons\pause.ico
  did -i $dname 5 1 setimage icon small $mircdiricons\stop.ico
  did -i $dname 5 1 setimage icon small $mircdiricons\next.ico
  did -i $dname 5 1 setimage icon small $mircdiricons\volume.ico
  did -i $dname 5 1 setimage icon small $mircdiricons\mute.ico
  did -i $dname 5 1 setimage icon small $mircdiricons\unexpand.ico
  did -i $dname 5 1 setimage icon small $mircdiricons\expand.ico
  did -i $dname 5 1 setbkg color $rgb(255,255,255)
  did -a $dname 5 +a 1 $chr(32) $+ $chr(9) $+ 
  did -a $dname 5 +a 2 $chr(32) $+ $chr(9) $+ 
  did -a $dname 5 +a 3 $chr(32) $+ $chr(9) $+ 
  did -a $dname 5 +a 4 $chr(32) $+ $chr(9) $+ 
  did -a $dname 5 +a 5 $chr(32) $+ $chr(9) $+ 
  did -a $dname 5 - 
  did -a $dname 5 +a 8 $chr(32) $+ $chr(9) $+ Hide playlist
  mdx SetDialog $dname icon 0 $mircdiricons\speaker.ico
  window -apdoC @mamp 0 0 115 53 
  did -a $dname 8 grab $window(@mamp).hwnd @mamp
  .echo -q $fmod(FMOD_Connect,$mircdirdll\fmod.dll)
  .echo -q $fmod(SOUND_Init,44100 64 0)
  .echo -q (plugin)load:                                 $fmod(Plugin_Load,2 " $+ $mircdirdll\fmm_vis_oscilloscope.dll $+ ")
  .echo -q (plugin)send: Oscilloscope Set_Dim:           $fmod(Plugin_Send,2 Set_Dim 0 20 200 30)
  .echo -q (plugin)send: Oscilloscope Set_Bgcolor:       $fmod(Plugin_Send,2 Set_Bgcolor 255/255/255)
  .echo -q (plugin)send: Oscilloscope on:                $fmod(Plugin_Send,2 Oscilloscope 1 1 @mamp 25)
  .echo -q (plugin)send: Oscilloscope Set_NumFades:      $fmod(Plugin_Send,2 Set_NumFades 10)
  .echo -q (plugin)send: Oscilloscope Set_NumColors:     $fmod(Plugin_Send,2 Set_NumColors 2)
  .echo -q (plugin)send: Oscilloscope Set_YSpace_Every:  $fmod(Plugin_Send,2 Set_YSpace_Every 0)
  .echo -q (plugin)send: Oscilloscope Set_YSpace_Height: $fmod(Plugin_Send,2 Set_YSpace_Height 0)
  .echo -q (plugin)send: Oscilloscope Set_BounceRate:    $fmod(Plugin_Send,2 Set_BounceRate 1.0)
  .echo -q (plugin)send: Oscilloscope color shifting on: $fmod(Plugin_Send,2 Set_CShift 1 2 1)
  if ($exists(C:\temp.mpd)) { 
    set %playlistfile C:\temp.mpd
    if (*.mpd iswm %playlistfile) {
      var %wpl = 1
      did -r $dname 1
      while (%wpl <= $lines(%playlistfile)) { 
        did -a $dname 1 0 $+ $read(%playlistfile,%wpl)
        if (%wpl == $lines(%playlistfile))  { set %totaltime $read(%playlistfile,%wpl) | did -i $dname 3 2 0 2 $+(Playlist:",$calc($did(mamp,1).lines - 1),") $chr(9) $+ $duration($calc(%totaltime / 1000),3) }
        inc %wpl 
      }
    }
  }
  var %dids = 14,15,16,17,18,19,20,21,22,23
  did -g $dname $gettok(%dids,5-,44) $+(",$mircdirimage\blank.jpg,")
  vol -v 30000
  set %mamp.hide 8
}
on *:dialog:mamp:close:*:{
  writeplaylist temp.mpd
  .echo -q (plugin)send: Oscilloscope off:                 $fmod(Plugin_Send,2 Oscilloscope 0)
  .echo -q (plugin)send: Oscilloscope color shifting off:  $fmod(Plugin_Send,2 Set_CShift 0)
  .echo -q (plugin)unload: Oscilloscope:                   $fmod(Plugin_UnLoad,2)
  stopfile
  .timervis off
  unset %totaltime
}
on *:dialog:mamp:sclick:7:{
  .timerMP3 -p
  if ( track isin $did(7,1)) { set %timeS $gettok($did(7,1),1,32) }
  if ( $gettok($did(7,1),9,32) == end ) {
    set %cool $gettok($did(7,1),1,32)
    set %timeS $gettok($did(7,1),1,32)
    set %timeS2 $round($calc($calc(%timetotal2 / 100) * %cool),0)
    .echo -q $fmod(SOUND_Stream_SetTime,1,$calc(%timeS * 1000))
    did -i mamp 7 1 params %timeS * %tracker.lenght2 * * * * *
    .timerMP3 -r
  }
}
on *:dialog:mamp:sclick:5: { 
  if ($did(5).sel == 2 ) {
    if (%mamp.fip.id <= 2 ) { return }
    else {
      stopfile
      set %mamp.fip.id $calc(%mamp.fip.id - 1)
      set %mamp.fip $gettok($did(mamp,1,%mamp.fip.id),2,4)
      did -c mamp 1 %mamp.fip.id 
      if ( 0* !iswm $fmod(SOUND_Stream_Open,1 $+(",%mamp.fip,") 1 $file(%mamp.fip).size 0)) {
        .echo -q $fmod(SOUND_Stream_Open,1 $+(",%mamp.fip,") 1 $file(%mamp.fip).size 0)
        .echo -q $fmod(SOUND_Stream_Play,1 1)
        set %mamp.x.pos 1
        set %tracker.length $fmod(SOUND_Stream_GetLengthMs,1)
        .timerMP3 0 1 timeMp3
        .timervisdelay 1 1 .timervis -h 0 20 vis
      }
      else { 
        did -i $dname 1 %mamp.fip.id  $replace($did(1,%mamp.fip.id - 1)),+,+c)
        did -d $dname 1 %mamp.fip.id 
        did -c mamp 1 %mamp.fip.id 
      }
    }
  }
  if ($did(5).sel == 3 ) {
    if ($did(1).sel > 1 )  {
      stopfile
      if ( 0* !iswm $fmod(SOUND_Stream_Open,1 $+(",%mamp.fip,") 1 $file(%mamp.fip).size 0)) {
        .echo -q $fmod(SOUND_Stream_Open,1 $+(",%mamp.fip,") 1 $file(%mamp.fip)).size 0)
        .echo -q $fmod(SOUND_Stream_Play,1 1)
        set %tracker.length $fmod(SOUND_Stream_GetLengthMs,1)
        set %mamp.x.pos 1
        .timerMP3 0 1 timeMp3
        .timervisdelay 1 1 .timervis -h 0 20 vis
      }
    }
    else { 
      did -i $dname 1 $did(1).sel $replace($did(1,%mamp.fip.id),+,+c)
      did -d $dname 1 $calc($did(1).sel + 1)
      did -c mamp 1 $calc($did(mamp,1).sel + 1 )
    }
  }
  if ($did(5).sel == 4 ) { 
    if (!%mnamp.paused) { 
      set %mnamp.paused 1
      .echo -q $fmod(SOUND_SetPaused,-3,1)
      did -o $dname 5 4 +pa 3 Paused $chr(32) $chr(9) $+ Paused
      .timerMP3 -p
      mampboxes
      halt
    }
    if (%mnamp.paused) { 
      unset %mnamp.paused 1
      .echo -q $fmod(SOUND_SetPaused,-3,0)
      did -o $dname 5 4 +a 3 $chr(32) $chr(9) $+ Paused
      .timerMP3 -r
      mampboxes
    }
  }
  if ($did(5).sel == 5 ) { stopfile } 
  if ($did(5).sel == 6 ) {
    stopfile
    nextfile
  }
  if (%mnamp.paused) && ($did != 4) { 
    unset %mnamp.paused 1
    did -o $dname 5 4 +a 3 $chr(32) $chr(9) $+ Pause
    .timerMP3 -r
  }
  if ($did(5).sel == 8 ) {
    set %mamp.hide $iif(%mamp.hide == 8,9,8)
    did -o $dname 5 8 %mamp.hide $chr(32) $+ $chr(9) $+ $iif(%mamp.hide == 8,Hide playlist,Show playlist)
    did $iif(%mamp.hide == 9,-h,-v) mamp 1,2,3,4,10
    mdx SetDialog mamp coords * * 221 $iif(%mamp.hide == 9,144,342)
    ;dialog -ps mamp mamp -1 -1 221 $iif(%mamp.hide == 9,120,34)
    mampboxes
  }
}
on *:dialog:mamp:sclick:1: { 
  if (rclick* iswm $did(1,1)) { popup1 }
}
on *:dialog:mamp:dclick:1: {
  if ($did(1).sel > 1 )  {
    stopfile
    if ( 0* !iswm $fmod(SOUND_Stream_Open,1 $+(",$gettok($did(1,$did(1).sel),2,4),") 1 $file($gettok($did(mamp,1,$did(1,$did(1).sel)),2,4)).size 0)) {
      set %mamp.fip $gettok($did(mamp,1,$did(mamp,1).sel),2,4)
      set %mamp.fip.id $did(1).sel
      .echo -q $fmod(SOUND_Stream_Open,1 $+(",%mamp.fip,") 1 $file(%mamp.fip)).size 0)
      .echo -q $fmod(SOUND_Stream_Play,1 1)
      set %tracker.length $fmod(SOUND_Stream_GetLengthMs,1)
      set %mamp.x.pos 1
      .timerMP3 0 1 timeMp3
      .timervisdelay 1 1 .timervis -h 0 20 vis
    }
    else { 
      did -i $dname 1 $did(1).sel $replace($did(1,$did(1).sel),+,+c)
      did -d $dname 1 $calc($did(1).sel + 1)
      did -c mamp 1 $calc($did(mamp,1).sel + 1 )
    }
  }
}
on *:dialog:mamp:sclick:14,15,16,17,18,19,20,21,22,23: { 
  var %dids 14,15,16,17,18,19,20,21,22,23
  did -g $dname $gettok(%dids,$+($findtok(%dids,$did,1,44),-),44) $+(",$mircdirimage\blank.jpg,")
  tokenize 44 $gettok(%dids,$+(1-,$findtok(%dids,$did,1,44)),44)
  readdvol $*
  vol -v $calc(5955 * $findtok(%dids,$did,1,44))
  mampboxes
}
on *:dialog:mamp:sclick:13: { 
  set %mamp.mute $iif(%mamp.mute,0,1)
  did -g $dname 13 $iif(%mamp.mute,$+(",$scriptdirgfx\mute.jpg,"),$+(",$mircdirimage\volume.jpg,"))
  if (%mamp.mute == 1) { set %mamp.vol $vol(master) | vol -v 0 }
  if (%mamp.mute == 0) { vol -v %mamp.vol | unset %mamp.vol }
  mampboxes
}
on *:dialog:mamp:sclick:2: {
  if ($did(2).sel == 2 ) { 
    set %filepath $shortfn($sfile(%lastdir,select an mp3,OK!))
    set %lastdir $nofile(%filepath)
    if (!%filepath) { set %filepath C:\ }
    if (!%lastdir) { set %lastdir C:\ }
    if ($gettok(%filepath,$numtok(%filepath,46),46) == mp3) { 
      addtolist %filepath
    }
  }
  if ($did(2).sel == 3 ) { 
    if (!%folder) { set %folder C:\ }
    set %folder $sdir(%folder,Select a folder NOTE: folders with over 1000 Mp3s is going to take a while before getting added mnIRC might be busy for a while just leave it be )
    if ($findfile(%folder,*.mp3,0) == 0 ) && (!%folder) { return }
    else {
      .echo -q $findfile(%folder,*.mp3,0,addtolist $1-).shortfn
    }
  }
  if ($did(2).sel == 5 ) {
    writeplaylist
  }
  if ($did(2).sel == 4 ) {
    set %playlistfile $sfile(%lastdir,open playlist <.mpd>)
    if (*.mpd iswm %playlistfile) {
      var %wpl 2
      did -r $dname 1
      while (%wpl <= $lines(%playlistfile)) { 
        did -a $dname 1 0 $+ $read(%playlistfile,%wpl)
        inc %wpl 
      }
      if (%wpl == $did(1).lines)  { did -o $dname 3 2 $+ $read(%playlistfile,%wpl) }
    }
  }
  if ($did(2).sel == 6 ) { mampsearch }
  if ($did(2).sel == 7 ) { 
    set %id $did(1).sel
    set %deletedfile $gettok($did(mamp,1,$did(mamp,1).sel),2,4))
    set %totaltime $calc(%totaltime - $sound(%deletedfile).length)
    did -d $dname 1 $did(1).sel 
    did -o $dname 3 2 0 2  $+(Playlist:",$calc($did(mamp,1).lines - 1),") $chr(9) $+ $duration($calc(%totaltime / 1000),3)
    did -c $dname 1 $did(1).sel 
    stopfile
    nextfile
  }
  if ($did(2).sel == 8 ) {  
    if ($did(1).sel != 1) { 
      if ( $calc($did(1).sel - 1) <= 1 ) { return }
      else { 
        set %id $did(1).sel
        if (%id != %mamp.fip.id) { 
          did -i $dname 1 $calc(%id - 1) $did(1,%id)
          did -d $dname 1  $calc(%id + 1)
        }
        else { 
          set %mamp.fip.id $calc(%mamp.fip.id - 1 )
          did -i $dname 1 $calc(%id - 1)  $did(1,%id )
          did -d $dname 1  $calc(%id + 1)
        }
      }
    }
  }
  if ($did(2).sel == 9 ) {  
    if ($did(1).sel != 1) { 
      if ( $calc($did(1).sel + 1) > $did(1).lines ) { return }
      else { 
        set %id $did(1).sel
        set %id $did(1).sel
        if (%id != %mamp.fip.id) { 
          did -i $dname 1 $calc(%id + 2) $did(1,%id)
          did -d $dname 1 %id 
        }
        else { 
          set %mamp.fip.id $calc(%mamp.fip.id + 1 )
          did -i $dname 1 $calc(%id + 2) $did(1,%id)
          did -d $dname 1 %id 
        }
      }
    }
  }
  mampboxes
}
dialog mampsearch {
  title "Search for Mp3's in list"
  size 1 1 217 225
  option pixels
  edit "", 6, 2 7 126 23
  list 1, 130 7 85 23, size
  list 2, 4 34 209 187, size
  box "", 7, 3 27 212 193
}
on *:dialog:mampsearch:sclick:1: { 
  if ($did(1).sel == 2 ) && ($did(6).text) { 
    if ($didwm(mamp,1,$+(*,$did(6),*),2) == 0 ) { 
      did -r $dname 2
      did -a $dname 2 0 1 No Files found matching
      did -a $dname 2 0 1 $did(6)
    }
    else { 
      set %msearch = 2  
      did -r $dname 2
      while ($didwm(mamp,1,$+(*,$did(6),*),%msearch) != 0 ) {
        did -a $dname 2 0 1 $remove($did(mamp,1,$didwm(mamp,1,$+(*,$did(6),*),%msearch)),+ 1 0 0, +fs 1 0 0)
        set %msearch $didwm(mamp,1,$+(*,$did(6),*),%msearch)
        set %msearch $calc(%msearch + 1)
      }
    }
  }
}
on *:dialog:mampsearch:dclick:2: { 
  set %mamp.fip.id $didwm(mamp,1,$+(*,$gettok($did(2,$did(2).sel),2,4),*),1)
  set %mamp.fip $gettok($did(2,$did(2).sel),2,4)
  stopfile
  if ( 0* !iswm $fmod(SOUND_Stream_Open,1 $+(",%mamp.fip,") 1 $file(%mamp.fip).size 0)) {
    .echo -q $fmod(SOUND_Stream_Open,1 $+(",%mamp.fip,") 1 $file(%mamp.fip)).size 0)
    .echo -q $fmod(SOUND_Stream_Play,1 1)
    set %tracker.length $fmod(SOUND_Stream_GetLengthMs,1)
    set %mamp.x.pos 1
    .timerMP3 0 1 timeMp3
    .timervisdelay 1 1 .timervis -h 0 20 vis
    did -c mamp 1 %mamp.fip.id
  }
  else { 
    did -i $dname 1 %mamp.fip.id $replace($did(1,%mamp.fip.id),+,+c)
    did -d $dname 1 $calc(%mamp.fip.id + 1)
    did -c mamp 1 $calc(%mamp.fip.id + 1 )
    nextfile
  }
}
on *:dialog:mampsearch:init:*:{
  mdx SetMircVersion $version
  mdx MarkDialog $dname
  mdx SetControlMDX $dname 2 ListView  report noheader nosortheader single > $mircdirdll\views.mdx
  mdx SetControlMDX $dname 1 Toolbar flat list wrap nodivider arrows > $mircdirdll\bars.mdx
  mdx SetBorderStyle $dname 1
  mdx SetBorderStyle $dname 4
  mdx SetBorderStyle $dname 2
  mdx SetColor $dname 4 background $rgb(239,241,241)
  mdx SetFont 1 12 400 tahoma
  mdx SetFont 4 12 400 tahoma
  mdx SetFont 2 12 400 tahoma
  mdx SetFont 6 12 400 tahoma
  did -i $dname 2 1 iconsize normal small
  did -i $dname 2 1 seticon normal 0, $+ $mircdiricons\mp3.ico
  did -i $dname 2 1 seticon normal 0, $+ $mircdiricons\volume.ico
  did -i $dname 2 1 headerdims 190
  did -i $dname 2 1 headertext Column
  did -i $dname 1 1 bmpsize 16 16
  did -i $dname 1 1 setimage icon small $mircdiricons\search.ico
  did -a $dname 1 +a 1 Search $+ $chr(9) $+ 
  mdx SetDialog $dname icon 0 $mircdiricons\search.ico
}
dialog Down {
  title "Down"
  size -1 -1 525 14
  option dbu
  list 1, 0 14 525 9, size
  text "Ram", 6, 3 18 10 8
  text "space", 7, 18 15 45 6
  text "Free: .....", 8, 18 21 50 6
  text "..%", 9, 68 15 10 7, nowrap
  text "..%", 10, 68 21 10 7, nowrap
  box "", 22, 82 15 1 13
  text "Cpu", 11, 86 18 9 8
  text "space", 12, 98 17 40 8
  box "", 20, 142 15 1 13
  text "BW", 24, 145 18 8 8
  text "Dw:", 13, 155 15 9 5
  text "Up:", 14, 155 22 9 6
  text "space", 15, 166 15 40 6
  text "space", 16, 166 22 40 6
  text "..Kbs", 17, 209 15 10 6, nowrap
  text "..Kbs", 18, 209 22 10 6, nowrap
  box "", 21, 222 14 1 13
  text "Uptime", 25, 226 18 16 8
  text "mIRC:", 26, 245 15 11 5
  text "Comp:", 27, 245 22 11 6
  text "", 28, 259 15 37 5, nowrap
  text "", 29, 259 22 37 6, nowrap
  box "", 30, 300 14 1 13
  text "Stat", 31, 304 18 10 8
  text "Serv:", 32, 316 15 11 5
  text "Lags:", 33, 316 22 11 6
  text "", 34, 330 15 40 5, nowrap
  text "", 35, 330 22 40 6, nowrap
  text "Away:", 36, 373 15 10 5
  text "Mode:", 37, 373 22 10 6
  text "", 38, 385 15 70 5, nowrap
  text "", 39, 385 22 70 6, nowrap
  list 40, 0 0 400 9, size

}
on *:ACTIVE:*:{ 
  did -ra Down 34 $server 
  did -ra Down 39 $usermode 
  did -ra Down 38 $away 
} 
on 1:SIGNAL:cpuMonitoring: { did -ra Down 12 $1 0 100 }
on *:ctcpreply:meter &: {
  set %lags $calc(($ticks -$2) / 1000),-3)
  did -ra Down 35 %lags `` s猫莽s
}
on *:dialog:Down:init:*: {
  mdx SetMircVersion $version 
  mdx MarkDialog $dname 
  mdx SetControlMDX $dname 1,40 toolbar arrows flat wrap nodivider list Bars > $mircdir\dll\BARS.MDX
  mdx SetControlMDX $dname 7,12,15,16 ProgressBar horizontal smooth > $mircdir\dll\CTL_GEN.MDX
  mdx SetColor $dname 1,6,7,8,9,10,11,12,13,14,15,16,17,18,24,25,26,27,28,29,31,32,33,34,35,36,37,38,39,40 background $color(10)
  mdx SetColor $dname 1,6,7,8,9,10,11,12,13,14,15,16,17,18,24,25,26,27,28,29,31,32,33,34,35,36,37,38,39 textbg $color(10)
  mdx SetColor $dname 1,7,8,9,10,12,13,14,15,16,17,18,26,27,32,33,36,37 text $color(0)
  mdx SetColor $dname 6,11,24,25,28,29,31,34,35,38,39 text $color(3)
  mdx SetColor $dname 1 textbg $color(10)
  mdx SetDialog $dname bgcolor $color(10)
  mdx SetDialog $dname style noborder
  mdx SetFont 1,40 12 700 Tahoma 
  mdx SetFont 9,10,8,17,18,28,29,34,35,38,39 11 500 Tahoma 
  mdx SetFont 13,14,26,27,32,33,36,37 11 400 Arial
  mdx SetFont 2,6,11,24,25,31 12 600 Arial
  mdx SetBorderStyle $dname 40
  did -i $dname 40 1 bmpsize 18 18
  did -i $dname 40 1 setimage +nhd 0 icon small $mircdiricons\03.ico
  did -i $dname 40 1 setimage +nhd 0 icon small $mircdiricons\chan.ico
  did -i $dname 40 1 setimage +nhd 0 icon small $mircdiricons\wave_file.ico
  did -i $dname 40 1 setimage +nhd 0 icon small $mircdiricons\bfav.ico
  did -i $dname 40 1 setimage +nhd 0 icon small $mircdiricons\folder_favorites.ico
  did -i $dname 40 1 setimage +nhd 0 icon small $mircdiricons\text_file.ico
  did -i $dname 40 1 setimage +nhd 0 icon small $mircdiricons\rshelp.ico
  did -i $dname 40 1 setimage +nhd 0 icon small $mircdiricons\input.ico
  did -i $dname 40 1 setimage +nhd 0 icon small $mircdiricons\away.ico
  did -a $dname 40 +Wa 25 1 $chr(32) Smile $chr(9) Flowers Icon Smile
  did -a $dname 40 -
  did -a $dname 40 +Wa 25 2 $chr(32) L Chan $chr(9) Flowers List Channel
  did -a $dname 40 -
  did -a $dname 40 +Wa 25 3 $chr(32) Mp3 $chr(9) Flowers Mp3 Player
  did -a $dname 40 -
  did -a $dname 40 +Wa 25 4 $chr(32) Browser $chr(9) Flowers Browser
  did -a $dname 40 -
  did -a $dname 40 +Wa 25 5 $chr(32) mIRCdir $chr(9) Flowers Dir Folder mIRC
  did -a $dname 40 -
  did -a $dname 40 +Wa 25 6 $chr(32) Notepad $chr(9) Flowers Run Notepad.txt
  did -a $dname 40 -
  did -a $dname 40 +Wa 25 7 $chr(32) RShelp $chr(9) Flowers Command.Help System
  did -a $dname 40 -
  did -a $dname 40 +Wa 25 8 $chr(32) Input $chr(9) Flowers Input Dialog
  did -a $dname 40 -
  did -a $dname 40 +Wa 25 9 $chr(32) Away $chr(9) Flowers Away System
  did -a $dname 40 -
  .timer 1 0 xdock -m $dialog($dname).hwnd +b
  .Cpu
} 
on *:dialog:Down:sclick:40: {
  var %click $did($dname,40).sel
  if (%click == 2) { .splayclick | .icon.smile }
  if (%click == 4) { .splayclick | .icon.input }
  ;if (%click == 4) { .splayclick | .scid $activecid /list }
  if (%click == 6) { .splayclick | .mamp }
  if (%click == 8) { .splayclick | .sk.Browser }
  if (%click == 10) { .splayclick | .run $mircdir }
  if (%click == 12) { .splayclick | .run $mircdir\notepad.txt }
  if (%click == 14) { .splayclick | .rshelp }
  if (%click == 16) { .splayclick | .inputlist }
  if (%click == 18) { .splayclick | .awaydialog }
}
On *:dialog:browser:init:0:{ 
  mdx SetMircVersion $version
  mdx MarkDialog $dname
  wfx SetStyle $dialog(browser) > notitle staticedge   
  mdx SetDialog $dname style noborder
  mdx SetControlMDX $dname 1,3 ToolBar arrows flat wrap nodivider list Bars > $mircdirdll\bars.mdx
  mdx SetBorderStyle $dname 1,3 windowedge
  wfx SetChild @SK.Browser > $dialog(browser) 
  did -fc $dname 2 2 
  mdx SetFont $dname 1,3 14 100 Tahoma 
  mdx SetDialog $dname bgcolor $color(14)
  mdx SetColor $dname 1,2,3 background $color(14)
  mdx SetColor $dname 1,2,3 textbg $color(14)
  mdx SetControlMDX $dname 4 ProgressBar horizontal smooth > $mircdirdll\ctl_gen.mdx
  did -i $dname 1,3 1 bmpsize 16 16 
  did -i $dname 1 1 setimage +nhd 0 icon small $mircdiricons\bback.ico
  did -i $dname 1 1 setimage +nhd 0 icon small $mircdiricons\bforward.ico
  did -i $dname 1 1 setimage +nhd 0 icon small $mircdiricons\bstop.ico
  did -i $dname 1 1 setimage +nhd 0 icon small $mircdiricons\brefresh.ico
  did -i $dname 1 1 setimage +nhd 0 icon small $mircdiricons\01.ico
  did -i $dname 3 1 setimage +nhd 0 icon small $mircdiricons\bgo.ico
  did -i $dname 3 1 setimage +nhd 0 icon small $mircdiricons\bfav.ico
  did -i $dname 3 1 setimage +nhd 0 icon small $mircdiricons\bclose.ico
  did -a $dname 1 +a 1 Back $chr(9) $+ Previous Page
  did -a $dname 1 +a 2 Forward $chr(9) $+ Next Page 
  did -a $dname 1 + -
  did -a $dname 1 +W 25 3 Stop $chr(9) Stop
  did -a $dname 1 +W 25 4 Refresh $chr(9) Relode The Page
  did -a $dname 1 + -
  did -a $dname 1 +W 25 5 Home $chr(9) Home Page
  did -a $dname 3 +a 1 Go! $chr(9) Navigate $did($dname,2).seltext
  did -a $dname 3 + -
  did -a $dname 3 +a 2 Favorites $chr(9) Open Favorites
  did -a $dname 3 + -
  did -a $dname 3 +a 3 Close $chr(9) Close
  didtok browser 2 3 %cron.web
}
On *:dialog:browser:close:0:{ if ($window(@SK.Browser)) { window -c @SK.Browser } }
on *:dialog:browser:sclick:1:{
  var %click $did($dname,1).sel
  if (%click == 2) { .back $did(4) }
  if (%click == 3) { .fwd $did(4) }
  if (%click == 5) { .stop $did(4) }
  if (%click == 6) { .rfsh $did(4) }
  if (%click == 8) { .html navigate http://www.skirc.wordpress.com }
} 
on *:dialog:browser:sclick:2:{
  if ($did(2) != $null) { html navigate $did($dname,$did).seltext }
}
on *:dialog:browser:sclick:3:{
  var %click2 $did($dname,3).sel
  if ($left($did(2).text,1) == $CHR(35)) { join $did(browser,2).text }
  elseif ($left($did(2)..text,5) == http:) { .html navigate $did(browser,2).text }
  elseif ($left($did(2).text,4) == www.) { .html navigate $did(browser,2).text }
  elseif ($left($did(2).text,3) == status) { window -a "status window" }
  set %cron.web $addtok(%cron.web,$did(browser,2).text,3)
  didtok browser 2 3 %cron.web
  if (%click2 == 4) { .BM.fav }
  if (%click2 == 6) { .close.browser }
}
dialog browser {
  title "SpiralKinetics Web Explorer"
  size 0 0 $calc($window(-1).w + 5) -3
  option dbu
  list 1,0 1 122 6, size
  combo 2, 119 1 95 80, size edit drop
  list 3,214 1 612 6, size
  text "", 4, 332 3 40 7
}
dialog BM.fav {
  title "List Favorites"
  size -1 -1 450 250
  icon $mircdiricons\01.ico
  box "", 3,0 -4 449 226
  list 8,4 22 440 193, size
  list 7,-1 226 310 5
  Text "SpiralKinetics Browser",9,325 230 105 12, disable center
}
on *:dialog:BM.fav:init:*:{
  var %ic = $mircdiricons\ok.ico
  mdx SetMircVersion $version
  mdx MarkDialog $dname
  mdx SetControlMDX $dname 8 Listview single report rowselect > $mircdirdll\views.mdx
  did -i $dname 8 1 headerdims 520:1
  did -i $dname 8 1 headertext Favorite Links $chr(9) Name $chr(9) Quote
  did -i $dname 8 1 iconsize normal small 
  did -i $dname 8 1 seticon normal %ic
  mdx SetControlMDX $dname 7 ToolBar list arrows flat nodivider > $mircdirdll\bars.mdx
  mdx SetBorderStyle 7
  mdx SetFont 2,7,8 13 700 Tahoma 

  did -i $dname 7 1 bmpsize 16 16
  did -i $dname 7 1 setimage +nhd 0 icon small $mircdiricons\ok.ico
  did -i $dname 7 1 setimage +nhd 0 icon small $mircdiricons\cancel.ico
  did -i $dname 7 1 setimage +nhd 0 icon small $mircdiricons\bclose.ico
  did -a $dname 7 + -
  did -a $dname 7 +W 90 1 $chr(160) Bookmark $+ $chr(9) $+ Bookmark Links
  did -a $dname 7 + -
  did -a $dname 7 +W 90 2 $chr(160) Delete $+ $chr(9) $+ Delete Links
  did -a $dname 7 + -
  did -a $dname 7 +W 90 3 $chr(160) Close $+ $chr(9) $+ Close
  did -a $dname 7 + -
  did -r BM.fav 8
  BM.web.fav
}
on *:dialog:BM.fav:sclick:*:{
  if ($did == 7) { 
    if ( $did(7).sel == 3 ) {
      if (!$read($+(",$mircdir\favorites.txt,"),nw,$+(*,$did(browser,2).text,*))) { 
        write $+(",$mircdir\favorites.txt,") $did(browser,2).text 
        did -r $dname 8
        BM.web.fav 
      } 
    }
    if ( $did(7).sel == 5 ) && ($did(BM.fav,8).sel) {
      var %e = $input( SpiralKinetics Browser $crlf $crlf Do you really want to delete the selected item from the list?,ywdg,Info Delete)
      if (%e == $false) { return }
      if (%e == $true) { 
        write -dl $+ $calc($did(8).sel - 1) $BM_web.fav
        did -d $dname 8 $did(8).sel
        ;did -r $dname 8
      }
    }
    if ( $did(7).sel == 7 ) { dialog -x BM.fav BM.fav }
  }
}
on *:dialog:BM.fav:dclick:*:{
  if ($did == 8) {
    if (!$did(8).sel) { halt }
    if (!$window(@SK.Browser)) {
      sk.Browser on
      html navigate $read($BM_web.fav,$calc($did(BM.fav,8).sel -1))
    } 
    else { html navigate $read($BM_web.fav,$calc($did(BM.fav,8).sel -1))
    }
  }
}
on *:text:*:#: {
  set -u5 %ytc # 
  if ($regex($1-,facebook.com)) { .flash | .echo -a $timestamp ***FACEBOOK at Chan %ytc Text: $1- | .halt }
  if ($regex($1-,fbcdn-sphotos-a.akamaihd.net)) { .flash | .echo -a $timestamp ***FACEBOOK PIC at Chan %ytc Text: $1- | .halt }
  if (!%yt) {
    if ($regex($1-,youtube.com|youtu.be)) { .set %linksyt $1- | .set -u15 %yt $gettok($gettok($remove($1-,watch?v=),3-,47),1,32)  }
    if (%yt) {
      if ($sock(yt)) { sockclose yt  }
      sockopen yt www.youtube.com 80 
      .halt
    } 
  }
  if ($regex($1-,http)) { .flash | .echo -a $timestamp ***LINK HTTP at Chan %ytc Text: $1- | .halt }
}
on *:sockopen:yt:{
  sockwrite -n $sockname GET /watch?v= $+ %yt HTTP/1.1
  sockwrite -n $sockname HOST: www.youtube.com $+ $str($crlf,3)
}
on *:sockread:yt:{
  var %v | sockread %v
  if (<meta name="title" content=" isin %v) {
    .flash
    ; msg %ytc 1,0 You0,4Tube  4Title: $remove(%v,<meta name="title" content=",">)
    echo -a $timestamp ***1,0 You 0,4 Tube  at Chan %ytc Title: $remove(%v,<meta name="title" content=",">) Text: %linksyt 
    sockclose $sockname
} }
dialog af {
  title "Flowers Query Control"
  size -1 -1 132 66
  option dbu
  button "Accept", 1, 6 48 37 12
  button "Decline", 2, 88 48 37 12
  button "Idling", 3, 47 48 37 12
  edit "", 4, 29 30 103 10
  edit "", 5, 5 20 127 10
  box "", 6, 7 1 110 12
  text "Query Control ", 7, 16 5 97 8
  text "From:", 8, 4 30 25 8
}
on *:dialog:af:sclick:1:{
  /window -w %qnick
  /msg %qnick $ewrap(I have accepted your message!)
  /dialog -x af
  /window -a %qnick
  /unset %qnick
}
on *:dialog:af:sclick:2:{
  close -m %qnick
  /msg %qnick $ewrap(I have declined your message!)
  /dialog -x af
  unset %qnick
}
on *:dialog:af:sclick:3:{
  close -m %qnick
  /msg %qnick $ewrap(Sorry.. Im either away or am busy!)
  /dialog -x af
  unset %qnick
}
on *:OPEN:?: {
  if (%isidleAway == on) {
    .msg $nick $ewrap(Sry But I AM Away Right Now!)
    close -m $nick
  }
  else {
    /set %qnick $nick
    /window -h %qnick
    /msg %qnick $ewrap(Please wait........)
    /dialog -m af af
    did -a af 4 %qnick
    did -a af 5 $1-
  }
}
dialog rshelp {
  title "Spiralkinetics Flowers Command.Help System"
  size -1 -1 204 232
  option dbu
  tab "NickServ", 1, 8 2 188 174
  button "Change Nick", 7, 12 20 37 10, tab 1
  button "Register", 8, 12 32 37 10, tab 1
  button "Group Nicks", 9, 12 44 37 10, tab 1
  button "Identify", 10, 12 56 37 10, tab 1
  button "Ghost", 14, 52 56 37 10, tab 1
  button "Release", 13, 52 44 37 10, tab 1
  button "Recover", 12, 52 32 37 10, tab 1
  button "Drop", 11, 52 20 37 10, tab 1

  box "Set", 15, 92 17 45 32, tab 1
  button "Password", 16, 96 24 37 10, tab 1
  button "Kill", 17, 96 36 37 10, tab 1

  box "Webchat", 115, 142 17 45 32, tab 1
  button "Register", 113, 146 24 37 10, tab 1
  button "Identify", 114, 146 36 37 10, tab 1

  tab "ChanServ", 2
  button "Register", 18, 12 20 37 10, tab 2
  button "Identify", 19, 12 32 37 10, tab 2
  button "Drop", 20, 12 44 37 10, tab 2
  button "Founder", 21, 64 24 37 10, tab 2
  button "Successor", 22, 64 36 37 10, tab 2
  button "Password", 23, 64 48 37 10, tab 2
  button "Description", 24, 64 60 37 10, tab 2
  button "URL", 25, 64 72 37 10, tab 2
  button "Email", 26, 64 84 37 10, tab 2
  button "Entry MSG", 27, 64 96 37 10, tab 2
  button "Keep Topic", 28, 64 108 37 10, tab 2
  button "Topic Lock", 29, 104 24 37 10, tab 2
  button "MLock", 30, 104 36 37 10, tab 2
  button "Restricted", 31, 104 48 37 10, tab 2
  button "Secure", 32, 104 60 37 10, tab 2
  button "Secure Ops", 33, 104 72 37 10, tab 2
  button "Securefounder", 34, 104 84 37 10, tab 2
  button "Op Notice", 35, 104 96 37 10, tab 2
  button "XOP", 36, 104 108 37 10, tab 2
  box "Set", 37, 60 17 85 104, tab 2
  button "Add", 38, 152 24 37 10, tab 2
  button "Delete", 39, 152 36 37 10, tab 2
  button "List", 40, 152 48 37 10, tab 2
  box "Aop", 41, 148 17 45 44, tab 2
  button "Add", 42, 152 68 37 10, tab 2
  button "Delete", 43, 152 80 37 10, tab 2
  button "List", 44, 152 92 37 10, tab 2
  box "Sop", 45, 148 61 45 44, tab 2
  button "Add", 46, 152 112 37 10, tab 2
  button "Delete", 47, 152 124 37 10, tab 2
  button "List", 48, 152 136 37 10, tab 2
  box "Vop", 49, 148 105 45 44, tab 2
  button "Add", 50, 16 64 37 10, tab 2
  button "Delete", 51, 16 76 37 10, tab 2
  button "List", 52, 16 88 37 10, tab 2
  box "Access", 53, 12 57 45 44, tab 2
  button "Add", 54, 16 108 37 10, tab 2
  button "Delete", 55, 16 120 37 10, tab 2
  button "List", 56, 16 132 37 10, tab 2
  box "Akick", 57, 12 101 45 44, tab 2
  button "Set", 58, 64 128 37 10, tab 2
  button "Disable", 59, 104 128 37 10, tab 2
  button "List", 60, 64 140 37 10, tab 2
  button "Reset", 61, 104 140 37 10, tab 2
  box "Levels", 62, 60 121 85 32, tab 2
  button "Ops", 63, 16 160 30 10, tab 2
  button "Users", 64, 48 160 30 10, tab 2
  button "Bans", 65, 80 160 30 10, tab 2
  button "Modes", 66, 112 160 30 10, tab 2
  button "Voices", 67, 144 160 30 10, tab 2
  box "Clear", 68, 12 153 165 20, tab 2
  tab "MemoServ", 3
  button "Send", 69, 12 20 37 10, tab 3
  button "Read", 70, 12 32 37 10, tab 3
  button "Limit", 71, 12 44 37 10, tab 3
  button "Cancel", 72, 12 56 37 10, tab 3
  button "Delete", 73, 12 68 37 10, tab 3
  tab "Bans", 4
  button "Ban Nick", 74, 12 20 37 10, tab 4
  button "Ban Ident", 75, 12 32 37 10, tab 4
  button "Ban Host", 76, 12 44 37 10, tab 4
  tab "Modes", 5
  button "+o", 77, 12 20 20 10, tab 5
  button "+v", 78, 12 32 20 10, tab 5
  button "+b", 79, 12 44 20 10, tab 5
  button "+m", 80, 12 56 20 10, tab 5
  button "+k", 81, 12 68 20 10, tab 5
  button "+c", 82, 12 80 20 10, tab 5
  button "+S", 83, 12 92 20 10, tab 5
  button "+l", 84, 12 104 20 10, tab 5
  button "-Mm", 112, 12 116 20 10, tab 5
  button "+s", 85, 36 20 20 10, tab 5
  button "+p", 86, 36 32 20 10, tab 5
  button "+t", 87, 36 44 20 10, tab 5
  button "+r", 88, 36 56 20 10, tab 5
  button "+R", 89, 36 68 20 10, tab 5
  button "+n", 90, 36 80 20 10, tab 5
  button "+e", 91, 36 92 20 10, tab 5
  button "+q", 92, 36 104 20 10, tab 5
  button "+a", 93, 60 20 20 10, tab 5
  button "+Q", 94, 60 32 20 10, tab 5
  button "+K", 95, 60 44 20 10, tab 5
  button "+V", 96, 60 56 20 10, tab 5
  button "+C", 97, 60 68 20 10, tab 5
  button "+H", 98, 60 80 20 10, tab 5
  button "+L", 99, 60 92 20 10, tab 5
  button "+I", 100, 60 104 20 10, tab 5
  button "+A", 101, 84 20 20 10, tab 5
  button "+0", 102, 84 32 20 10, tab 5
  button "+i Chan", 103, 84 44 24 10, tab 5
  button "+i Nick", 104, 84 56 24 10, tab 5
  button "+x Chan", 105, 84 68 24 10, tab 5
  button "+x Nick", 106, 84 80 24 10, tab 5
  button "+h Chan", 107, 84 92 24 10, tab 5
  button "+h Nick", 108, 84 104 24 10, tab 5
  button "+f Chan", 109, 108 20 24 10, tab 5
  button "+f Nick", 110, 108 32 24 10, tab 5
  edit "Please click on a button to see help info for that item.", 6, 7 184 190 33, multi
  button "Say", 111, 83 220 37 10
}
on *:DIALOG:rshelp:sclick:7:{ did -ra rshelp 6 To Change Your Nick Type: /nick NewNick }
on *:DIALOG:rshelp:sclick:8:{ did -ra rshelp 6 To register your nick Type: /msg nickserv register password validemail@host.com }
on *:DIALOG:rshelp:sclick:9:{ did -ra rshelp 6 To Your Current Nick To A Target Nick Type: /msg nickserv GROUP targetnick targetpassword }
on *:DIALOG:rshelp:sclick:10:{ did -ra rshelp 6 To identify to your nick Type: /msg nickserv identify password }
on *:DIALOG:rshelp:sclick:11:{ did -ra rshelp 6 To drop your nick you must be identified and Type: /msg nickserv drop }
on *:DIALOG:rshelp:sclick:12:{ did -ra rshelp 6 If someone else is using your nick Type: /msg nickserv recover nick password }
on *:DIALOG:rshelp:sclick:13:{ did -ra rshelp 6 To release your nickname from NickServ's 'hold' after too many incorrect passwords, or if it took you too long to identify or if you just used the recover command Type: /msg nickserv release nick password }
on *:DIALOG:rshelp:sclick:14:{ did -ra rshelp 6 To ghost your nick that is still on the server after a ping timeout or some other type of disconnection Type: /msg nickserv ghost nick password }
on *:DIALOG:rshelp:sclick:16:{ did -ra rshelp 6 To change the password on your nick Type: /msg nickserv set password NewPassword }
on *:DIALOG:rshelp:sclick:17:{ did -ra rshelp 6 To set a kill timer on your nick to give an alotted amount of time to identify to your nick to prevent imposters using your nick Type: /msg nickserv set kill on/quick/off }
on *:DIALOG:rshelp:sclick:113:{ did -ra rshelp 6 To register your nick, visit here: http://community.webmaster.com/register.php }
on *:DIALOG:rshelp:sclick:114:{ did -ra rshelp 6 To identify to your nick Type: /nick yournick password }
on *:DIALOG:rshelp:sclick:18:{ did -ra rshelp 6 To register a channel, you must have ops in the channel and it cannot already be registered. Type: /msg chanserv register #channel password description }
on *:DIALOG:rshelp:sclick:19:{ did -ra rshelp 6 To identify yourself as the channel founder Type: /msg chanserv identify #channel password }
on *:DIALOG:rshelp:sclick:20:{ did -ra rshelp 6 To drop your channel first you must identify as channel founder then Type: /msg chanserv drop #channel }
on *:DIALOG:rshelp:sclick:21:{ did -ra rshelp 6 To change the founder of a channel Type: /msg chanserv set #channel founder nick }
on *:DIALOG:rshelp:sclick:22:{ did -ra rshelp 6 To set a successor which becomes the founder if the founder's nick expires or is dropped Type: /msg chanserv set #channel successor nick }
on *:DIALOG:rshelp:sclick:23:{ did -ra rshelp 6 To change the password for a channel Type: /msg chanserv set #channel password NewPassword }
on *:DIALOG:rshelp:sclick:24:{ did -ra rshelp 6 To change the channel description Type: /msg chanserv set #channel desc Description }
on *:DIALOG:rshelp:sclick:25:{ did -ra rshelp 6 To set a URL to be associated with a channel Type: /msg chanserv set #channel URL http://url.here.com }
on *:DIALOG:rshelp:sclick:26:{ did -ra rshelp 6 To set an email to be associated with a channel Type: /msg chanserv set #channel email email@here.com }
on *:DIALOG:rshelp:sclick:27:{ did -ra rshelp 6 To set an entry message that users will see when joining the channel Type: /msg chanserv set #channel entrymsg message }
on *:DIALOG:rshelp:sclick:28:{ did -ra rshelp 6 To set the Keep Topic option which keeps the topic for the channel even if its empty Type: /msg chanserv set #channel keeptopic on }
on *:DIALOG:rshelp:sclick:29:{ did -ra rshelp 6 To lock the topic so it cannot be changed using the /topic command Type: /msg chanserv set #chanserv topiclock on/off (the /msg chanserv set #channel topic NewTopic command may still be used if TopicLock is on) }
on *:DIALOG:rshelp:sclick:30:{ did -ra rshelp 6 To lock certain modes on or off Type: /msg chanserv set #channel mlock +modes-modes }
on *:DIALOG:rshelp:sclick:31:{ did -ra rshelp 6 To restrict the use of the channel from all users except the founder Type: /msg chanserv set #channel restricted on/off }
on *:DIALOG:rshelp:sclick:32:{ did -ra rshelp 6 To activate ChanServ's security features which ensure a user must me registered and identified to gain access to the channel as their level on the access list allows Type: /msg chanserv set #channel secure on/off }
on *:DIALOG:rshelp:sclick:33:{ did -ra rshelp 6 To activate secure ops which prevents random op'ing in a channel Type: /msg chanserv set #channel secureops on/off }
on *:DIALOG:rshelp:sclick:34:{ did -ra rshelp 6 To ensure only the true channel founder can drop the channel, change the password, the founder or the successor and not just anyone who is identified to the channel through ChanServ Type: /msg chanserv set #channel securefounder on/off }
on *:DIALOG:rshelp:sclick:35:{ did -ra rshelp 6 To send a notice when the ChanServ op/deop command is used Type: /msg chanserv set #channel opnotice on/off }
on *:DIALOG:rshelp:sclick:36:{ did -ra rshelp 6 To activate the AOP, SOP, and VOP lists Type: /msg chanserv set #channel XOP on }
on *:DIALOG:rshelp:sclick:38:{ did -ra rshelp 6 To add a user to your channel Auto-Op list, the Chanserv XOp mode must be on. Type: /msg chanserv AOP #channel add user }
on *:DIALOG:rshelp:sclick:39:{ did -ra rshelp 6 To delete a user from your channel Auto-Op list, the Chanserv XOp mode must be on. Type: /msg chanserv AOP #channel del user }
on *:DIALOG:rshelp:sclick:40:{ did -ra rshelp 6 To list all users on the Auto-Op list, the Chanserv XOp mode must be on. Type: /msg chanserv AOP #channel list }
on *:DIALOG:rshelp:sclick:42:{ did -ra rshelp 6 To add a user to your channel Super-Op lis, the Chanserv XOp mode must be on. Type: /msg chanserv SOP #channel add user }
on *:DIALOG:rshelp:sclick:43:{ did -ra rshelp 6 To delete a user from your channel Super-Op list, the Chanserv XOp mode must be on. Type: /msg chanserv SOP #channel del user }
on *:DIALOG:rshelp:sclick:44:{ did -ra rshelp 6 To list all users on the Super-Op list, the Chanserv XOp mode must be on. Type: /msg chanserv SOP #channel list }
on *:DIALOG:rshelp:sclick:46:{ did -ra rshelp 6 To add a user to your channel Voice-Op list, the Chanserv XOp mode must be on. Type: /msg chanserv VOP #channel add user }
on *:DIALOG:rshelp:sclick:47:{ did -ra rshelp 6 To delete a user from your channel Voice-Op list, the Chanserv XOp mode must be on. Type: /msg chanserv VOP #channel del user }
on *:DIALOG:rshelp:sclick:48:{ did -ra rshelp 6 To list all users on the Voice-Op list, the Chanserv XOp mode must be on. Type: /msg chanserv VOP #channel list }
on *:DIALOG:rshelp:sclick:50:{ did -ra rshelp 6 To add a user to your channel access list Type: /msg chanserv access #channel add user level (the default levels settings vary from can be from -2 to 10, but can be changed using the ChanServ levels command) }
on *:DIALOG:rshelp:sclick:51:{ did -ra rshelp 6 To delete a user from your channel access Type: /msg chanserv access #channel del user }
on *:DIALOG:rshelp:sclick:52:{ did -ra rshelp 6 To list all users on the access list and their levels Type: /msg chanserv access #channel list }
on *:DIALOG:rshelp:sclick:54:{ did -ra rshelp 6 To set an akick Type: /msg chanserv akick #channel add user/ident/host reason }
on *:DIALOG:rshelp:sclick:55:{ did -ra rshelp 6 To remove a user from the channel akick list Type: /msg chanserv akick #channel del nick/ident/host -OR- /msg chanserv akick #channel del EntryNumber }
on *:DIALOG:rshelp:sclick:56:{ did -ra rshelp 6 To list all akick's for a channel Type: /msg chanserv akick #channel list }
on *:DIALOG:rshelp:sclick:58:{ did -ra rshelp 6 To change the levels setting for your channel Type: /msg chanserv levels #channel set type level }
on *:DIALOG:rshelp:sclick:59:{ did -ra rshelp 6 To disable a function to all users except the founder Type: /msg chanserv levels #channel disable type }
on *:DIALOG:rshelp:sclick:60:{ did -ra rshelp 6 To list your channel's current levels settings Type: /msg chanserv levels #channel list }
on *:DIALOG:rshelp:sclick:61:{ did -ra rshelp 6 To reset your channel's levels to the default level settings Type: /msg chanserv levels #channel reset }
on *:DIALOG:rshelp:sclick:63:{ did -ra rshelp 6 To remove +o from all users on your channel with operator status Type: /msg chanserv clear #channel ops }
on *:DIALOG:rshelp:sclick:64:{ did -ra rshelp 6 To remove all users from your channel Type: /msg chanserv clear #channel users }
on *:DIALOG:rshelp:sclick:65:{ did -ra rshelp 6 To remove all bans from your channel Type: /msg chanserv clear #channel bans }
on *:DIALOG:rshelp:sclick:66:{ did -ra rshelp 6 To remove all modes from your channel Type: /msg chanserv clear #channel modes }
on *:DIALOG:rshelp:sclick:67:{ did -ra rshelp 6 To remove +v from all users on your channel with voice-op status Type: /msg chanserv clear #channel voices }
on *:DIALOG:rshelp:sclick:69:{ did -ra rshelp 6 To send a memo your nick must be registered, Type: /msg memoserv send nick/channel Message }
on *:DIALOG:rshelp:sclick:70:{ did -ra rshelp 6 To read a memo Type: /msg memoserv read 1-5 }
on *:DIALOG:rshelp:sclick:71:{ did -ra rshelp 6 To set a limit to the amount of memos you can have at once Type: /msg memoserv set limit number }
on *:DIALOG:rshelp:sclick:72:{ did -ra rshelp 6 To cancel the last memo you sent Type: /msg memoserv cancle nick/channel }
on *:DIALOG:rshelp:sclick:73:{ did -ra rshelp 6 To delete a memo Type: /msg memoserv del 1-5 }
on *:DIALOG:rshelp:sclick:74:{ did -ra rshelp 6 To do a nick ban Type: /mode #channel +b nick (effective at only keeping a certain nick out of a channel, easiest to evade) }
on *:DIALOG:rshelp:sclick:75:{ did -ra rshelp 6 To do an ident ban Type: /mode #channel +b *!*ident@*.host.com (this is the most commonly used ban, will only ban the single user) }
on *:DIALOG:rshelp:sclick:76:{ did -ra rshelp 6 To do a host ban Type: /mode #channel +b *!*@*.host.com (this is the most effective ban, but it will ban all users with the same host) }
on *:DIALOG:rshelp:sclick:77:{ did -ra rshelp 6 The mode: +o is operator status, operators have the access to kick and ban users in that channel. To set Type: /mode #channel +o nick }
on *:DIALOG:rshelp:sclick:78:{ did -ra rshelp 6 The mode: +v is voice operator, if the channel is moderated(+m) voice ops can still talk, but do not have access to kicking and banning. To set Type: /mode #channel +v nick }
on *:DIALOG:rshelp:sclick:79:{ did -ra rshelp 6 The mode: +b is a ban, any nick/ident/host that is banned cannot join the channel. To set Type: /mode #channel +b BanType }
on *:DIALOG:rshelp:sclick:80:{ did -ra rshelp 6 The mode: +m is moderated, this mode allows only Voiced(+v) users and Op'ed(+o) users to talk in the channel. To set Type: /mode #channel +m }
on *:DIALOG:rshelp:sclick:81:{ did -ra rshelp 6 The mode: +k is channel key, if this mode is set the key must be used to joing the channel. To set Type: /mode #channel +k key. To join a channel with a key Type: /join #channel key }
on *:DIALOG:rshelp:sclick:82:{ did -ra rshelp 6 The mode: +c is color block, does not allow color to be used in the channel. Any messages with color text will be blocked }
on *:DIALOG:rshelp:sclick:83:{ did -ra rshelp 6 The mode: +S is color stripper, does not block any text just removes any color used. }
on *:DIALOG:rshelp:sclick:84:{ did -ra rshelp 6 The mode: +l is channel limit, allows only a certain amount of users in the channel. To set Type: /mode #channel +l number }
on *:DIALOG:rshelp:sclick:112:{ did -ra rshelp 6 The mode: -Mm is Umode Private Message, allows you to private message each other. To set Type: /umode -Mm }
on *:DIALOG:rshelp:sclick:85:{ did -ra rshelp 6 The mode: +s is secret, this mode hides your channel when a user uses the /list command. To set Type: /mode #channel +s }
on *:DIALOG:rshelp:sclick:86:{ did -ra rshelp 6 The mode: +p is private, this mode hides your channel from your /whois. To set Type: /mode #channel +p }
on *:DIALOG:rshelp:sclick:87:{ did -ra rshelp 6 The mode: +t is secure topic, only ops can change the topic. This mode is automatically set if the channel is registered. To set Type: /mode #channel +t }
on *:DIALOG:rshelp:sclick:88:{ did -ra rshelp 6 The mode: +r is registered channel, when a channel is registered the mode +r is set. }
on *:DIALOG:rshelp:sclick:89:{ did -ra rshelp 6 The mode: +R is registered nicks only, you must have a registered nick to join the channel. To set Type: /mode #channel +R }
on *:DIALOG:rshelp:sclick:90:{ did -ra rshelp 6 The mode: +n is no external messages, no messages may be sent to the channel from outside the channel using the (/msg #channel message) command. This mode is set automatically when the channel is registered. To set Type: /mode #channel +n }
on *:DIALOG:rshelp:sclick:91:{ did -ra rshelp 6 The mode: +e is ban exception, if this is set to a nick/ident/host, if the user is banned they may still enter the channel. To set Type: /mode #channel +e nick/ident/host }
on *:DIALOG:rshelp:sclick:92:{ did -ra rshelp 6 The mode: +q is channel founder, is set to any nick identified as the channel founder. }
on *:DIALOG:rshelp:sclick:93:{ did -ra rshelp 6 The mode: +a is autoop, the user is an auto-op on the channel and cannot be deoped by anyone except +q nicks. Can only be set by +q nicks without being on channel access. To set Type: /mode #channel +a nick }
on *:DIALOG:rshelp:sclick:94:{ did -ra rshelp 6 The mode: +Q disallows the use of the /kick command except by U:Lines, /ban is still available. To set Type: /mode #channel +Q }
on *:DIALOG:rshelp:sclick:95:{ did -ra rshelp 6 The mode: +K the /knock command is not allowed. To set Type: /mode #channel +K }
on *:DIALOG:rshelp:sclick:96:{ did -ra rshelp 6 The mode: +V dissalows the use of /invite to the channel. To set Type: /mode #channel +V }
on *:DIALOG:rshelp:sclick:97:{ did -ra rshelp 6 The mode: +C dissalows CTCP's in the channel. To set Type: /mode #channel +C }
on *:DIALOG:rshelp:sclick:98:{ did -ra rshelp 6 The mode: +H dissalows people with +I set to join the channel. To set Type: /mode #channel +H Can only be set by Administrators }
on *:DIALOG:rshelp:sclick:99:{ did -ra rshelp 6 The mode: +L is the overflow control, +l must be set, if the channel is full the channel2 will start. To set Type: /mode #channel +L }
on *:DIALOG:rshelp:sclick:100:{ did -ra rshelp 6 The mode: +I is total invisibility, you cannot me seen in the channel with this mode on. Requires the oper flag '^' to activate. To set Type: /mode nick +I }
on *:DIALOG:rshelp:sclick:101:{ did -ra rshelp 6 The mode: +A is Administrator only, to enter you must be an administrator on the server. This mode may only be set and seen by server administrators. To set Type: /mode #channel +A }
on *:DIALOG:rshelp:sclick:102:{ did -ra rshelp 6 The mode: +O is IRCop only, to enter you must be an IRCop or higher on the server. This mode can only be set by server administrators. To set Type: /mode #channel +O }
on *:DIALOG:rshelp:sclick:103:{ did -ra rshelp 6 The mode: +i is invite only, users must be invited in order to be allowed into the channel. To set Type: /mode #channel +i. To invite someone Type: /invite #channel nick }
on *:DIALOG:rshelp:sclick:104:{ did -ra rshelp 6 The mode +i is invisible, if a user uses the (/whois *) command, invisible users will not be shown. To set Type: /mode nick +i }
on *:DIALOG:rshelp:sclick:105:{ did -ra rshelp 6 The mode: +x does not ANSI color can be sent to the channel. To set Type: /mode #channel +x...This mode is now name +c on most servers. }
on *:DIALOG:rshelp:sclick:106:{ did -ra rshelp 6 The mode: +x is virtual host, most commonly used by LocOps and above, +x is _____.Server.Com and -x would be there normal host. To set Type: /mode nick +x }
on *:DIALOG:rshelp:sclick:107:{ did -ra rshelp 6 The mode: +h is half op, the user has the authority to kick but not ban. To set type /mode #channel +h nick }
on *:DIALOG:rshelp:sclick:108:{ did -ra rshelp 6 The mode: +h is HelpOp, allows the user to send and read HelpOp messages. }
on *:DIALOG:rshelp:sclick:109:{ did -ra rshelp 6 The mode: +f is flood protection, will kick a user if exceeds the ammount allowed. To set Type: /mode #channel +f line:second }
on *:DIALOG:rshelp:sclick:110:{ did -ra rshelp 6 The mode: +f allows the user to see anyone who gets disconnected with the Excess-Flood quit message. }
on *:DIALOG:rshelp:sclick:111:{ rshelpsay }