Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
Autor |
Nachricht |
till •--->
Anmeldedatum: 21.04.2005 Beiträge: 187 Wohnort: q-town (R-P)
|
Verfasst am: 21.02.2006 - 18:35 Titel: itunes lyric |
|
|
das script sucht nach dem current Song von itunes
mithilfe von google udn safari.
Readme:
- script starten wenn man den text des aktuellen titels haben will
- link auf google auswählen
- text kopieren
- text in vorgabefeld einfügen
- ok drücken
- der songtext ist nun in der info des liedes (rechtsklick /information / liedtext) zu finden
- ebenso wird dem Titel folgender kommentar hinzugefügt: +SONGTEXT+
( für intelligente wiedergabelisten zB!)
DA ->
Zitat: |
tell application "iTunes"
set current to current track
get name of current
set ply to name of current
get lyrics of current
set vorhand to lyrics of current
set auswahl to current
if lyrics of current is "" then
tell application "Safari"
open
set leadURL to "http://www.google.de/search?hl=de&q=lyric+" & ply & "&btnG=Suche&meta="
open location leadURL
end tell
set temp to display dialog " Lyric einfügen:" default answer "wenn sie keinen Songtext finden/wollen lassen sie das hier stehen"
set textEntered to text returned of temp
set lyrics of auswahl to textEntered
else
display dialog "Text von: " & name of auswahl & " - " & artist of auswahl & "
----------------------------" & "" default answer vorhand
end if
if lyrics of auswahl is "wenn sie keinen Songtext finden/wollen lassen sie das hier stehen" then
set lyrics of auswahl to ""
set comment of auswahl to ""
else
set comment of auswahl to "+SONGTEXT+"
end if
end tell
|
* soll einfach ein einfaches script sein,dass wenn man mal den text des aktuellen Songs haben will, man nur das script starten ( ich habs als .app im dock liegen) muss und nicht ins Dashboard /google gehn muss dann kopieren und wieder ins itunes und info öffnen und liedtext öffnen und einfügen usw.. ihr wisst schon was ich meine oder? _________________ ein berühmter Philosoph (<-Ich) sagte einmal:
" es ist nicht das Problem was uns Kopfzerbrechen macht,
es ist der Kopf selbst, der sich erdrückt" |
|
Nach oben |
|
|
till •--->
Anmeldedatum: 21.04.2005 Beiträge: 187 Wohnort: q-town (R-P)
|
Verfasst am: 23.02.2006 - 12:00 Titel: |
|
|
so da iss das ganze etwas schöner und einfacher!
www.ts-smallapps.de.vu
bitte um kommentare! _________________ ein berühmter Philosoph (<-Ich) sagte einmal:
" es ist nicht das Problem was uns Kopfzerbrechen macht,
es ist der Kopf selbst, der sich erdrückt" |
|
Nach oben |
|
|
spirigwi •----->
Anmeldedatum: 10.07.2003 Beiträge: 1517 Wohnort: Olten-CH
|
Verfasst am: 23.02.2006 - 13:27 Titel: |
|
|
till hat Folgendes geschrieben: | bitte um kommentare! | super!
auch wenn ich es nie brauchen werde:
aber: die Idee der Web-Verknüpfung für Appleskripts! toll!
und endlich macht wieder einer mit: das pool ist doch in erster Linie ein Dikussionsforum für komplexe Skripte, man kann hier gar nicht genug "Senf dazugeben" als Skripter erhalten, das hilft enorm weiter.
PS: Das wäre dann sehr unfair!
Wenn diese Bedingung erfüllt, Gratuliere! _________________ Skript-Fan => ein � -Fan =>Scr¿¿-KongFuSius_Kurpfusius
Zuletzt bearbeitet von spirigwi am 25.02.2006 - 20:00, insgesamt 4-mal bearbeitet |
|
Nach oben |
|
|
till •--->
Anmeldedatum: 21.04.2005 Beiträge: 187 Wohnort: q-town (R-P)
|
Verfasst am: 23.02.2006 - 16:28 Titel: |
|
|
und das aus deinem Munde!!!
das hab ich gebraucht!
tell humanbeing "till"
set gesichtsausdruck to
end tell
danke _________________ ein berühmter Philosoph (<-Ich) sagte einmal:
" es ist nicht das Problem was uns Kopfzerbrechen macht,
es ist der Kopf selbst, der sich erdrückt" |
|
Nach oben |
|
|
spirigwi •----->
Anmeldedatum: 10.07.2003 Beiträge: 1517 Wohnort: Olten-CH
|
Verfasst am: 23.02.2006 - 18:06 Titel: |
|
|
till hat Folgendes geschrieben: | humanbeing | danke dir!
siehste, da werd ich ja schon frech vor Freude:
Könntest du nicht noch mit dem Codeformatter von Snow herumwerkeln?
dann sähe man dein Skript schon im pool farbig glänzen!
(wäre dann viel leichter zu beurteilen)
PS: Das wäre dann sehr unfair! _________________ Skript-Fan => ein � -Fan =>Scr¿¿-KongFuSius_Kurpfusius
Zuletzt bearbeitet von spirigwi am 25.02.2006 - 20:01, insgesamt 2-mal bearbeitet |
|
Nach oben |
|
|
till •--->
Anmeldedatum: 21.04.2005 Beiträge: 187 Wohnort: q-town (R-P)
|
Verfasst am: 23.02.2006 - 18:21 Titel: |
|
|
das wäre schon zu viel des guten...
bei einem kollegen von mir funzt dass app ( www.ts-smallapps.de.vu )
nicht. bzw es blinkt kurz im dock un schließt dann wieder...
er hat aber genau wie ich 10.4 un das app 10.2 + _________________ ein berühmter Philosoph (<-Ich) sagte einmal:
" es ist nicht das Problem was uns Kopfzerbrechen macht,
es ist der Kopf selbst, der sich erdrückt" |
|
Nach oben |
|
|
spirigwi •----->
Anmeldedatum: 10.07.2003 Beiträge: 1517 Wohnort: Olten-CH
|
Verfasst am: 23.02.2006 - 18:26 Titel: |
|
|
Dann übernehm ich CodeFormatter
die Leute des Zitat: | 10.4 un das app 10.2 + | den Rest. OK?
Vorschlag:
ich poste hier dein farbig formatiertes Skript, Du öffnest ein "zitat"-Fenster im Forum, kopiertst das so formatierte Skript heraus und fügst es nach "edit"- über deine Version ein . Der Inhalt bleibt damit gleich, ist aber farbig formatiert. Anschl. wirst "zitat"--Skript löschen(da unnötig) ich kann anschl. meines wieder löschen(resp auf ganz klein reduzieren). Versuchs mal:
--> ab hier aus dem "Zitat-Fenster" kopieren
Zitat: | tell application "iTunes"
set current to current track
get name of current
set ply to name of current
get lyrics of current
set vorhand to lyrics of current
set auswahl to current
if lyrics of current is "" then
tell application "Safari"
open
set leadURL to "http://www.google.de/search?hl=de&q=lyric+" & ply & "&btnG=Suche&meta="
open location leadURL
end tell
set temp to display dialog " Lyric einfügen:" default answer "wenn sie keinen Songtext finden/wollen lassen sie das hier stehen"
set textEntered to text returned of temp
set lyrics of auswahl to textEntered
else
display dialog "Text von: " & name of auswahl & " - " & artist of auswahl & "
----------------------------" & "" default answer vorhand
end if
if lyrics of auswahl is "wenn sie keinen Songtext finden/wollen lassen sie das hier stehen" then
set lyrics of auswahl to ""
set comment of auswahl to ""
else
set comment of auswahl to "+SONGTEXT+"
end if
end tell |
--> Bis hier aus dem "Zitat-Fenster" kopieren
PS. womit wir soeben den human-CodeFormatter erfunden hätten
PS:PS: Das wäre dann sehr unfair! _________________ Skript-Fan => ein � -Fan =>Scr¿¿-KongFuSius_Kurpfusius
Zuletzt bearbeitet von spirigwi am 25.02.2006 - 19:57, insgesamt 3-mal bearbeitet |
|
Nach oben |
|
|
till •--->
Anmeldedatum: 21.04.2005 Beiträge: 187 Wohnort: q-town (R-P)
|
Verfasst am: 24.02.2006 - 01:35 Titel: |
|
|
SO jetzt aber!
bin zu müde um des zu verstehn und außerdem geh ich jetzt mal penne hab morgen schule *freu*
tell humanbeing "till"
tell "spirigwi"
display dialog "Mensch das ist ja noch das alte script"
set ProgramWelchesIchMeine to "das hier -> www.ts-smallapps.de.vu"
end tell
display dialog "GUTE NACHT--Ich glaub ich mach micham Wochenende gleich mal ein script das einen text in Scriptsprach umsetzt!"
end tell _________________ ein berühmter Philosoph (<-Ich) sagte einmal:
" es ist nicht das Problem was uns Kopfzerbrechen macht,
es ist der Kopf selbst, der sich erdrückt" |
|
Nach oben |
|
|
till •--->
Anmeldedatum: 21.04.2005 Beiträge: 187 Wohnort: q-town (R-P)
|
Verfasst am: 25.02.2006 - 02:43 Titel: |
|
|
<- verweise auf pool hab mal mit dem text to applescript script angefangen
nur is meine formatierung kaputt gegangen ! ich komm mit dme snow seinem codeformatter nid klar ich bekomme immer
"es war leider nichts ausgewählt"! -> ja war aber _________________ ein berühmter Philosoph (<-Ich) sagte einmal:
" es ist nicht das Problem was uns Kopfzerbrechen macht,
es ist der Kopf selbst, der sich erdrückt" |
|
Nach oben |
|
|
spirigwi •----->
Anmeldedatum: 10.07.2003 Beiträge: 1517 Wohnort: Olten-CH
|
Verfasst am: 25.02.2006 - 11:05 Titel: |
|
|
Kannst du schnell herhören:
Wenn du mir versprichst, dass wir nachher gemeinsam alle nun folgenden Beiträge (und wenige vorherige) zusammen wieder löschen, um dein pool anliegen unverfälscht in kürzest möglicher Form darzustellen, kann ich versuchen dir mit CodeFormatter weiterzuhelfen versuchen:
till hat Folgendes geschrieben: | "es war leider nichts ausgewählt"! -> ja war aber |
1) Da hast du einen AS-Text ausgewählt, der nicht in einem SkriptEditor Fenster liegt?
2) Das " • CodeFormatter 3.0" file muss so liegen:
set PFAD to ((first item of (list disks)) as string) & ":" & ¬
"Users:mcfmserver:Library:Scripts:"
3) es muss über ein Script-Menu aufgerufen werden und nicht direkt aus dem geöffneten
• CodeFormatter 3.0-AppleSkript!
PS:PS: Das wäre dann sehr unfair! _________________ Skript-Fan => ein � -Fan =>Scr¿¿-KongFuSius_Kurpfusius
Zuletzt bearbeitet von spirigwi am 25.02.2006 - 19:56, insgesamt einmal bearbeitet |
|
Nach oben |
|
|
|