this is a small part of what im doing,
when i flip to other dialogs i this one
it floods
then closes my script,
.didtok $dname 4 44 %autojoin
thats what i suspect the problem is,
and thats for
to simply take each seperate item, (the rooms) in the varable
and put them in list form on the actual list in the dialog,
im not sure if there is nothing i can do or what to do about it.
alias phmautojoin2004 { dialog -m phmautojoin2004 phmautojoin2004 }
dialog phmautojoin2004 {
title "PHM Auto Joins"
size -1 -1 160 225
option dbu
button "Done", 1, 121 200 38 20, ok,flat
button "Add",2, 81 200 40 20,flat
button "Refresh",3, 1 200 40 20,flat
list 4, 20 60 120 80,vsbar
text "PHMinistries",5,35 5 100 20
combo 6,45 40 70 60,drop
text "#Channel",7,60 140 45 12
edit %toadd99,8,57 160 45 12,autohs,center
button "Delete",9,41 200 40 20,flat
check "Enable Auto Join",10,55 180 50 12
}
on *:dialog:phmautojoin2004:sclick:6:{
if ($did(6) == T4J/C-Chat) { /dialog -x phmautojoin2004 phmautojoin2004 | /dialog -m phmautojoin2004t4j phmautojoin2004t4j }
if ($did(6) == MoreLikeHim) { /dialog -x phmautojoin2004 phmautojoin2004 | /dialog -m phmautojoin2004mlh phmautojoin2004mlh }
if ($did(6) == Chatster) { /dialog -x phmautojoin2004 phmautojoin2004 | /dialog -m phmautojoin2004chat phmautojoin2004chat }
if ($did(6) == ChristianWorld) { /dialog -x phmautojoin2004 phmautojoin2004 | /dialog -m phmautojoin2004cworld phmautojoin2004cworld }
if ($did(6) == CCnet) { /dialog -x phmautojoin2004 phmautojoin2004 | /dialog -m phmautojoin2004ccnet phmautojoin2004ccnet }
if ($did(6) == Others) { /dialog -x phmautojoin2004 phmautojoin2004 | /dialog -m phmautojoin2004other phmautojoin2004other }
}
on *:dialog:phmautojoin2004:sclick:1:{ /unset %toadd99 }
on *:dialog:phmautojoin2004:edit:8: { set %toadd99 $did($dname,8) }
on *:dialog:phmautojoin2004:sclick:9:{ if (%toadd99 !isin %autojoin) { halt } | set %temp %toadd99 | %autojoin = $remtok(%autojoin,%temp,1,44) | dialog -x phmautojoin2004 phmautojoin2004 | dialog -m phmautojoin2004 phmautojoin2004 }
on *:dialog:phmautojoin2004:sclick:2:{ set %autojoin %autojoin $+ , $+ %toadd99 | dialog -x phmautojoin2004 phmautojoin2004 | dialog -m phmautojoin2004 phmautojoin2004 }
on *:dialog:phmautojoin2004:init:0: {
if ($hget(scriptpref2003,enableautojoinphm) == on) { did -c phmautojoin2004 10 }
dll $mdx SetMircVersion $version
dll $mdx MarkDialog $dname
dll $mdx SetFont $dname 7 -18 400 Comic Sans MS
dll $mdx SetFont $dname 5 -30 400 Comic Sans MS
dll $mdx SetDialog $dname bgcolor $rgb(139,0,139)
dll $mdx SetColor $dname 5,7 background $rgb(139,0,139)
.did -a $dname 6 T4J/C-Chat
.did -a $dname 6 MoreLikeHim
.did -a $dname 6 Chatster
.did -a $dname 6 ChristianWorld
.did -a $dname 6 CCnet
.did -a $dname 6 Others
.didtok $dname 4 44 %autojoin
}
on *:dialog:phmautojoin2004:sclick:10:{
if ($did(phmautojoin2004,10).state == 1) { hadd scriptpref2003 enableautojoinphm on }
else { hadd scriptpref2003 enableautojoinphm off }
}
dialog phmautojoin2004t4j {
title "PHM Auto Joins"
size -1 -1 160 225
option dbu
button "Done", 1, 121 200 38 20, ok,flat
button "Add",2, 81 200 40 20,flat
button "Refresh",3, 1 200 40 20,flat
list 4, 20 60 120 80,vsbar
text "T4J-C-Chat",5,35 5 100 20
combo 6,45 40 70 60,drop
text "#Channel",7,60 140 45 12
edit %toadd99,8,57 160 45 12,autohs,center
button "Delete",9,41 200 40 20,flat
check "Enable Auto Join",10,55 180 50 12
}
on *:dialog:phmautojoin2004t4j:sclick:6:{
if ($did(6) == PHMinistries) { /dialog -x phmautojoin2004t4j phmautojoin2004t4j | /dialog -m phmautojoin2004 phmautojoin2004 }
if ($did(6) == MoreLikeHim) { /dialog -x phmautojoin2004t4j phmautojoin2004t4j | /dialog -m phmautojoin2004mlh phmautojoin2004mlh }
if ($did(6) == Chatster) { /dialog -x phmautojoin2004t4j phmautojoin2004t4j | /dialog -m phmautojoin2004chat phmautojoin2004chat }
if ($did(6) == ChristianWorld) { /dialog -x phmautojoin2004t4j phmautojoin2004t4j | /dialog -m phmautojoin2004cworld phmautojoin2004cworld }
if ($did(6) == CCnet) { /dialog -x phmautojoin2004t4j phmautojoin2004t4j | /dialog -m phmautojoin2004ccnet phmautojoin2004ccnet }
if ($did(6) == Others) { /dialog -x phmautojoin2004t4j phmautojoin2004t4j | /dialog -m phmautojoin2004other phmautojoin2004other }
}
on *:dialog:phmautojoin2004t4j:sclick:1:{ /unset %toadd99 }
on *:dialog:phmautojoin2004t4j:edit:8: { set %toadd99 $did($dname,8) }
on *:dialog:phmautojoin2004t4j:sclick:9:{ if (%toadd99 !isin %autojoint4j) { halt } | set %temp %toadd99 | %autojoint4j = $remtok(%autojoint4j,%temp,1,44) | dialog -x phmautojoin2004t4j phmautojoin2004t4j | dialog -m phmautojoin2004t4j phmautojoin2004t4j }
on *:dialog:phmautojoin2004t4j:sclick:2:{ set %autojoint4j %autojoint4j $+ , $+ %toadd99 | dialog -x phmautojoin2004t4j phmautojoin2004t4j | dialog -m phmautojoin2004t4j phmautojoin2004t4j }
on *:dialog:phmautojoin2004t4j:init:0: {
if ($hget(scriptpref2003,enableautojoint4j) == on) { did -c phmautojoin2004t4j 10 }
dll $mdx SetMircVersion $version
dll $mdx MarkDialog $dname
dll $mdx SetFont $dname 7 -18 400 Comic Sans MS
dll $mdx SetFont $dname 5 -30 400 Comic Sans MS
dll $mdx SetDialog $dname bgcolor $rgb(0,191,255)
dll $mdx SetColor $dname 5,7 background $rgb(0,191,255)
.did -a $dname 6 PHMinistries
.did -a $dname 6 MoreLikeHim
.did -a $dname 6 Chatster
.did -a $dname 6 ChristianWorld
.did -a $dname 6 CCnet
.did -a $dname 6 Others
.didtok $dname 4 44 %autojoint4j
}
on *:dialog:phmautojoin2004t4j:sclick:10:{
if ($did(phmautojoin2004t4j,10).state == 1) { hadd scriptpref2003 enableautojoint4j on }
else { hadd scriptpref2003 enableautojoint4j off }
}
dialog phmautojoin2004mlh {
title "PHM Auto Joins"
size -1 -1 160 225
option dbu
button "Done", 1, 121 200 38 20, ok,flat
button "Add",2, 81 200 40 20,flat
button "Refresh",3, 1 200 40 20,flat
list 4, 20 60 120 80,vsbar
text "More Like Him",5,35 5 100 20
combo 6,45 40 70 60,drop
text "#Channel",7,60 140 45 12
edit %toadd99,8,57 160 45 12,autohs,center
button "Delete",9,41 200 40 20,flat
check "Enable Auto Join",10,55 180 50 12
}
on *:dialog:phmautojoin2004mlh:sclick:6:{
if ($did(6) == PHMinistries) { /dialog -x phmautojoin2004mlh phmautojoin2004mlh | /dialog -m phmautojoin2004 phmautojoin2004 }
if ($did(6) == T4J/C-Chat) { /dialog -x phmautojoin2004mlh phmautojoin2004mlh | /dialog -m phmautojoin2004t4j phmautojoin2004t4j }
if ($did(6) == Chatster) { /dialog -x phmautojoin2004mlh phmautojoin2004mlh | /dialog -m phmautojoin2004chat phmautojoin2004chat }
if ($did(6) == ChristianWorld) { /dialog -x phmautojoin2004mlh phmautojoin2004mlh | /dialog -m phmautojoin2004cworld phmautojoin2004cworld }
if ($did(6) == CCnet) { /dialog -x phmautojoin2004mlh phmautojoin2004mlh | /dialog -m phmautojoin2004ccnet phmautojoin2004ccnet }
if ($did(6) == Others) { /dialog -x phmautojoin2004mlh phmautojoin2004mlh | /dialog -m phmautojoin2004other phmautojoin2004other }
}
on *:dialog:phmautojoin2004mlh:sclick:1:{ /unset %toadd99 }
on *:dialog:phmautojoin2004mlh:edit:8: { set %toadd99 $did($dname,8) }
on *:dialog:phmautojoin2004mlh:sclick:9:{ if (%toadd99 !isin %autojoinmlh) { halt } | set %temp %toadd99 | %autojoinmlh = $remtok(%autojoinmlh,%temp,1,44) | dialog -x phmautojoin2004mlh phmautojoin2004mlh | dialog -m phmautojoin2004mlh phmautojoin2004mlh }
on *:dialog:phmautojoin2004mlh:sclick:2:{ set %autojoinmlh %autojoinmlh $+ , $+ %toadd99 | dialog -x phmautojoin2004mlh phmautojoin2004mlh | dialog -m phmautojoin2004mlh phmautojoin2004mlh }
on *:dialog:phmautojoin2004mlh:init:0: {
if ($hget(scriptpref2003,enableautojoinmlh) == on) { did -c phmautojoin2004mlh 10 }
dll $mdx SetMircVersion $version
dll $mdx MarkDialog $dname
dll $mdx SetFont $dname 7 -18 400 Comic Sans MS
dll $mdx SetFont $dname 5 -30 400 Comic Sans MS
dll $mdx SetDialog $dname bgcolor $rgb(240,128,128)
dll $mdx SetColor $dname 5,7 background $rgb(240,128,128)
.did -a $dname 6 PHMinistries
.did -a $dname 6 T4J/C-Chat
.did -a $dname 6 Chatster
.did -a $dname 6 ChristianWorld
.did -a $dname 6 CCnet
.did -a $dname 6 Others
.didtok $dname 4 44 %autojoinmlh
}
on *:dialog:phmautojoin2004mlh:sclick:10:{
if ($did(phmautojoin2004mlh,10).state == 1) { hadd scriptpref2003 enableautojoinmlh on }
else { hadd scriptpref2003 enableautojoint4j off }
}
