<div class="wrapper"> <header> <i class="bx bx-cookie"></i> <h2>Einwilligung zu Cookies</h2> </header>
<div class="data"> <p>Dieses Forum verwendet Cookies, um Ihnen ein besseres und relevanteres Surferlebnis auf dem Forum zu ermöglichen. <a href="./datenschutz.html"> Mehr lesen...</a></p> </div>
const executeCodes = () => { //Wenn das Cookie Codinglab enthält, wird es zurückgegeben und der darunter liegende Code wird nicht ausgeführt if (document.cookie.includes("codinglab")) return; cookieBox.classList.add("show");
Iconbar unter "Admin > Layout >Iconbar" öffnen Reiter "Foren-Code" aufrufen Erweiterte Foren-Code einblenden und die folgenden Daten eingetragen, speichern! Icon an die passende Stelle schieben. Reihenfolge! Bildadresse eintragen und markieren. Mit einem Klick auf das neue Icon wird das Bild mit dem neuen Foren-Code umgeben!
Ich habe mal das Javascript geändert und hoffe, dass es jetzt funktioniert.
Ich füge noch den Teilen Button unten gleich ein, leider habe ich kein twitter Account und kenne mich damit nicht aus, wer es gerne testen möchte, kann das tun ich füge noch die neuen Codes hinzu.
Habe jetzt mal getestet einzeln, da funktioniert es, ich muss alle Teilen Buttons nochmal durchgehen, vielleicht verträgt sich da was nicht mit dem JavaScript, das ich gemacht habe nicht.
Gibt mir noch bitte etwas Zeit zum Testen.
Mein einzelner Test sieht so aus, mit dem Teilen Button;
[[File:facebook teilen.png|none|auto]]
und bei Facebook auf den Link klick, erscheine ich direkt auf dem geteilten Seite:
Sorry, dass ich nicht so oft online bin, im Forum habe privat viel um die Ohren.
Da ich 1 ganzen Tag gebraucht habe eine halbe Tonne Kies mit Schubkarren nach Hause zu karren, für die Betonplatte für den Grill fertigzustellen, ich kann euch sagen 75 voll gehäufte Schubkarren sind eine halbe Tonne.
Mir tut der Rücken weh und alle Knochen und alle Muskeln, aber die harte Arbeit war es wert. Habe die Betonplatte fertigbekommen, bevor der starke Regen kam.
Hier mal die Bilder:
[[File:20240318_164105.jpg|none|auto]]
[[File:20240318_182910.jpg|none|auto]]
[[File:20240318_191528.jpg|none|auto]]
[[File:20240318_191550.jpg|none|auto]]
[[File:20240320_124716.jpg|none|auto]]
[[File:20240320_124722.jpg|none|auto]]
[[File:20240321_081855.jpg|none|auto]]
[[File:20240322_103429.jpg|none|auto]]
[[File:20240322_103434.jpg|none|auto]]
[[File:20240322_103442.jpg|none|auto]]
[[File:20240322_120803.jpg|none|auto]]
[[File:20240322_130535.jpg|none|auto]]
[[File:20240322_130543.jpg|none|auto]]
[[File:20240322_130548.jpg|none|auto]]
[[File:20240322_130555.jpg|none|auto]]
Jetzt lasse ich das 3 - 4 Tage trocknen und entferne dann später die steine und styropor, zeige euch später dan das ergebniss.
Hier mein 2ter Akt seit gestern arbeite ich daran und habe jetzt Feierabend gemacht. Hier mal Bilder wie weit ich heute gekommen bin. Bilder wie weit ich heute gekommen bin:
Da ich mir überlegt habe ein neuer Grill - Ecke zu mauern, habe ich mir eine fantastische Idee einfallen lassen, sie soll eine gemauerte outdoor Küche sein.
Ich dachte mir, warum immer teures Zeugs kaufen, wenn man vieles geschenkt bekommt, sei es Steine, Ziegel und andere Materialien, nun gut ist auch viel Arbeit, mit dem Schubkarren alles herbeizuholen.
Seit gestern habe ich angefangen, Stück für Stück alles aufzubauen.
Das wird auch noch eine Weile dauern, aber ich werde euch auf dem Laufenden halten.
Hier mal die Bilder, wie weit ich jetzt bin:
[[File:anfang.jpg|none|auto]]
[[File:anfang 1.jpg|none|auto]]
[[File:anfang 2.jpg|none|auto]]
[[File:anfang 3.jpg|none|auto]]
[[File:anfang 4.jpg|none|auto]]
Wie gesagt halte ich euch auf dem Laufenden, das ist mein Projekt für einen schönen Grill und Sitzecke.
Thema von Daishi im Forum News, Support & Forum...
Ich möchte mich dafür entschuldigen, für Gäste und Mitglieder, die mit dem Handy auf das Forum zugreifen möchten.
Durch das wo ich teils das Forum Layout & Design stark verändert habe, funktionieren viele Sachen nicht über das Handy, durch die Einarbeitung meines Seitenmenüs und selbstgeschriebene Module,
werden auf dem Handy nicht alle verfügbaren Menüs und Links funktionieren.
Habe es getestet, und verstehe jetzt, warum mich viele anschreiben und nicht viel sehen können. Sie sehen nur das Portal und Forum mehr nicht.
Ich habe daran versucht eine Lösung zu finden und habe eine CSS geschrieben für mobile Geräte. Den CSS Code werde ich später unten einfügen. Hier im Forum werde ich das mobile Farben&Einstellungen des mobilen Designs abschalten,
da es für mein Forum nichts bringt. Und nicht alles anzeigt.
/* Anfang Automatische anpassungen für Endgeräte */ /* Anfang Automatische anpassungen für Endgeräte */ /* Anfang Automatische anpassungen für Endgeräte */
/* Für Mobiltelefone: */ [class*="col-"] { width: 100%; }
###################################################### # usergreet.tcl v1.1 by Daishi <daishi219@gmail.com> # ######################################################
################### # History: # 1.0 Erstes Release # 1.1 Channel Aktivierung ebenfalls auf partyline Steuerung umgestellt # Diverse kleine Bugfixes # 1.2 Auch Nicknamen mit [ und ] berücksichtigt ###################
## # Begrüßungen an bestimmte User durch den Bot. ##
# In welchen Channels soll das Script aktiv sein? # Die Definition erfolgt nicht im script, sondern durch Setzen von +usergreet im Bot # In der partyline eingeben: # # .chanset #channel +usergreet
# Zur Aktivierung der userdefined flags setudef flag usergreet
# Definition des Datenfiles für Nicks und Grußmeldungen
set ug_ni(datafile) "ugreet.dat"
################################################################### # Mögliche Befehle in der Partyline: # # # # .chanset #chan +ugreet Aktivierung in Channel #chan # # .chanset #chan -ugreet Deaktivierung in Channel #chan # # .greethelp Hilfen zur Bedienung # # .+greetuser User und Text hinzufügen # # .-greetuser User und Text löschen # # .listgreetuser Einträge anzeigen # ###################################################################
### Ab hier nur editieren, wenn man genau weiß, was man tut. Beginn des Codes ###
set ug_ni(version) v1.2 ;# Variable für Version setzten
bind join - * ug:nick ;# Prozedur für join einbinden bind nick - * ug:nickn ;# Prozedur für nick einbinden bind dcc o|o +greetuser add_gusers ;# User hinzufügen bind dcc o|o -greetuser del_gusers ;# User hinzufügen bind dcc o|o listgreetuser list_gusers ;# User anzeigen bind dcc o|o greethelp help_gusers ;# Hilfe anzeigen
proc help_gusers {handle idx args} { putlog "usergreet erlaubt es, bestimmten Nicks individuelle Begrüßungsmeldungen zuzuweisen, die diesen Nicks angezeigt werden, wenn sie einen Channel joinen oder ihren Nick ändern." putlog "Die Steuerung von usergreet erfolgt ausschließlich über die partyline mit den folgenden Befehlen:" putlog " " putlog "+ greetuser <nick> <greet> Nick mit Grußmeldung hinzufügen oder ändern" putlog "- greetuser <nick> Den angegebenen Nick löschen" putlog "listgreetuser Sämtliche Gruß-Einträge anzeigen" putlog "greethelp Diese Hilfemeldung anzeigen" }
proc init_gusers {} { global ug_nick ug_ni ;# Datenstrukturen public definieren if {[file exists $ug_ni(datafile)]} { ;# Falls File vorhanden putlog "Laden Userdaten aus $ug_ni(datafile)" ;# Lademeldung set in [open $ug_ni(datafile) r] ;# Datenfile im read modus öffnen while {![eof $in]} { ;# solange kein EOF set vline [gets $in] ;# Zeile holen if {[eof $in]} {break} ;# Falls EOF, Ende von while set snick [lindex $vline 0] ;# Nick extrahieren set sgreet [lrange $vline 1 end] ;# Gruß extrahieren regsub -all -- {\{} $sgreet {} sgreet ;# die vom Eggdrop erzeugte '{' entfernen regsub -all -- {\}} $sgreet {} sgreet ;# die vom Eggdrop erzeugte '}' entfernen set ug_nick($snick) $sgreet ;# Array Datenfeld belegen } ;# End while close $in ;# Datei schließen } ;# End If (dataexist) } ;# End Procedure init_gusers
proc add_gusers {handle idx args} { global ug_nick ug_ni ;# Datenstrukturen public definieren set acmd [lindex $args 0] ;# Befehlszeile extrahieren set unick [lindex $acmd 0] ;# erstes Argument ist Nick set ugreet [lrange $acmd 1 end] ;# Der gesamte Rest ist der Gruß regsub -all -- {\{} $ugreet {} ugreet ;# die vom Eggdrop erzeugte '{' entfernen regsub -all -- {\}} $ugreet {} ugreet ;# die vom Eggdrop erzeugte '}' entfernen set ug_nick($unick) $ugreet ;# Array Datenfeld (neu) belegen set cf 0 ;# Change Flag auf 0 setzen foreach search [string tolower [array names ug_nick]] { ;# Liste der Nicks durchlaufen if {[string match $search [string tolower $unick]]} {set cf 1} ;# wenn nick schon vorhanden, Flag auf 1 } ;# End Foreach if {$cf == 0} { ;# ein neuer User set output "$unick $ugreet" ;# Zeile für Ausgabe montieren set out [open $ug_ni(datafile) a] ;# Datenfile im appendmodus öffnen puts $out $output ;# Zeile schreiben close $out ;# Datei schließen putlog "Neuer User für usergreet $ug_ni(version) gespeichert in $ug_ni(datafile)" } else { ;# ein vorhandener User set out [open $ug_ni(datafile) w] ;# Datenfile im w modus öffnen (überschreiben) foreach search [array names ug_nick] { ;# alle nicks des arrays if {$search != 0} { ;# wenn keine leere Zeile set snick $search ;# Nick extrahieren set sgreet $ug_nick($search) ;# Gruß extrahieren set output "$snick $sgreet" ;# Output montieren puts $out $output ;# Zeile schreiben } ;# End if (search) } ;# End Foreach close $out ;# Datei schließen putlog "Gruß für User $unick in $ug_ni(datafile) geändert" } ;# End if (cf) } ;# End Procedure
proc list_gusers {handle idx args} { global ug_nick ug_ni ;# Datenstrukturen public definieren if {[info exists ug_nick]} { ;# Falls Felder definiert sind putlog "Eingetragene Nick für usergreet:" ;# Überschrift anzeigen foreach search [array names ug_nick] { ;# Für jeden Eintrag if {$search != 0} { ;# wenn kein leerer Eintrag set snick $search ;# Nick extrahieren set sgreet $ug_nick($search) ;# Gruß extrahieren putlog "Nick: $snick Gruß: $sgreet" ;# Zeile anzeigen } ;# End if (search) } ;# End foreach } else { ;# Falls keine Struktur vorhanden putlog "Keine Daten gespeichert" ;# Fehler anzeigen } ;# End if } ;# End Procedure
proc del_gusers {handle idx args} { global ug_nick ug_ni ;# Datenstrukturen public definieren
set acmd [lindex $args 0] ;# Befehlszeile extrahieren set unick [lindex $acmd 0] ;# erstes Argument ist Nick if {([info exists ug_nick($unick)])} { ;# wenn der Eintrag existiert unset ug_nick($unick) ;# Array Datenfeld freigeben set out [open $ug_ni(datafile) w] ;# Datenfile im w modus öffnen (überschreiben) foreach search [array names ug_nick] { ;# durchlaufen der Daten arrays if {$search != 0} { ;# wenn keine leere Zeile set snick $search ;# Nick extrahieren set sgreet $ug_nick($search) ;# Gruß extrahieren set output "$snick $sgreet" ;# Output montieren puts $out $output ;# Zeile schreiben } ;# End if (search) } ;# End Foreach close $out ;# Datei schließen putlog "User $unick aus $ug_ni(datafile) gelöscht" ;# Löschmeldung } else { ;# Falls nick nicht vorhanden putlog "User $unick ist nicht gespeichert!" ;# Infomeldung } ;# End if (info) } ;# End Procedure
proc ug:nick {nick uhost hand chan} { global ug_nick ug_ni ;# oben definierte Arrays global setzen if {![ug:active $chan]} { return 0 } ;# falscher channel: nix machen
# Schleifenbeginn: Liste der Nicks durchlaufen. "search" = aktueller Nick foreach search [array names ug_nick] { if {([string tolower $search] == [string tolower $nick])} { putserv "PRIVMSG $chan :$ug_nick($search)" } ;# end if string match } ;# end foreach search } ;# end procedure
proc ug:nickn {nick uhost hand chan newnick} { global ug_nick ug_ni ;# oben definierte Arrays global setzen set nick $newnick ;# nick = newnick if {![ug:active $chan]} { return 0 } ;# falscher channel: nix machen
# Schleifenbeginn: Liste der definierten Begriffe durchlaufen. "search" = aktueller Nick foreach search [array names ug_nick] { if {([string tolower $search] == [string tolower $nick])} { putserv "PRIVMSG $chan :$ug_nick($search)" } ;# end if string match } ;# end foreach search } ;# end procedure
proc ug:active {chan} { foreach setting [channel info $chan] { ;# "channel info" ist ein TCL Befehl! if {[regexp -- {^[\+-]} $setting]} { if {$setting == "+usergreet"} { return 1 } } } return 0
}
putlog "Usergreet $ug_ni(version) von Daishi (Stand: 10.3.04) geladen" putlog "Eingabe von \.greethelp zeigt Bedienungshinweise an"