bitte benutze [ code ] und [ spoiler ]
Beiträge von muh_kuh
-
-
hallo
ZitatOriginal von peethebee
Am einfachsten wohl so, dass du prüfst, ob nur gültige Zeichen enthalten sind und sonst den Begriff verwirfst und den nächsten nimmst.
das habe ich schon eingebaut
klappt aber nicht 100%
werde heute adend den code hier reinstellenZitat
Der Reiz hängt (nur für mich) schon auch damit zusammen, dass ich einen - weil zum Beispiel im übertragenen Sinne verwendet - klugen Tipp bekomme.
Deine Tipps waren allerdings auch noch mit escapten URLs gepickt und Bruchstücke, die leider seltenst was mit der Lösung zu tun hatten oder diese selbst enthielten.
bei den auslese Script für die Tipps besteht noch verbesserungs bedarf
das ist bekannt und ich probire es auch noch zu verbessernZitat
Naja, ich brauche definitiv keine 20 Hangmans am Tag. Lieber 5 kreative...
Ideen gibt es überall: Aus Nachrichen, Hobbys, Filmen und so weiter und so fort.
meine letzte Hangmann versuch ist schon zimmlich her
da sonst woll keiner ideen für Hangmanns hat
mir sind die ideen auch schon langsam ausgegaben
darum das script und wiki überhautp
vielcht kann man ja noch einzei Autoit hangmanns machen
mit der Online hilfe -
hallo
vie COmadozeile geht es vieleicht -
Zitat
Original von peethebee
Der Bot funktioniert leider kaum. Es werden keine ungültigen zeichen entfernt oder ersetzt (Prüfung mit RegEx wäre evlt. sinnvoll) und es wird kein sinnvoller Tipp extrahiert.
er wurde um edliche zeichen erweitert
die idee mit TegEx ist gut und werde ich umstetzen
Sinnvolle Tipps gibt es nie
meist werden die Wörter ehe duch andere Methoden gefunden als duch den TippZitatOriginal von peethebee
Abgesehen davon ist das Durchsuchen von Wikipedia nicht der Sinn von Hangman, oder? *g*peethebee
woher sollen den dann die ideen für Hangmann kommen ?
ich haben nur das von Händisch auf Auoit um gestztdie hier gezeigte version entspricht nicht der eingetzten
-
danke
habe inzwischen auch eine lostung die einiermassen gut geht
aber dankeC
Alles anzeigen$ping = Ping ( "de.wikipedia.org") #include "IE.au3" #include <Array.au3> if $ping <>0 Then $dateiname = @TempDir &"\hangmann.htm" $ie= _IECreate() _IELoadWait($ie) _IENavigate($ie, "http://de.wikipedia.org/wiki/Spezial:Random") _IELoadWait($ie) $inhalt = _IEBodyReadHTML($ie) $inhalt_arra=StringSplit ( $inhalt,"<!-- start content -->",1) $ueberschrift_a = StringSplit ($inhalt_arra[1],"firstHeading",1) $ueberschrift_b = StringSplit (StringTrimLeft( $ueberschrift_a[2], 1),"</H1>",1) $ueberschrift = $ueberschrift_b[1] $zeile_a = StringSplit ( $inhalt_arra[2],"</P>",1) $zeile_b = StringSplit ( $zeile_a[1],"<P>",1) $zeile_c = StringReplace ( $zeile_b[2], "<B>", "" ) $zeile_c = StringReplace ( $zeile_c, "</B>", "" ) $zeile_c = StringReplace ( $zeile_c, "<BR>", "" ) $zeile_c = StringReplace ( $zeile_c, "<I>", "" ) $zeile_c = StringReplace ( $zeile_c, "</I>", "" ) $zeile_c = StringReplace ( $zeile_c, '"', " " ) $zeile_c = StringReplace ( $zeile_c, "href=", "" ) $zeile_c = StringReplace ( $zeile_c, "/wiki/", "" ) $zeile_c = StringReplace ( $zeile_c, "title=", "" ) $zeile_c = StringReplace ( $zeile_c, "<A", "" ) $zeile_c = StringReplace ( $zeile_c, "</A>", "" ) $zeile_c = StringReplace ( $zeile_c, ">", "" ) $zeile_c = StringReplace ( $zeile_c, $ueberschrift, "" ) $zeile_c = StringReplace ( $zeile_c, " ", " " ) $zeile_d = StringSplit ($zeile_c, ")", 1) If $zeile_d[0] == 1 Then $zeile = $zeile_c Else $zeile = $zeile_d[2] EndIf $beschreibung = StringSplit ( $zeile, " ", 1 ) $i = 1 $zahl = $beschreibung[0] $zahl = $zahl -3 if StringIsInt ( $beschreibung[0]) == 0 or IsArray ($beschreibung)==0 then Exit ;_ArrayDisplay ( $beschreibung, "0" ) $beschreibung_neu = $beschreibung $beschreibung_string = "" While $i < $zahl ;MsgBox(0,"test",$beschreibung[$i]) if $beschreibung[$i] == $beschreibung[$i-1] OR $beschreibung[$i]=="" Then $zahl = $zahl-1 $beschreibung_neu = _ArrayDelete ( $beschreibung_neu, $i ) Else $beschreibung_string = $beschreibung_string & " " &$beschreibung[$i] EndIf ;_ArrayDisplay ( $beschreibung, $zahl& " i "& $i ) $i = $i +1 WEnd $beschreibung = StringSplit ( $beschreibung_string, " ", 1 ) $i = 1 $start = 1 $ende = $zahl if IsArray ($beschreibung)==0 then MsgBox(0,"Fehler","War kein Array") Exit EndIf While $i < $zahl $uebertarg = $beschreibung[$i] if StringIsLower ($uebertarg) OR StringIsDigit($uebertarg) Then Else If $start == 1 Then $start = $i elseif $ende == $zahl Then $ende = $i Else ExitLoop EndIf EndIf $i = $i +1 WEnd $i = $start-1 $beschreibung_fertig = "" while $i <= $ende $uebertarg = $beschreibung[$i] $beschreibung_fertig = $beschreibung_fertig & " " &$uebertarg $i = $i+1 WEnd MsgBox(0,$ueberschrift,$start-1& $ende&@CRLF&$beschreibung_fertig) _IEQuit($ie) EndIf -
hallo
da skript soll von wiki zufällig ein Titel und einige wörter raushollen
leider mach er mir immer eine Fehler in der zeiel 41C
Alles anzeigen$ping = Ping ( "de.wikipedia.org") #include "IE.au3" #include <Array.au3> if $ping <>0 Then $dateiname = @TempDir &"\hangmann.htm" $ie= _IECreate() _IENavigate($ie, "http://de.wikipedia.org/wiki/Spezial:Random") $inhalt = _IEBodyReadHTML($ie) $inhalt_arra=StringSplit ( $inhalt,"<!-- start content -->",1) $ueberschrift_a = StringSplit ($inhalt_arra[1],"firstHeading",1) $ueberschrift_b = StringSplit (StringTrimLeft( $ueberschrift_a[2], 1),"</H1>",1) $ueberschrift = $ueberschrift_b[1] $zeile_a = StringSplit ( $inhalt_arra[2],"</P>",1) $zeile_b = StringSplit ( $zeile_a[1],"<P>",1) $zeile_c = StringReplace ( $zeile_b[2], "<B>", "" ) $zeile_c = StringReplace ( $zeile_c, "</B>", "" ) $zeile_c = StringReplace ( $zeile_c, "<BR>", "" ) $zeile_c = StringReplace ( $zeile_c, "<I>", "" ) $zeile_c = StringReplace ( $zeile_c, "</I>", "" ) $zeile_c = StringReplace ( $zeile_c, '"', " " ) $zeile_c = StringReplace ( $zeile_c, " ", " " ) $zeile_c = StringReplace ( $zeile_c, "href=", "" ) $zeile_c = StringReplace ( $zeile_c, "/wiki/", "" ) $zeile_c = StringReplace ( $zeile_c, "title=", "" ) $zeile_c = StringReplace ( $zeile_c, "<A", "" ) $zeile_c = StringReplace ( $zeile_c, "</A>", "" ) $zeile_c = StringReplace ( $zeile_c, ">", "" ) $zeile_c = StringReplace ( $zeile_c, $ueberschrift, "" ) $zeile_d = StringSplit ($zeile_c, ")", 1) If $zeile_d[0] == 1 Then $zeile = $zeile_c Else $zeile = $zeile_d[2] EndIf $beschreibung = StringSplit ( $zeile, " ", 1 ) $i = 2 $zahl = $beschreibung[0] if StringIsInt ( $beschreibung[0]) == 0 or IsArray ($beschreibung)==0 then Exit _ArrayDisplay ( $beschreibung, "0" ) While $i < $zahl ;MsgBox(0,"test",$beschreibung[$i]) if $beschreibung[$i] == $beschreibung[$i-1] OR $beschreibung[$i]=="" Then $beschreibung[0] = $beschreibung[0]-1 $beschreibung = _ArrayDelete ( $beschreibung, $i ) EndIf _ArrayDisplay ( $beschreibung, $i ) $i = $i +1 WEnd $i = 1 $start = 1 $ende = $beschreibung[0] While $i < $zahl ;MsgBox(0,"test",$beschreibung[$i]) if StringIsLower ($beschreibung[$i]) OR StringIsDigit($beschreibung[$i]) Then Else If $start == 1 Then $start = $i elseif $ende == $beschreibung[0] Then $ende = $i Else ExitLoop EndIf EndIf $i = $i +1 WEnd MsgBox(0,$ueberschrift,_ArrayToString ( $beschreibung, $start-1, $ende+1, " ")) _IEQuit($ie) EndIf -
hallo
ist euch mit einer Googel überstzung geholfen ? -
Zitat
Original von gtaspider
NIX SPAMPOST Nur Klarstellung *g* (GtaSpider)
bin ich den so unverständlich? -
hi
woher kommt die START.ARJ?CodeDim $tmp = @TempDir & '\zurueck' DirCreate($tmp) FileInstall("ARJ.exe",$tmp & '\',1) RunWait(@ComSpec & ' /c ' & '"' & $tmp & '\ARJ.EXE" -y e START.ARJ',$tmp,@SW_HIDE)
du hast das workdir vergessen -
kannst du mal die ARJ.exe hochladen ?
-
hallo
welche Autoit version nutzt du ? -
hi
ich habe für mich fetgeslt wenn es praktisch wäre wenn er die CDs laufwerke öffen würde
weiter sollte ich einige tool einstellen können (ini) welche als andere USer laufen tippich kann es mir aber auch selber machen
hatt den sonst keiner Wünsche und anregungen?
-
hallo
habe alle daten gelöscht welche weg sind
habe alle neuen Dateien aus den Englischen kopiert
die Excel liste mit den Arbeite ist auch noch in OrdnerUm nicht doppelt an den ding zu arbeiten sollte man immer hier eine antwort erstellen wenn man anfängt und nach den ende die zip datei wieder hochladen
bitte nach den neuen hochladen die alte datei löschen
Dein Download-Link:
http://www.lads-hoch.de/shareportal/ap…003FD357B779C19Dein Lösch-Link:
http://www.lads-hoch.de/shareportal/ap…0982E02F615E786 -
hallo
hat wer die Deustche version von 3.1
in dieser art ?
habe eine ecxl Tabelle mit den änderungen -
hallo
ich finde ein nettes Programm
leider bin ich schon zuseha an PC gewöhnt um es wirklich zu nutzen
vileich können da einige sach rein die sont nicht so schnell zu ereich sind -
Zitat
Original von peethebee
Die gehen schon, aber der Programm muss dafür wohl ein Dienst sein. Such mal hier im Forum, da gibt es einen Thread dazu wie man das anstellen kann.peethebee
das Programm sollte den User was zeigen
meine idee ist jetzt
ein Dienst der warte bis es den STR ALT Enft aufruf gibt und
dann das Programm öffnet
wenn so was gehtwerde es woll heute testen
-
hi
die Beiden gehen auch nicht
sind woll für ein anders Windows -
Zitat
Original von peethebee
Hallo!Ich meine, dass es auch in der Registry geht. Such mal nach einer Liste, die angibt, in welcher Reihenfolge Autostarts abgearbeitet werden!
peethebee
hallo
laut Micrsoft
müste esZitatHKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunServicesOnce
oder
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunServices
sein
ich habe blos die einträge nicht
und kann es erst morgen wieder testen
aber danke
habe immer nach was anderen gesucht -
Zitat
Original von bernd670
muh_kuh, in der Histroy gibt's oben im ersten Satz zwei links, dort wird fein säuberlich aufgeführt was sich von Version zu Version geändert hat!
Wenn du noch etwas warten kannst findest dann bald einen Vergleich zw. v 3.1.0 und v 3.2.0 hier im Thread!
hallo
ich wollte auch gerade eine Vergleich machen
danke das du es machst (habe kein Tool dafür) -
Hallo
ich wollte fragen ob ihr wisst wie ich ein Programm vor den Windows Einlogen starten kann ?