#!/bin/bash
cd ~/.gnome2/
while :; do
COUNTER=0
while [ $COUNTER -lt 60 ]; do
wget http://www.opentopia.com/images/cams/world_sunlight_map_rectangular.jpg -O world.jpg
temp=$(stat -c%s world.jpg)
if [[ $temp > 1000 ]]
then rm world_sunlight_Wallpaper.jpg
mv world.jpg world_sunlight_Wallpaper.jpg
break
fi
sleep 5
let COUNTER=COUNTER+1
done
sleep 3600
done
while [ 1 ]; do
while :; do
Chcel by som si urobiť tento wall: http://gnome-look.org/content/show.php/sunset%2Bsunrise+wallpaper+switcher?content=117661 ,ale neviem ako na to.Poradíte mi niekto?Keď som ten postup zadával do prekladača,tak odtiaľ vychádzali dosť čudné preklady.
#! / Usr / bin / perl
Astro použitia:: Východ;
# Config
$ Dayimg = '~ / tapety / day.jpg';
$ Nightimg = '~ / tapety / night.jpg';
$ Dĺžka = 19,191;
zemepisná šírka $ = 55,555;
# Main
@ Východ = split (/:/, sun_rise ($ zemepisná dĺžka, zemepisná šírka $));
@ Skončení = split (/:/, sun_set ($ zemepisná dĺžka, zemepisná šírka $));
$ = $ Sunrise sunrise [0] + $ sunrise [1] / 60;
$ = $ Západe slnka [0] + $ západe slnka [1] / 60;
@ Time = localtime (time);
$ Time = $ time [2] + $ time [1] / 60;
$ Day = (($ východom <$ time) & & ($ time <$ západu slnka))? 1: 0;
$ Img = $ den? $ Dayimg: $ nightimg;
system ( "gconftool-t string-s / desktop / gnome / pozadia / picture_filename $ img");
#!/usr/bin/perl
use Astro::Sunrise;
# config
$dayimg = '~/desktop/gnome/background/picture_filename/day.jpg';
$nightimg = '~/desktop/gnome/background/picture_filename/night.jpg';
$longitude = 19,1919;
$latitude = 51,5151;
# main
@sunrise = split(/:/,sun_rise($longitude,$latitude));
@sunset = split(/:/,sun_set($longitude,$latitude));
$sunrise = $sunrise[0] + $sunrise[1] / 10 ;
$sunset = $sunset[0] + $sunset[1] / 10 ;
@time = localtime(time);
$time = $time[2] + $time[1] / 10;
$day = (($sunrise < $time) && ($time < $sunset)) ? 1 : 0;
$img = $day ? $dayimg : $nightimg;
system("gconftool -t string -s /desktop/gnome/background/picture_filename $img");
*/10 * * * * ~/.gnome2/nautilus-scripts/setbg.pl
Môže mi prosím niekto pomôcť?
crontab -e
a vložíš toto*/10 * * * * ~/.gnome2/nautilus-scripts/setbg.pl
kde upravíš cestu podle toho, kde ten skript máš. Pak si skript přidáš do aplikací spouštěných po startu systému, aby se tapeta vyměnila hned po loginu.
#!/usr/bin/perl
use Astro::Sunrise;
# config
$dayimg = '~/home/Radko/Tapety/day.jpg';
$nightimg = '~/home/Radko/Tapety/night.jpg';
$longitude = 17,1245;
$latitude = 48,1531;
# main
@sunrise = split(/:/,sun_rise($longitude,$latitude));
@sunset = split(/:/,sun_set($longitude,$latitude));
$sunrise = $sunrise[0] + $sunrise[1] / 60 ;
$sunset = $sunset[0] + $sunset[1] / 60 ;
@time = localtime(time);
$time = $time[2] + $time[1] / 60;
$day = (($sunrise < $time) && ($time < $sunset)) ? 1 : 0;
$img = $day ? $dayimg : $nightimg;
system("gconftool -t string -s /desktop/gnome/background/picture_filename $img");
bash: =: príkaz nenájdený
radko@radko-desktop:~$
radko@radko-desktop:~$ # main
radko@radko-desktop:~$
radko@radko-desktop:~$ @sunrise = split(/:/,sun_rise($longitude,$latitude));
bash: chyba syntaxe neďaleko neočakávaného tokenu „(“
radko@radko-desktop:~$ @sunset = split(/:/,sun_set($longitude,$latitude));
bash: chyba syntaxe neďaleko neočakávaného tokenu „(“
radko@radko-desktop:~$
radko@radko-desktop:~$ $sunrise = $sunrise[0] + $sunrise[1] / 60 ;
bash: =: príkaz nenájdený
radko@radko-desktop:~$ $sunset = $sunset[0] + $sunset[1] / 60 ;
bash: =: príkaz nenájdený
radko@radko-desktop:~$
radko@radko-desktop:~$ @time = localtime(time);
bash: chyba syntaxe neďaleko neočakávaného tokenu „(“
radko@radko-desktop:~$ $time = $time[2] + $time[1] / 60;
bash: =: príkaz nenájdený
radko@radko-desktop:~$
radko@radko-desktop:~$ $day = (($sunrise < $time) && ($time < $sunset)) ? 1 : 0;
bash: chyba syntaxe neďaleko neočakávaného tokenu „(“
radko@radko-desktop:~$
radko@radko-desktop:~$ $img = $day ? $dayimg : $nightimg;
bash: =: príkaz nenájdený
radko@radko-desktop:~$
radko@radko-desktop:~$ system("gconftool -t string -s /desktop/gnome/background/picture_filename $img");
bash: chyba syntaxe neďaleko neočakávaného tokenu „"gconftool -t string -s /desktop/gnome/background/picture_filename $img"“
radko@radko-desktop:~$
radko@radko-desktop:~$ '/home/radko/.gnome2/nautilus-scripts/setbg.pl'
Can't locate Astro/Sunrise.pm in @INC (@INC contains: /etc/perl /usr/local/lib/perl/5.10.0 /usr/local/share/perl/5.10.0 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.10 /usr/share/perl/5.10 /usr/local/lib/site_perl .) at /home/radko/.gnome2/nautilus-scripts/setbg.pl line 3.
BEGIN failed--compilation aborted at /home/radko/.gnome2/nautilus-scripts/setbg.pl line 3.
radko@radko-desktop:~$
sudo cpan -i Astro::Sunrise
Zadej do termináluPo zadaní príkazu sa spustila inštalácia. Ale,keď som script dal znova do terminálu,aby sa spustil,zmenila sa obrazovka na čiernu.V termináli sa už nič nevypisovalo. Nakoniec tu je výpis: CPAN.pm: Going to build R/RK/RKHILL/Astro-Sunrise-0.91.tar.gzKód: [Vybrat]sudo cpan -i Astro::Sunrise
Ten skript už by měl fungovat, ale nejspíš tam máš špatně zadanou cestu k obrázku, když tapeta zmizela.Už to ide. Ďakujem za tvoj vzácny čas a za to,že si poukázal na moje nedostatky v používaní Linuxu.Práve teraz som zahíbený vo výuke "Terminálu".
Už to vidim, máš tam navíc "home/Radko", nebo naopak znak "~", který nahrazuje právě cestu do uživatelova home adresáře. Navíc ta máš "Radko", místo "radko", takže si tam raději dej:
~/Tapety/day.jpg
~/Tapety/night.jpg
wget http://www.opentopia.com/images/cams/world_sunlight_map_rectangular.jpg -O world.jpg
(http://zvlastni.borec.cz/uploads/world.jpg)convert world.jpg -crop 1600x722-0-0 +repage out.jpg
Ešte raz sa musím prihlásiť o pomoc s mojími wall.Oni/tie tapety/ sa vymenia,iba keď kliknem na ten script.Samé podľa času sa nemenia.V čom by mohol byť prosím ťa problém? ĎakujemNevím jak vám, ale mě se na obrázku zobrazuje pruh Antarktidy odlišně.
Ten obrázek se generuje automaticky z více snímků, asi nějaký ten díl zrovna dorazil poškozený, časem se vymění.
Problém je v tom, že když skript spustí cron, nefunguje zápis do gconf. Zatím nevím proč, ale můžeš skript změnit takto:Ešte raz sa musím prihlásiť o pomoc s mojími wall.Oni/tie tapety/ sa vymenia,iba keď kliknem na ten script.Samé podľa času sa nemenia.V čom by mohol byť prosím ťa problém? ĎakujemNevím jak vám, ale mě se na obrázku zobrazuje pruh Antarktidy odlišně.
Ten obrázek se generuje automaticky z více snímků, asi nějaký ten díl zrovna dorazil poškozený, časem se vymění.
#!/usr/bin/perl
use Astro::Sunrise;
# config
$dayimg = 'day.jpg';
$nightimg = 'night.jpg';
$longitude = 17,1245;
$latitude = 48,1531;
# main
@sunrise = split(/:/,sun_rise($longitude,$latitude));
@sunset = split(/:/,sun_set($longitude,$latitude));
$sunrise = $sunrise[0] + $sunrise[1] / 60;
$sunset = $sunset[0] + $sunset[1] / 60;
@time = localtime(time);
$time = $time[2] + $time[1] / 60;
$day = (($sunrise < $time) && ($time < $sunset)) ? 1 : 0;
$img = $day ? $dayimg : $nightimg;
system("cp ~/Tapety/$img ~/Tapety/tapeta");
pak napiš do terminálucp ~/Tapety/night.jpg ~/Tapety/tapeta
abash -c "gconftool -t string -s /desktop/gnome/background/picture_filename "~/Tapety/tapeta""
radko@radko-desktop:~$ cp ~/Tapety/Night ~/Tapety/tapeta
cp: nie je možné stat() `/home/radko/Tapety/Night': No such file or directory
radko@radko-desktop:~$ gconftool -t string -s /desktop/gnome/background/picture_filename "~/Tapety/tapeta"
radko@radko-desktop:~$
Zrovna jsem to přepsal, vloudily se mi chybičky při přepisu. Jak skript, tak ten první příkaz.Nereaguje.
Zrovna jsem to přepsal, vloudily se mi chybičky při přepisu. Jak skript, tak ten první příkaz.Nereaguje.
cp ~/Tapety/day.jpg ~/Tapety/tapeta
Měla by se tapeta změnit na denní a do deseti minut by se měla změnit automaticky na noční, pokud to máš správně.
Všetko som to prekontroloval pre istotu ešte raz,ale nič.Zrovna jsem to přepsal, vloudily se mi chybičky při přepisu. Jak skript, tak ten první příkaz.Nereaguje.
Co nereaguje? Susť v termináluKód: [Vybrat]cp ~/Tapety/day.jpg ~/Tapety/tapeta
Měla by se tapeta změnit na denní a do deseti minut by se měla změnit automaticky na noční, pokud to máš správně.
Parádní, dík.
Hustý by bylo, kdyby se aktuální obraz zeměkoule objevil jako pozadí už pod oknem LOGIN a měnil by se i když by nebyl nikdo přihlášen i při LOCK. To by mé winkolegy položilo...
:-)
Všimli jste si, že zatímco světlo jde plynule, mraky se obnovují pomaleji? Konkrétně včera co jsem to měl od poledne byli mraky pořád stejný. V noci nevím, protože jsem na to zapomněl. A dnes se fronta nad Evropou a Ruskem spojila. Antarktida a jiné oblasti mi přídou stejný. Těžko říct. Obnovuje to vůbec mraky nebo to jen posouvá svit Slunce?
Od pondělka do pátka jsem dělal snímky každou hodinu a pak jsem vytvořil video, obnova mraků nad evropou je pomalejší než nad amerikou.
Video je ke stažení zde (http://zvlastni.borec.cz/uploads/world1.avi)
Od pondělka do pátka jsem dělal snímky každou hodinu a pak jsem vytvořil video, obnova mraků nad evropou je pomalejší než nad amerikou.
Video je ke stažení zde (http://zvlastni.borec.cz/uploads/world1.avi)
místoKód: [Vybrat]while [ 1 ]; do
používatKód: [Vybrat]while :; do
while sleep $n; do $neco; done
## misto
while :; do $neco; sleep $n; done
Průměrně uvažující programátor nedělá zásadní konceptuální chyby a píše:Kód: [Vybrat]while sleep $n; do $neco; done
## misto
while :; do $neco; sleep $n; done
while sleep 3600; do VymenTapetu; done
???
parádní návod, už jsem to někde viděl ale tam to vypadalo o dost složitěji...tohle je pár vteřin!
Jen možná k bodu 4, mělo by stačít script místo logoutu jen spustit.
Průměrně uvažující programátor nedělá zásadní konceptuální chyby a píše:Kód: [Vybrat]while sleep $n; do $neco; done
## misto
while :; do $neco; sleep $n; done
To myslíš vážně a doporučuješ tento konkrétní skript předělat tak, aby tam byloKód: [Vybrat]???
while sleep 3600; do VymenTapetu; done
wget http://www.opentopia.com/images/cams/world_sunlight_map_rectangular.jpg -O /home/svoboda/Pictures/Wallpapers/world_sunlight_map_rectangular.jpg
Opravdu stačí jen jednořádkový skript do /etc/cron.hourly/wallpaperKód: [Vybrat]wget http://www.opentopia.com/images/cams/world_sunlight_map_rectangular.jpg -O /home/svoboda/Pictures/Wallpapers/world_sunlight_map_rectangular.jpg
Každou hodinu se obrázek přepíše, Gnome je natolik inteligentní, že změnu hned registruje a zobrazenou tapetu aktualizuje. Jakýkoliv jiný postup se mi zdá zbytečně složitý.
ja mam na plose neco podobneho, akorat ten vysledny wallpaper se vytvori z nekolika map primo na pocitaci
vice viz. http://www.linuxexpres.cz/software/xplanet-planeta-zeme-na-vasi-plose
zabere to nejaky cas poradne nastavit, ale pak je to imo hezci
ja mam na plose neco podobneho, akorat ten vysledny wallpaper se vytvori z nekolika map primo na pocitaci
vice viz. http://www.linuxexpres.cz/software/xplanet-planeta-zeme-na-vasi-plose
zabere to nejaky cas poradne nastavit, ale pak je to imo hezci
Díky za tip. Už to mám na ploše ;D Akrát bych se Tě chtěl zeptat, zda nevíš jak udělat, aby se "koule" otáčela. ???
Protože zatím se posouvá jen poměr den/noc. Takže ve výsledku by byla koule více-méně rozdělena na 2 poloviny a otáčela by se, aby se poměr zachoval. Už jsem přemýšlel nad nějakým algoritmem, ale nic konstruktivního jsem zatím nevymyslel :(
Díky za jakékoliv nápady.
http://www.webupd8.org/2010/03/earth-on-carbon-fiber-automatically.html
convert world.jpg -crop 1600x800+800+0 +repage -resize 300 1.png
convert 1.png -crop 300x300-15-15 +repage 1.png
convert -size 1680x1050 xc:black -page +1082+401 1.png -page +0+0 wscarbonfiberd.png -flatten world.jpg
http://ubuntued.info/wallpaper-da-terra-sob-fibra-de-carbono
nebo rovnou na stránkách WEBUPD8:The last command will apply the wallpaper and put the script in your startup applications. Alternatively, you may download the .zip file from Claudio's website.S pozdravem Malajda.
Note: the wallpaper applied will have an 1680x1080 screen resolution and if you don't have this resolution and the wallpapers looks weird, you can tweak it by right clicking on your Desktop and selecting "Change Desktop background", and play with the "Style" options (for my 1980x1080 resolution I've used the "Zoom" option).
V adresáři ~/WallpaperReal/Globo_CarbonFiber
je skript GloboCarbon.sh
najdi řádky s:Kód: [Vybrat]convert world.jpg -crop 1600x800+800+0 +repage -resize 300 1.png
convert 1.png -crop 300x300-15-15 +repage 1.png
convert -size 1680x1050 xc:black -page +1082+401 1.png -page +0+0 wscarbonfiberd.png -flatten world.jpg
a změň je na své rozlišení :)
Zatím jsem to nezkoušel, ale předešlé verze(earth wallpaper v tomto topicu) fungují na tomto principu :)
Možná se dozvíš nějaké informace na stránkách projektu:Kód: [Vybrat]http://ubuntued.info/wallpaper-da-terra-sob-fibra-de-carbono
nebo rovnou na stránkách WEBUPD8:CitaceThe last command will apply the wallpaper and put the script in your startup applications. Alternatively, you may download the .zip file from Claudio's website.S pozdravem Malajda.
Note: the wallpaper applied will have an 1680x1080 screen resolution and if you don't have this resolution and the wallpapers looks weird, you can tweak it by right clicking on your Desktop and selecting "Change Desktop background", and play with the "Style" options (for my 1980x1080 resolution I've used the "Zoom" option).
2. proč osvětlená plocha zeměkoule je přibližbě stejně jasná, když by zákonitě měla být daleko osvětlenější tam, kde sluneční paprsky dopadají kolmo a pozvolna by se měl jas snižovat až do krajů. Takhle to vypadá, že prostě ráno začne během dvaceti minut slunce svítit a svítí to stejně až do setmění... :-)
Obdobně by to mělo být s tmou a měsícem, ale to už neřeším, stejně jako odlesk slunka v moři a jiných vodách...
Atmosféra (spolu s prachem a jinými částicemi) stvětlo ze slunce rozkládá, takže je přivrácená strana země osvícená přibližně rovnoměrně.
Kazdych 10 minut se nam pozadi bude menit dle realneho pohledu na nasi planetu
--16:52:35-- http://static.die.net/earth/mercator/1024.jpg
=> `world.jpg'
Překládám static.die.net… 209.151.236.22
Navazuje se spojení s static.die.net|209.151.236.22|:80… spojeno.
HTTP požadavek odeslán, program čeká na odpověď ... 200 OK
Délka: 37 [image/gif]
100%[====================================>] 37 --.--K/s
16:52:36 (2.31 MB/s) – „world.jpg“ uloženo [37/37]
file TenSoubor
?
wget http://www.opentopia.com/images/data/sunlight/world_sunlight_map_rectangular.jpg -O world.jpg
A co tohle?
http://linuxpoison.blogspot.com/2010/10/real-time-sunlight-earth-wallpaper-for.html (http://linuxpoison.blogspot.com/2010/10/real-time-sunlight-earth-wallpaper-for.html)