Fischer-Bayern.de
 FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen   RegistrierenRegistrieren 
 ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin 

Freitagsritual

 
Neues Thema eröffnen   Neue Antwort erstellen    Fischer-Bayern.de Foren-Übersicht -> Pool
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
Wolle-77
•--->
•--->


Anmeldedatum: 25.02.2003
Beiträge: 447
Wohnort: Geldern

BeitragVerfasst am: 18.12.2015 - 14:40    Titel: Freitagsritual Antworten mit Zitat

Für's reine Vergnügen öffne ich Freitags folgendes kleines nettes Progrämmchen für eine nette Ablenkung (die sich selbst pünktlich präsentiert):

Code:
property zielroh : "http://www.bildschirmarbeiter.com/pic/bildschirmarbeiter_-_picdump_###datum###/"
global ziel

on run
   set ziel to my austauschen("###datum###", my datum(), zielroh)
end run

on idle
   my check()
   return 30
end idle

on check()
   if (do shell script "curl " & ziel) contains "Leider konnte die angeforderte Seite nicht gefunden werden." then
   else
      open location ziel
      tell me to quit
   end if
end check

on datum()
   return my zeitnormalfnwandlung(current date)
end datum

on zeitnormalfnwandlung(datum)
   return (my fuehrendeNullen(day of datum, 2) & "." & (my fuehrendeNullen((month of datum) as integer, 2) & "." & year of datum)) as string
end zeitnormalfnwandlung

on fuehrendeNullen(Zahl, stellen)
   return text -1 thru -stellen of ("000" & Zahl) as string
end fuehrendeNullen

on austauschen(suchen, ersetzen, theString)
   set my text item delimiters to suchen
   tell me to set theList to every text item of theString
   set my text item delimiters to ersetzen
   return theList as string
end austauschen

_________________
Martin Wolter
--
Apple rocks the planet!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Fischer-Bayern.de Foren-Übersicht -> Pool Alle Zeiten sind GMT + 2 Stunden
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.


Powered by phpBB © 2001, 2002 phpBB Group
Deutsche Übersetzung von phpBB.de


AppleScript für absolute Starter