Jump to content

Problem With Room List


Seci

Recommended Posts

Hello to all

 

I try days since the bug be found in the room list.

Room List shows no chat rooms and no user.

I use the Connection ID4 than just the room list will not work.?

Can someone help me here where the error is?

 

alias listroom if (!$dialog(listroom)) dialog -md listroom listroom | else var %b = $input(Dialog bereits offen,-ow,Achtung!)

dialog listroom {

title "Raumliste"

size -1 -1 875 464

list 1, 0 8 580 276, size hsbar

tab "Opt", 19, 584 8 287 279

button "Suche Raum", 21, 600 48 115 25, tab 19 default

button "Schließe Raum", 22, 600 80 115 25, tab 19

button "Raum entfernen", 30, 600 112 115 25, tab 19

button "Liste aktualisieren", 32, 600 144 115 25, tab 19

box "", 62, 592 32 132 236, tab 19

box "", 63, 728 32 140 236, tab 19

text "Erstelldatum:", 64, 736 48 122 16, tab 19

edit "DATUM - ZEIT", 65, 736 64 124 21, tab 19 read center

text "Raumgründer:", 66, 736 88 122 16, disable tab 19

edit "Gründer", 67, 736 104 124 45, tab 19 read multi hsbar

text "User im Raum:", 27, 736 152 130 16, tab 19

edit "Users", 68, 736 168 124 21, tab 19 read center

check "User im Raum zeigen", 31, 600 240 116 20, tab 19

button "Raum kopieren", 81, 600 176 115 25, tab 19

button "zeige Accessliste", 82, 600 208 115 25, tab 19

tab "Einst", 20

check "Auditorium (x)", 9, 736 30 108 20, tab 20

check "Moderiert (m)", 10, 736 46 92 20, tab 20

check "Flüstern aus (w)", 11, 736 62 108 20, tab 20

check "keine Funktion (n)", 12, 736 78 108 20, tab 20

check "Access Sperre (A)", 13, 736 94 108 20, tab 20

check "Owner Sperre (Q)", 16, 736 110 108 20, tab 20

check "Host Sperre (O)", 17, 736 126 84 20, tab 20

check "Topic Sperre (T)", 8, 736 142 92 20, tab 20

check "Nur Ops Topic wechsel (t)", 2, 592 158 140 20, tab 20

check "Password (k)", 18, 592 142 108 20, tab 20

check "Clonable (d)", 15, 736 190 84 20, tab 20

check "Nur registrierte (B)", 14, 592 110 124 20, tab 20

check "Gast FF aus (W)", 7, 592 94 124 20, tab 20

check "Verbergen (h)", 6, 592 78 68 20, tab 20

check "Private (p)", 5, 592 62 76 20, tab 20

check "Geheim (s)", 4, 592 46 68 20, tab 20

check "Einladung (i)", 3, 592 30 84 20, tab 20

check "Filter (f)", 33, 736 158 84 20, tab 20

check "Anti guest flooder (P)", 34, 592 174 132 20, tab 20

check "Gründer Schutz (F)", 35, 736 174 132 20, tab 20

check "Teilnehmer-Modus (S)", 36, 592 190 140 20, tab 20

check "Gast-Modus (g)", 37, 592 206 124 20, tab 20

check "Nur Staff's (a)", 38, 592 126 100 20, tab 20

check "User Kick aus (K)", 39, 736 206 124 20, tab 20

check "Klopfen (u)", 40, 592 222 100 20, tab 20

check "Room cloned (e)", 41, 736 222 108 20, tab 20

check "Register TFA-Chat ®", 96, 592 238 108 20, tab 20

check "Register Blau (U)", 100, 736 238 108 20, tab 20

check "Register Braun (z)", 162, 592 254 108 20, tab 20

tab "Ändern", 23

button "Ändere Thema", 25, 672 56 107 25, tab 23

button "Ändere Willkommen", 26, 672 88 107 25, tab 23

button "Ändere Goldpass", 28, 672 120 107 25, tab 23

button "Ändere Braunpass", 29, 672 152 107 25, tab 23

button "Ändere Gründer", 78, 672 184 107 25, tab 23

tab "Kat", 24

check "Städte u.Regionen (GE)", 43, 592 32 100 20, tab 24

check "Computer (CP)", 44, 592 48 100 20, tab 24

check "Unterhaltung (EA)", 45, 592 64 116 20, tab 24

check "Allgemein (GN)", 46, 592 80 100 20, tab 24

check "schließende Räume (HE)", 47, 592 96 132 20, tab 24

check "Interessen (II)", 48, 592 112 100 20, tab 24

check "Lifestyles (LF)", 49, 592 128 100 20, tab 24

check "Radio (MU)", 50, 592 144 100 20, tab 24

check "Studenten WG (NW)", 51, 736 32 100 20, tab 24

check "Sonstige (PR)", 52, 736 48 100 20, tab 24

check "Altersgruppen (RL)", 53, 736 64 100 20, tab 24

check "Beziehungen (RM)", 54, 736 80 110 20, tab 24

check "Sport (SP)", 55, 736 96 100 20, tab 24

check "Teenager (TN)", 56, 736 112 100 20, tab 24

check "Unlisted (UL)", 57, 736 128 100 20, tab 24

check "Event (EV)", 58, 736 144 110 20, tab 24

tab "Spr", 98

check "Deutsch (DE-DE)", 90, 592 32 100 20, tab 98

check "Italienisch (IT-IT)", 91, 592 48 100 20, tab 98

check "Englisch (EN-US)", 92, 592 64 100 20, tab 98

check "Spanisch (ES-SP)", 93, 592 80 100 20, tab 98

check "Französisch (FR-FR)", 94, 592 96 132 20, tab 98

check "Türkisch (TR-TR)", 95, 592 112 100 20, tab 98

check "Österreich (AT-AT)", 110, 592 128 132 20, tab 98

check "Schweiz (CH-CH)", 111, 592 144 132 20, tab 98

check "Niederlande (NL-NL)", 112, 592 160 132 20, tab 98

check "Schweden (SE-SE)", 113, 736 32 132 20, tab 98

check "Dänemark (DK-DK)", 114, 736 48 132 20, tab 98

check "Belgien (BE-BE)", 115, 736 64 132 20, tab 98

check "Finnland (FI-FI)", 116, 736 80 132 20, tab 98

check "Grichenland (GR-GR)", 117, 736 96 132 20, tab 98

check "Irland (IE-IE)", 118, 736 112 132 20, tab 98

check "Luxemburg (LU-LU)", 119, 736 128 132 20, tab 98

check "Norwegen (NO-NO)", 120, 736 144 132 20, tab 98

check "Portugal (PT-PT)", 121, 736 160 132 20, tab 98

tab "E La", 122

check "nur deutsche", 123, 592 32 100 20, tab 122

check "nur italienische", 124, 592 48 100 20, tab 122

check "nur englische", 125, 592 64 100 20, tab 122

check "nur spanische", 126, 592 80 100 20, tab 122

check "nur französische", 127, 592 96 132 20, tab 122

check "nur türkische", 128, 592 112 100 20, tab 122

check "nur österreichische", 129, 592 128 132 20, tab 122

check "nur schweizerische", 130, 592 144 132 20, tab 122

check "nur niederlandische", 131, 592 160 132 20, tab 122

check "nur schwedische", 132, 736 32 132 20, tab 122

check "nur dänische", 133, 736 48 132 20, tab 122

check "nur belgische", 134, 736 64 132 20, tab 122

check "nur finnische", 135, 736 80 132 20, tab 122

check "nur griechische", 136, 736 96 132 20, tab 122

check "nur irländische", 137, 736 112 132 20, tab 122

check "nur luxemburger", 138, 736 128 132 20, tab 122

check "nur norwegische", 139, 736 144 132 20, tab 122

check "nur portugisische", 140, 736 160 132 20, tab 122

check "alle Räume", 141, 672 176 132 20, tab 122

text "Bitte erst Hacken raus machen", 142, 672 194 152 20, tab 122

text "dann neuen Hacken setzen", 143, 672 210 132 20, tab 122

list 69, 0 304 196 156,

list 70, 200 304 196 156,

list 71, 400 304 196 156,

text "Encode Nick:", 72, 0 288 70 16

text "Decode Nick:", 73, 200 288 69 16

text "Gatekeeper:", 74, 400 288 70 16

button "IP KICK", 75, 800 304 67 25

button "Gate Sperre", 76, 800 336 67 25

button "IP Sperre", 77, 800 368 67 25

button "Ip User", 83, 800 400 67 25

button "Nick kopieren [Decode]", 84, 276 288 120 16

text "Gatekeeper:", 79, 600 288 70 16

list 80, 600 304 196 156,

button "Nick kopieren [Encode]", 85, 76 288 120 16

button "Gate kopieren", 86, 476 288 120 16

button "Profil anzeigen", 87, 676 288 120 16

}

 

on *:dialog:listroom:*:*:{

if ($devent = init) {

.raw list

if (%whouser = on) { did -c $dname 31 | dialog -s $dname -1 -1 871 464 }

if (%onlygerman = off) { did -c $dname 141 }

if (%onlyde = DE-DE) { did -c $dname 123 }

if (%onlyde = IT-IT) { did -c $dname 124 }

if (%onlyde = EN-US) { did -c $dname 125 }

if (%onlyde = ES-SP) { did -c $dname 126 }

if (%onlyde = FR-FR) { did -c $dname 127 }

if (%onlyde = TR-TR) { did -c $dname 128 }

if (%onlyde = AT-AT) { did -c $dname 129 }

if (%onlyde = CH-CH) { did -c $dname 130 }

if (%onlyde = NL-NL) { did -c $dname 131 }

if (%onlyde = SE-SE) { did -c $dname 132 }

if (%onlyde = DK-DK) { did -c $dname 133 }

if (%onlyde = BE-BE) { did -c $dname 134 }

if (%onlyde = FI-FI) { did -c $dname 135 }

if (%onlyde = GR-GR) { did -c $dname 136 }

if (%onlyde = IE-IE) { did -c $dname 137 }

if (%onlyde = LU-LU) { did -c $dname 138 }

if (%onlyde = NO-NO) { did -c $dname 139 }

if (%onlyde = PT-PT) { did -c $dname 140 }

}

if ($devent = sclick) {

if ($did = 1) { var %x = $did($did).seltext | tokenize 32 %x | set %mode $4 | set %category $5 | set %locale $6 | prop $1 creation | prop $1 nick | checkmodes | checkcategory | did -ra $dname 68 $2 | $iif(%whouser = on,who $1) }

if (($did >= 2) && ($did <= 18)) || (($did >= 33) && ($did <= 41)) || ($did = 96) || ($did = 100) || ($did = 162) $iif($did($did).state = 1,mode $gettok($did(1).seltext,1,32) + $+ $remove($gettok($did($did).text,2,40),$chr(41)),mode $gettok($did(1).seltext,1,32) - $+ $remove($gettok($did($did).text,2,40),$chr(41)))

if ($did = 21) { did -r $dname 1 | .raw list $+(*,$$input(Raum Name?,-eq,Room),*) }

if ($did = 22) CLSROOM $gettok($did(1).seltext,1,32) $+(:,$$input(Grund?,-eq,Reason))

if ($did = 25) $iif($gettok($did(1).seltext,1,32),prop $ifmatch topic $+(:,$$input(Neues Thema?,-eq,Topic)),$input(Any room selected,-ow,Attention!))

if ($did = 26) $iif($gettok($did(1).seltext,1,32),prop $ifmatch onjoin $+(:,$$input(Neue Willkommensnachricht?,-eq,Onjoin)),$input(Any room selected,-ow,Attention!))

if ($did = 28) $iif($gettok($did(1).seltext,1,32),prop $ifmatch ownerkey $+(:,$$input(Neuer Goldpass?,-eq,Ownerkey)),$input(Any room selected,-ow,Attention!))

if ($did = 29) $iif($gettok($did(1).seltext,1,32),prop $ifmatch hostkey $+(:,$$input(Neuer Braunpass?,-eq,Hostkey)),$input(Any room selected,-ow,Attention!))

if ($did = 78) $iif($gettok($did(1).seltext,1,32),move founder $ifmatch $$input(Neuer Gründer?,-eq,Founder),$input(Any room selected,-ow,Attention!))

if ($did = 30) drop channel $gettok($did(1).seltext,1,32)

if ($did = 31) { if ($did($did).state = 1) { set %whouser on | dialog -s $dname -1 -1 871 464 } | else { set %whouser off | dialog -s $dname -1 -1 871 284 } }

if ($did = 32) refreshlist

if ($did >= 43) && ($did <= 58) { move category $gettok($did(1).seltext,1,32) $remove($gettok($did($did).text,2,40),$chr(41)) | did -ue $dname 43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58 | did -cb $dname $did }

if ($did >= 69) && ($did <= 71) did -c $dname 69,70,71,80 $did($did).sel

if ($did = 75) kill $did(69).seltext $input $+ $$?="Schreibe den Grund"

if ($did = 76) kline $did(69).seltext $input $+ $$?="Gib die Zeit an" $input $+ $$?="Schreibe den Grund"

if ($did = 77) qline $did(69).seltext $input $+ $$?="Gib die Zeit an"

if ($did = 81) clipboard $gettok($did(1).seltext,1,32)

if ($did = 82) { hadd -m listaccessi room $gettok($did(1).seltext,1,32) | listaccessi }

if ($did = 83) userhost $did(69).seltext

if ($did = 84) clipboard $did(70).seltext

if ($did = 85) clipboard $did(69).seltext

if ($did = 86) clipboard $did(71).seltext $+ @ $+ $did(80).seltext

if ($did = 87) /run http://www.talkforall.de/profile.php?puid= $+ $did(71).seltext

if ($did >= 90) && ($did <= 95) || ($did >= 110) && ($did <= 121) { move locale $gettok($did(1).seltext,1,32) $remove($gettok($did($did).text,2,40),$chr(41)) | did -ue $dname 90,91,92,93,94,95,110,111,112,113,114,115,116,117,118,119,120,121 | did -cb $dname $did }

if ($did = 123) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde DE-DE | refreshlist } }

if ($did = 124) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde IT-IT | refreshlist } }

if ($did = 125) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde EN-US | refreshlist } }

if ($did = 126) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde ES-SP | refreshlist } }

if ($did = 127) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde FR-FR | refreshlist } }

if ($did = 128) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde TR-TR | refreshlist } }

if ($did = 129) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde AT-AT | refreshlist } }

if ($did = 130) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde CH-CH | refreshlist } }

if ($did = 131) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde NL-NL | refreshlist } }

if ($did = 132) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde SE-SE | refreshlist } }

if ($did = 133) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde DK-DK | refreshlist } }

if ($did = 134) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde BE-BE | refreshlist } }

if ($did = 135) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde FI-FI | refreshlist } }

if ($did = 136) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde GR-GR | refreshlist } }

if ($did = 137) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde IE-IE | refreshlist } }

if ($did = 138) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde LU-LU | refreshlist } }

if ($did = 139) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde NO-NO | refreshlist } }

if ($did = 140) { if ($did($did).state = 1) { set %onlygerman on | set %onlyde PT-PT | refreshlist } }

if ($did = 141) { if ($did($did).state = 1) { set %onlygerman off | set %onlyde AU-AU | refreshlist } }

}

if ($devent = dclick) {

if ($did = 1) join $gettok($did($did).seltext,1,32)

}

}

alias -l refreshlist did -r listroom 1,69,70,71,80 | .raw list

alias -l checkmodes {

if (t isincs %mode) did -c $dname 2

else did -u $dname 2

if (i isincs %mode) did -c $dname 3

else did -u $dname 3

if (s isincs %mode) did -c $dname 4

else did -u $dname 4

if (p isincs %mode) did -c $dname 5

else did -u $dname 5

if (h isincs %mode) did -c $dname 6

else did -u $dname 6

if (W isincs %mode) did -c $dname 7

else did -u $dname 7

if (T isincs %mode) did -c $dname 8

else did -u $dname 8

if (x isincs %mode) did -c $dname 9

else did -u $dname 9

if (m isincs %mode) did -c $dname 10

else did -u $dname 10

if (w isincs %mode) did -c $dname 11

else did -u $dname 11

if (n isincs %mode) did -c $dname 12

else did -u $dname 12

if (A isincs %mode) did -c $dname 13

else did -u $dname 13

if (B isincs %mode) did -c $dname 14

else did -u $dname 14

if (d isincs %mode) did -c $dname 15

else did -u $dname 15

if (Q isincs %mode) did -c $dname 16

else did -u $dname 16

if (O isincs %mode) did -c $dname 17

else did -u $dname 17

if (k isincs %mode) did -c $dname 18

else did -u $dname 18

if (f isincs %mode) did -c $dname 33

else did -u $dname 33

if (P isincs %mode) did -c $dname 34

else did -u $dname 34

if (F isincs %mode) did -c $dname 35

else did -u $dname 35

if (S isincs %mode) did -c $dname 36

else did -u $dname 36

if (g isincs %mode) did -c $dname 37

else did -u $dname 37

if (a isincs %mode) did -c $dname 38

else did -u $dname 38

if (K isincs %mode) did -c $dname 39

else did -u $dname 39

if (u isincs %mode) did -c $dname 40

else did -u $dname 40

if (e isincs %mode) did -c $dname 41

else did -u $dname 41

if (r isincs %mode) did -c $dname 96

else did -u $dname 96

if (U isincs %mode) did -c $dname 100

else did -u $dname 100

if (z isincs %mode) did -c $dname 162

else did -u $dname 162

unset %mode

}

alias -l checkcategory {

if (%category = GE) did -cb $dname 43

else did -ue $dname 43

if (%category = CP) did -cb $dname 44

else did -ue $dname 44

if (%category = EA) did -cb $dname 45

else did -ue $dname 45

if (%category = GN) did -cb $dname 46

else did -ue $dname 46

if (%category = HE) did -cb $dname 47

else did -ue $dname 47

if (%category = II) did -cb $dname 48

else did -ue $dname 48

if (%category = LF) did -cb $dname 49

else did -ue $dname 49

if (%category = MU) did -cb $dname 50

else did -ue $dname 50

if (%category = NW) did -cb $dname 51

else did -ue $dname 51

if (%category = PR) did -cb $dname 52

else did -ue $dname 52

if (%category = RL) did -cb $dname 53

else did -ue $dname 53

if (%category = RM) did -cb $dname 54

else did -ue $dname 54

if (%category = SP) did -cb $dname 55

else did -ue $dname 55

if (%category = TN) did -cb $dname 56

else did -ue $dname 56

if (%category = UL) did -cb $dname 57

else did -ue $dname 57

if (%category = MX) did -cb $dname 58

else did -ue $dname 58

if (%locale = DE-DE) did -cb $dname 90

else did -ue $dname 90

if (%locale = IT-IT) did -cb $dname 91

else did -ue $dname 91

if (%locale = EN-US) did -cb $dname 92

else did -ue $dname 92

if (%locale = ES-SP) did -cb $dname 93

else did -ue $dname 93

if (%locale = FR-FR) did -cb $dname 94

else did -ue $dname 94

if (%locale = TR-TR) did -cb $dname 95

else did -ue $dname 95

if (%locale = AT-AT) did -cb $dname 110

else did -ue $dname 110

if (%locale = CH-CH) did -cb $dname 111

else did -ue $dname 111

if (%locale = NL-NL) did -cb $dname 112

else did -ue $dname 112

if (%locale = SE-SE) did -cb $dname 113

else did -ue $dname 113

if (%locale = DK-DK) did -cb $dname 114

else did -ue $dname 114

if (%locale = BE-BE) did -cb $dname 115

else did -ue $dname 115

if (%locale = FI-FI) did -cb $dname 116

else did -ue $dname 116

if (%locale = GR-GR) did -cb $dname 117

else did -ue $dname 117

if (%locale = IE-IE) did -cb $dname 118

else did -ue $dname 118

if (%locale = LU-LU) did -cb $dname 119

else did -ue $dname 119

if (%locale = NO-NO) did -cb $dname 120

else did -ue $dname 120

if (%locale = PT-PT) did -cb $dname 121

else did -ue $dname 121

unset %category

}

raw 818:*:{ if ($dialog(listroom)) {

if ($3 = creation) { did -ra listroom 65 $asctime($4,dd/mm/yy HH:nn:ss) | haltdef }

if ($3 = nick) { $iif($4,did -ra listroom 67 $4,did -ra listroom 67 nicht bekannt) | haltdef }

}

}

raw 819:*:{ if ($dialog(listroom)) haltdef }

raw 352:*:{

if ($dialog(listroom)) {

if (%fine = 1) {

did -r listroom 69,70,71,80

set -u100 %fine 0

}

did -a listroom 69 $6

did -a listroom 70 $msn.decode($6)

did -a listroom 71 $3

did -a listroom 80 $4

}

else echo -s $2 // $6 / $msn.decode($6) - $3 - $4

haltdef

}

raw 315:*:{ set -u100 %fine 1 | haltdef }

 

raumlistgho0.png

 

Link to comment
Share on other sites

if you are simply just copying/pasting from one connection to the other, or trying to use a room lister originally designed for the modified Vincula connection you have, that is probably your issue.

 

Thinking of this, there are probably stuff in the Vincula Connection, that's a lot further indepth then just a mere "copy paste" to help your room lister work.

Link to comment
Share on other sites

If it works when you use it in Vincula but not in ID4 then you are missing aliases that exonyte wrote for HIS room lister.

 

I'm sure if you are messing with mIRC scripting you can look for the aliases that you are missing from Vincula.

 

Otherwise please ask for more help.

 

 

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...