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 (", 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 }