ok so this is my first script for chanserv commands its a dialog box put in remotes access it via menubar nicklist or the channel window let me know if you like it. updated it the first one had to be closed out to be used on each site cause it would only work on the site it was opened on. i fixed that problem though

.Venom Chanserv system.
.Coded  By.
.Ryan.

Menu Menubar,Nicklist,Channel {
  Chanserv System
  .VenomChanservSys: dialog $iif($dialog(Chanserv.System),-v,-md Chanserv.System) Chanserv.System 
}
Dialog Chanserv.System {
  Title "VenomChanservSystem"
  Size -1 -1 279 90
  Option dbu
  ;-----Mod Controls Tab 100
  Tab "+ Mod " ,100, 02 02 130 22, tab 100
  edit "enter nick ", 101, 02 29 41 10, autohs tab 100  
  Button "voice" 102, 02 40 41 15, flat tab 100
  edit "enter nick", 103, 02 62 41 10, autohs tab 100
  button "devoice ", 104, 02 74 37 15, flat tab 100
  edit "enter nick ", 105, 50 29 41 10, autohs tab 100
  Button "op " 106, 49 40 37 15, flat tab 100
  edit "enter nick ", 107, 50 62 41 10, autohs  tab 100
  button "deop ", 108, 49 74 37 15, flat tab 100
  edit "enter nick", 109, 97 29 41 10, autohs tab 100
  Button "halfop " 110, 96 40 37 15, flat tab 100
  edit "enter nick ", 111, 97 62 41 10, autohs tab 100
  button "dehalfop ", 112, 96 74 37 15, flat tab 100
  edit "enter nick ", 113, 145 29 41 10, autohs tab 100
  button "kick ", 114, 145 40 37 15, flat tab 100
  edit "enter nick ", 115, 145 62 41 10, autohs tab 100
  button "protect ", 116, 145 74 37 15, flat tab 100
  edit "enter nick ", 117, 190 29 41 10, autohs tab 100
  button "deprotect ", 118, 190 40 37 15, flat tab 100
  edit "pass then description ", 119, 190 62 41 10, autohs tab 100
  button "reg room ", 120, 190 74 37 15, flat tab 100
  edit "pass then email ", 121, 234 29 41 10, autohs tab 100
  button "reg nick ", 122, 233 40 37 15, flat tab 100
  edit "Drop what nick ", 123, 234 62 41 10, autohs tab 100
  button "Drop nick ", 124, 233 74 37 15, flat tab 100 
  ;-----Roomowner Tab 200
  Tab "+ Roomowner " ,200, 02 02 130 22, tab 200
  edit "enter nick ", 201, 02 29 41 10, autohs tab 200  
  Button "addvop" 202, 02 40 41 15, flat tab 200
  edit "enter nick", 203, 02 62 41 10, autohs tab 200
  button "delvop ", 204, 02 74 37 15, flat tab 200
  edit "enter nick ", 205, 50 29 41 10, autohs tab 200
  Button "addhop " 206, 49 40 37 15, flat tab 200
  edit "enter nick ", 207, 50 62 41 10, autohs  tab 200
  button "delhop ", 208, 49 74 37 15, flat tab 200
  edit "enter nick", 209, 97 29 41 10, autohs tab 200
  Button "addaop " 210, 96 40 37 15, flat tab 200
  edit "enter nick ", 211, 97 62 41 10, autohs tab 200
  button "delaop ", 212, 96 74 37 15, flat tab 200
  edit "enter nick ", 213, 145 29 41 10, autohs tab 200
  button "addsop ", 214, 145 40 37 15, flat tab 200
  edit "enter nick ", 215, 145 62 41 10, autohs tab 200
  button "delsop ", 216, 145 74 37 15, flat tab 200

}
on *:dialog:Chanserv.system:sclick:102:{
  if (!$did(101).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv voice $active $did(101).text } 
}
on *:dialog:Chanserv.system:sclick:104:{
  if (!$did(103).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv devoice $active $did(103).text } 
}
on *:dialog:Chanserv.system:sclick:106:{
  if (!$did(105).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv op $active $did(105).text } 
}
on *:dialog:Chanserv.system:sclick:108:{
  if (!$did(107).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv deop $active $did(107).text } 
}
on *:dialog:Chanserv.system:sclick:110:{
  if (!$did(109).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv halfop $active $did(109).text } 
}
on *:dialog:Chanserv.system:sclick:112:{
  if (!$did(111).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv dehalfop $active $did(111).text } 
}
on *:dialog:Chanserv.system:sclick:114:{
  if (!$did(113).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv kick $active $did(113).text } 
}
on *:dialog:Chanserv.system:sclick:116:{
  if (!$did(115).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv protect $active $did(115).text } 
}
on *:dialog:Chanserv.system:sclick:118:{
  if (!$did(117).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv deprotect $active $did(117).text } 
}
on *:dialog:Chanserv.system:sclick:120:{
  if (!$did(119).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv register $active $did(119).text } 
}
on *:dialog:Chanserv.system:sclick:122:{
  if (!$did(121).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg nickserv register $did(121).text } 
}
on *:dialog:Chanserv.system:sclick:124:{
  if (!$did(123).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg nickserv drop $did(123).text } 
}
on *:dialog:Chanserv.system:sclick:202:{
  if (!$did(201).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv vop $active add $did(201).text } 
}
on *:dialog:Chanserv.system:sclick:204:{
  if (!$did(203).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv vop $active del $did(203).text } 
}
on *:dialog:Chanserv.system:sclick:206:{
  if (!$did(205).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv hop $active add $did(205).text } 
}
on *:dialog:Chanserv.system:sclick:208:{
  if (!$did(207).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv hop $active del $did(207).text } 
}
on *:dialog:Chanserv.system:sclick:210:{
  if (!$did(209).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv aop $active add $did(209).text } 
}
on *:dialog:Chanserv.system:sclick:212:{
  if (!$did(211).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv aop $active del $did(211).text } 
}
on *:dialog:Chanserv.system:sclick:214:{
  if (!$did(213).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv sop $active add $did(213).text } 
}
on *:dialog:Chanserv.system:sclick:216:{
  if (!$did(215).text) { noop $input(Please enter text in box,udho,Error!) }
  else { scid $activecid .msg chanserv sop $active del $did(215).text } 
}