User:Sgorjuno: Difference between revisions

From ICO wiki
Jump to navigationJump to search
(Created page with '<source lang="bash"> #!/bin/bash #Autor: Sergei Gorjunov, A21, sgorjuno@itcollege.ee #Versioon 0.2 # # Pildi ühendamine videosse (video-slideshow) # See skript otsib pilte aadre…')
 
No edit summary
Line 1: Line 1:
= Bash =
<source lang="bash">
<source lang="bash">
#!/bin/bash
#!/bin/bash
Line 61: Line 62:
ffplay video.avi
ffplay video.avi
exit 0
exit 0
</source>
= Powershell =
<source lang="powershell">
#Autor: Sergei Gorjunov A21, sgorjuno@itcollege.ee
#Versioon: 0.1
#Skript, mis loob uut kasutajat.
function  CreateUser ($Name, $Password){
    trap {"Error......"; break} #Kui mingid vead on
    $computer = [ADSI]"WinNT://$env:computername"
    $user = $computer.Create("user", $Name)
    $user.SetPassword($Password)
    $user.SetInfo()
    Write-Host "Uus kasutaja on tehtud..."
}
$I=0
$Name = Read-Host "Kirjutage uus kasutaja nimi: "
do{
    $Password = Read-Host "Uus kasutaja pass: "
    $Confirm = Read-Host "Pass veel kord: "
    if ($Password -eq $Confirm){
        $I=1
    }else{
Write-Host "Salasonad on erinevad. Proovi veel kord."
    }
}while($I -eq 0)
CreateUser ($Name, $Password)
</source>
</source>

Revision as of 03:41, 23 May 2011

Bash

#!/bin/bash
#Autor: Sergei Gorjunov, A21, sgorjuno@itcollege.ee
#Versioon 0.2
#
# Pildi ühendamine videosse (video-slideshow)
# See skript otsib pilte aadressist, kopeerib neid töökausta, 
# muudab pildide nimed (001.jpg 002.jpg 003.jpg jne). Järgmiselt 
# ühendab pildid videoks ja kustutab kõik piltide koopiad.
# Kõige parem on kui pildid on ühesuurused.


if [ "$1" = "" ]; then
	echo "Kirjutage kausta aadress mis sisaldab pilte"
	echo "Naiteks: ./script.sh /pildikausta/aadress/"
	echo "-h abi"
	exit 1
fi

if [ "$1" = "-h" ]; then
	echo "Script on lihtne (on vaja ainult 1 argument - pildikausta aadress)"
	exit 0
fi

# ffmpeg kodeki paigaldamine
dpkg --status ffmpeg | grep -q not-installed
if [ $? -eq 0 ]; then
    apt-get install ffmpeg
fi

# töökausta loomine
if [ ! -d "$HOME/video" ]; then
	echo "töökausta loomine..."
	mkdir $HOME/video
# omaniku muutmine
	chown $USER $HOME/video
# ainult omanik saab kasutada kausta
	chmod u+rwx $HOME/video
	chmod g-rwx $HOME/video
	chmod o-rwx $HOME/video
fi

# pildi otsing ja nende kopeerimine töökausta
echo "piltide otsing..."
find $1 -name "*.jpg" -exec cp {} $HOME/video \;

cd $HOME/video
# ümber nimetamine (to format "xxx.jpg")
I=1
for F in *.jpg; do
  mv "$F" `printf %03d.jpg $I` 2>/dev/null || true
  I=$((I + 1))
done
echo "Mille kiirusega kaadrite muuta (minimum ja optimaalne 0.2):"
read KIIRUS
# kogu piltide ühendamine videoks
echo "video loomine..."
ffmpeg -r $KIIRUS -i %03d.jpg video.avi
find -name "*.jpg" -exec rm -rf ./{} \;
# video mängimine
ffplay video.avi
exit 0


Powershell

#Autor: Sergei Gorjunov A21, sgorjuno@itcollege.ee
#Versioon: 0.1
#Skript, mis loob uut kasutajat.

function  CreateUser ($Name, $Password){
    trap {"Error......"; break} #Kui mingid vead on
    $computer = [ADSI]"WinNT://$env:computername"
    $user = $computer.Create("user", $Name)
    $user.SetPassword($Password)
    $user.SetInfo()
    Write-Host "Uus kasutaja on tehtud..."
}

$I=0
$Name = Read-Host "Kirjutage uus kasutaja nimi: "
do{
    $Password = Read-Host "Uus kasutaja pass: "
    $Confirm = Read-Host "Pass veel kord: "
    if ($Password -eq $Confirm){
        $I=1
    }else{
	Write-Host "Salasonad on erinevad. Proovi veel kord."
    }
}while($I -eq 0)
CreateUser ($Name, $Password)