mIRC Home    About    Download    Register    News    Help

Print Thread
Page 2 of 2 1 2
Riamus2 #178541 11/06/07 02:29 PM
Joined: Dec 2002
Posts: 3,547
S
Hoopy frood
Offline
Hoopy frood
S
Joined: Dec 2002
Posts: 3,547
lol, I totally forgot about this thread, the only reason I said all yours was because I was getting ready for bed.

Joined: Oct 2004
Posts: 8,330
Hoopy frood
Offline
Hoopy frood
Joined: Oct 2004
Posts: 8,330
Yeah, so was I. That's why it took me until now to reply.


Invision Support
#Invision on irc.irchighway.net
Riamus2 #178546 11/06/07 02:48 PM
Joined: Aug 2006
Posts: 469
G
Garou Offline OP
Fjord artisan
OP Offline
Fjord artisan
G
Joined: Aug 2006
Posts: 469
Ok where do I put the alias get.popusn { in seperate remote?
Ok cool, here is wat I have, is it possible to also shorting the button call up?
I also get this error on loading the script:* /hload: insufficient parameters (line 190, dialog60.op)
this line here: if ($exists($scriptdir\popusn.hsh)) { hload $scriptdir\popusn.hsh }

[/code]
dialog popusn {
title "Settings"
size -1 -1 333 330
icon graphics\cfg.ico
TAB "OPS1",2, 0 0 330 425
TAB "OPS2",3
TAB "OPS3",4
TAB "OPS4",5
TAB "OPS5",6
TAB "OPS6",7
button "Userlist Settings", 70, 20 70 110 25,flat,tab 5
button "Display Settings", 71, 20 100 110 25,flat,tab 5
button "General Settings", 72, 20 130 110 25,flat,tab 5
button "Network Settings", 73, 20 160 110 25,flat,tab 5
button "Channel Protections", 74, 20 190 110 25,flat,tab 5
button "Vhost Scaner", 75, 190 70 110 25,flat,tab 5
button "Proxy Scaner", 76, 190 100 110 25,flat,tab 5
button "Sound Settings", 77, 190 130 110 25,flat,tab 5
button "Blacklist Trigger", 78, 190 160 110 25,flat,tab 5
button "Blacklist Settings", 79, 190 190 110 25,flat,tab 5
button "MP3 Player", 80, 20 70 110 25,flat,tab 6
button "Ignore List", 81, 20 100 110 25,flat,tab 6
button "Spy Settings", 82, 20 130 110 25,flat,tab 6
button "Whois Channel", 83, 20 160 110 25,flat,tab 6
button "Unwanted Text", 84, 190 40 110 25,flat,tab 5
button "Banned Channel", 85, 20 40 110 25,flat,tab 5
button "Screan Flood", 95, 20 40 110 25,flat,tab 6
button "Punctuation Flood", 96, 20 190 110 25,flat,tab 6
button "Private Spam", 94, 190 40 110 25,flat,tab 6
button "Personal Mode", 97, 190 70 110 25,flat,tab 6
button "CHANSERV", 92, 190 100 110 25,flat,tab 6
button "MENU INFO", 93, 190 130 110 25,flat,tab 6
button "Close", 12, 20 290 295 25,flat, cancel
check "Relay-1",14, 20 70 80 20,tab 2
check "Relay-2",15, 20 100 80 20,tab 2
check "Relay-3",16, 20 130 80 20,tab 2
check "Relay-4",17, 20 160 80 20,tab 2
check "Nick Flood",18, 20 190 80 20,tab 2
check "Quit Flood",19, 120 70 80 20,tab 2
check "Chan Flood",20, 120 100 80 20,tab 2
check "Dcc Flood",21, 120 130 80 20,tab 2
check "Ctcp Flood",22, 120 160 80 20,tab 2
check "Querie Flood",23, 120 190 80 20,tab 2
check "Join FLood",24, 220 70 80 20,tab 2
check "Mass FLood",25, 220 100 80 20,tab 2
check "Letter Flood",26, 220 130 80 20,tab 2
check "Word Flood",27, 220 160 80 20,tab 2
check "Color Flood",28, 220 190 80 20,tab 2
check "Rev Door",29, 20 70 80 20,tab 4
check "Spam Bot",30, 20 100 80 20,tab 3
check "Drone Bot",31, 20 130 80 20,tab 3
check "Drone Nick",32, 20 160 80 20,tab 3
check "Quit Bot",33, 20 190 80 20,tab 3
check "Bad Away",34, 120 70 80 20,tab 3
check "Bad Name",35, 120 100 80 20,tab 3
check "Chan Notice",36, 120 130 80 20,tab 3
check "Private Notice",37, 120 160 85 20,tab 3
check "Notify BanList",38, 120 190 85 20,tab 3
check "Trout Slap",39, 220 70 80 20,tab 3
check "Nosense Nick",40, 220 100 85 20,tab 3
check "Bad Script",41, 20 100 80 20,tab 4
check "Auto Whois",42, 20 160 80 20,tab 4
check "Ban Enforcer",55, 220 70 80 20,tab 4
check "Spy Log",43, 20 70 80 20,tab 3
check "Auto Op",44, 220 130 80 20,tab 3
check "Mode Log",45, 20 130 80 20,tab 4
check "Auto Unban",46, 220 160 80 20,tab 3
check "Part Log",47, 20 190 80 20,tab 4
check "Topic Log",48, 120 70 85 20,tab 4
check "Kick Log",49, 120 100 80 20,tab 4
check "Join Log",50, 120 130 80 20,tab 4
check "Nick Log",51, 120 160 80 20,tab 4
check "Quit Log",52, 120 190 80 20,tab 4
check "Sticky Ban",53, 220 190 80 20,tab 3
check "none",54, 220 100 80 20,tab 4
box "",200, 20 220 290 50
text "This Dialog helps you choose the protection or settings you need.",201, 40 230 230 30
box "",202, 5 25 320 300
check "Check or Uncheck All", 204, 20 39 116 25, tab 2
check "Check or Uncheck All", 205, 20 39 116 25, tab 3
check "Check or Uncheck All", 207, 20 39 116 25, tab 4
}

on 1:dialog:popusn:sclick:70: {
{ set %St.nick $snick($active) | /ul }
}
on 1:dialog:popusn:sclick:71: {
{ set %St.nick $snick($active) | /display }
}
on 1:dialog:popusn:sclick:72: {
{ set %St.nick $snick($active) | /setup }
}
on 1:dialog:popusn:sclick:73: {
{ set %St.nick $snick($active) | /nets }
}
on 1:dialog:popusn:sclick:74: {
{ set %St.nick $snick($active) | /prots }
}
on 1:dialog:popusn:sclick:75: {
{ set %St.nick $snick($active) | /opvhostdial }
}
on 1:dialog:popusn:sclick:76: {
{ set %St.nick $snick($active) | dialog -dmn Proxy Proxy }
}
on 1:dialog:popusn:sclick:77: {
{ set %St.nick $snick($active) | /evsound }
}
on 1:dialog:popusn:sclick:78: {
{ set %St.nick $snick($active) | dialog -dmn BL.sd BL.sd }
}
on 1:dialog:popusn:sclick:79: {
{ set %St.nick $snick($active) | dialog -dmn BL.bl BL.bl }
}
on 1:dialog:popusn:sclick:80: {
{ set %St.nick $snick($active) | mp3c }
}
on 1:dialog:popusn:sclick:81: {
{ set %St.nick $snick($active) | dialog -dmn iglist iglist }
}
on 1:dialog:popusn:sclick:82: {
{ set %St.nick $snick($active) | dialog -dmn opwatch opwatch }
}
on 1:dialog:popusn:sclick:83: {
{ set %St.nick $snick($active) | dialog -dmn SpamChannel SpamChannel }
}
on 1:dialog:popusn:sclick:84: {
{ set %St.nick $snick($active) | dialog -dmn spamk spamk }
}
on 1:dialog:popusn:sclick:85: {
{ set %St.nick $snick($active) | dialog -dmn expbanchan expbanchan }
}
on 1:dialog:popusn:sclick:92: {
{ set %St.nick $snick($active) | dialog -dmn cs cs }
}
on 1:dialog:popusn:sclick:95: {
{ set %St.nick $snick($active) | dialog -dmn Opsscrean Opsscrean }
}
on 1:dialog:popusn:sclick:96: {
{ set %St.nick $snick($active) | dialog -dmn Dctrl Dctrl }
}
on 1:dialog:popusn:sclick:93: {
{ set %St.nick $snick($active) | dialog -dmn opcon opcon }
}
on 1:dialog:popusn:sclick:94: {
{ set %St.nick $snick($active) | dialog -dmn spam spam }
}
on 1:dialog:popusn:sclick:97: {
{ set %St.nick $snick($active) | dialog -dmn umodes umodes }
}


On *:Dialog:popusn:*:*: {
if ($devent == sclick) {
if ($did == 204) {
did $+(-,$iif($did(204).state == 0,u,c)) $dname 14-28
}
if ($did == 205) {
did $+(-,$iif($did(205).state == 0,u,c)) $dname 30-40
did $+(-,$iif($did(205).state == 0,u,c)) $dname 43-44
did $+(-,$iif($did(205).state == 0,u,c)) $dname 46
did $+(-,$iif($did(205).state == 0,u,c)) $dname 53
}
if ($did == 207) {
did $+(-,$iif($did(207).state == 0,u,c)) $dname 29
did $+(-,$iif($did(207).state == 0,u,c)) $dname 41-42
did $+(-,$iif($did(207).state == 0,u,c)) $dname 45
did $+(-,$iif($did(207).state == 0,u,c)) $dname 47-52
did $+(-,$iif($did(207).state == 0,u,c)) $dname 54-55
}
}

if ($devent == init) {
var %cnt = 14
while (%cnt <= 55) {
if ($hget(popusn,%cnt) == On) { did -c $dname %cnt }
inc %cnt
}
}
if ($devent == close) { call.popusn }
}

alias call.popusn {
if (!$hget(popusn)) {
hmake popusn 10
if ($exists($scriptdir\popusn.hsh)) { hload $scriptdir\popusn.hsh }
}
var %cnt = 14
while (%cnt <= 55) {
if ($did(%cnt).state == 1) { hadd popusn %cnt On }
else { hadd popusn %cnt Off }
inc %cnt
}
hsave popusn $scriptdir\popusn.hsh
}




[/code]

Last edited by Garou; 11/06/07 03:46 PM.
Garou #178556 11/06/07 04:10 PM
Joined: Oct 2004
Posts: 8,330
Hoopy frood
Offline
Hoopy frood
Joined: Oct 2004
Posts: 8,330
You have two closing code tags instead of an opening and closing code tag. wink Also, you don't need to keep pasting it if you haven't changed anything. Especially with a large piece of code. smile

Anyhow, go back to my previous posted code. It's been edited for the typo that caused the error. The optional alias can be in the same remote.


Invision Support
#Invision on irc.irchighway.net
Riamus2 #178558 11/06/07 04:40 PM
Joined: Aug 2006
Posts: 469
G
Garou Offline OP
Fjord artisan
OP Offline
Fjord artisan
G
Joined: Aug 2006
Posts: 469
Thx Riamus2.

Page 2 of 2 1 2

Link Copied to Clipboard