Click "rec" to record a sound from your build-in microphone. If a certain level of loudness is reached, recording starts. Usefull for live dj performances.

Click to download: LiveLoops

Note: You have to allow the webcam!

Hold a white paper with black (or dark) objects that you painted on it in front of the camera. The red rectangle indicates the tracked area, the green rectangles indicates the tracked objects. Then hit the space-bar (Note: be sure that the flash movie gets the focus)

Check it out!

The flash-app uses the webcam for accessing three different videos. The normal video that we convert into two other videos: A threshold video and a palette video.

The palette video is used for tracking the brightest area in the video and reducing the tracking-area to this area (e.g. the white paper is usual the brightest color in the video, so objects that are in the background aren't tracked any longer). The threshold video is used for tracking the darkest objects within the brightest area.

How does this work? In the treshold video it is supposed that the red pixels are the objects, and coherent pixels belongs to one object. I've implemented a flood fill algorithm that counts the pixel of each object and returns the x,y position and width and height of an object. With this information we can nearly perfectly track the object and use for example the pixelamount for the volume of the sound and the x,y/width,height information for the timeline.

When all objects are tracked and you press the Space-Bar the tracked area is converted into a matrix of 16x16 fields. Each field represents a sound, fields that are lower plays a lower sound, fields that are higher a higher one. The timeline goes from left to right.

The source code is available here: ToneMatrixSource

In our course Computergraphics I've developed an implementation of QuadTrees for Actionscript 3. A QuadTree is a datastructure for increasing the efficiency of collisiondetection or nearest neighbour appointment.

Wiki

You can enable the collisiondetection by hitting a "C" and switch between QuadTree and Bruteforce by hitting Space. The amount of objects can be changed by typing it in the field labeled with 50.
SourceCode: QuadTreeSource

Mein erster Blick fiel auf WebORB mit dem passenden Flex Plugin indem man sehr einfach die einzelnen Modells und somit die Datenbank ansprechen kann. (http://sujitreddyg.wordpress.com/2009/10/13/ruby-on-rails-extension-for-flash-builder-4/)

Hier habe ich zwar Zugriff auf das UserSession-Modell von authlogic, jedoch nicht auf die aktuelle Session und somit die eingeloggten User. Die Cookies und Sessions werden erst im UserSessionsController festgelegt.

Um nun in der Flex Anwendung zu wissen "Ist der User eingeloggt" und wenn ja "Welcher User bist du denn?" erweitert man den UserSessions Controller um folgende Methode:

def checkLogin
if logged_in?
xml = "
<usersessions>
<login>true</login>
<currentid>#{current_user_session.user.id}</currentid>
</usersessions>"
else
xml = "
<usersessions>
<login>false</login>
<currentid>false</currentid>
</usersessions>"
end
respond_to do |format|
format.xml { render : xml => xml }
end
end

Hiermit stellen wir eine Methode bereit die uns ein XML File rendert das sagt, bin ich eingeloggt, oder nicht (über das Format der XML ließe sich streiten).

In der Flex App kreiert man nun einen HTTP-Service, der auf die URL der Methode verweist, und bei erfolgreichem Result das ganze als XML ausgibt.

<fx:Script>
<![CDATA[
import mx.rpc.events.ResultEvent;
public function switchStates(event:ResultEvent):void {
var xml:XML = event.result as XML;
var loggedInP:Boolean = xml.login as Boolean;
var currentID:int = xml.currentid;
trace(currentID);
}
]]>
</fx:Script>

<fx:Declarations>
<s:HTTPService resultFormat="e4x" id="login" url="http://localhost:3000/user_sessions/checkLogin" result="switchStates(event)" fault="trace('fault');"/>
</fx:Declarations>

Natürlich muss im Application tag noch

creationComplete="login.send()

gesetzt werden. Und schon hat man zwei Variablen, die den User authentifizieren.

• lokale und globale Variablen und Konstanten
• Möglichkeit eigene Objekte zu erstellen
• Rekursion
• 5 Datentypen (Wahrheitswert, Zeichen, Zeichenkette, Ganzzahl, Gleitkommazahl)
• Listen (Arrays)
• Debugging
• Export des Struktugramms als Grafik
• eine große Bibliothek für mathematische Funktionen, Stringverarbeitung, Listen-Handling, einfach Grafikobjekte (Turtle-Grafik) und Ein- und Ausgabe

Um ein Programm mit VIPS zu erstellen, wählt man in der Navigationsleiste "Neues Projekt". Man kann innerhalb eines Projekts mehrere Struktugramme verwalten, die als Art Objekte dienen und von anderen Struktugrammen aufgerufen werden können. Auch kann jedes Struktugramm Paramter und Rückgabe Werte enthalten. Das Hauptprogramm ist immer als "main" betitelt. Um sein Programm nun zu strukturieren hat man neun verschiedene Möglichkeiten, die auch alle in Java als Schleifen, Verzweigungen oder ähnlichem enthalten sind:

Das Einfügen einer neuen Verzweigung läuft nach einem einfachen Klick-Prinzip ab: Zuerst wird das zu erstellende Element ausgewählt und danach an die Stelle geklickt, an der es eingefügt werden soll.

Das Ganze ist relativ logisch aufgebaut, könnte jedoch aufgrund der mangelnden farblichen Gestaltung schnell unübersichtlich werden. Um nun zum Beispiel vom Benutzer Eingaben entgegen zu nehmen, fügt man einen Aufruf ein, und wählt nach dem Doppelklick auf den leeren Aufruf (der mit unbekannt betitelt ist) die Funktion "Input" aus, die wiederrum zwei Paramter erhält: MSG und INITTEXT (MSG = Die Meldung an den Benutzer; INITTEXT = Default-Text der im Eingabefeld angezeigt werden soll). Als Rückgabe Wert wird eine Variable vom Typ Zeichenkette benötigt:

Im Struktugramm erscheint der Aufruf der Input Funktion folgendermaßen:

Um jetzt auch andere Objekte aus der Bibliothek nutzen zu können, wird wieder das Objekt "Aufruf" verwendet. Dieses führt Funktionen aus der Bibliothek aus, übergibt ihnen Parameter oder liefert deren Wert zurück. Die Struktur dabei ist relativ simple: Die Funktion "SL_Set" zum Beispiel setzt einen bestimmten Wert an einen gegebenen Index in einer Liste. Jedoch muss man keine Klammern oder ähnliches schreiben, dies passiert in einem Eingabefenster:

• Operation: Hier erhält man eine Liste mit verfügbaren Funktionen
• Rückgabevariable: Falls die Funktion einen Wert zurückliefert, wird die Variable in der dieser Wert gespeichert werden soll hier eingetragen (praktisch das, was links vorm = Zeichen steht)
• Argumente: Eine Liste von Argumenten, die die Funktion erhält

Wie oben schon zu sehen ist, bekommt eine unbekannte oder falsch aufgerufene Funktion sofort nach dem Erstellen oder Ändern ein kleines rotes Kreuz verpasst. Beim darüber fahren mit dem Mauszeiger wird unten in der Statusleiste ein recht verständlicher Error ausgegeben (natürlich in deutsch) der auch anfänglich ungemeint bei der Fehlersuche oder beim Verständnis des ganzen Programms hilft.

Beim Testen der Anwendung bin ich darauf gekommen, dass man mit komplexeren Kontrollstrukturen jedoch schnell an seine Grenzen stößt. So ist es zum Beispiel nicht möglich mit der gewohnten [ ]-Syntax auf ein Element einer Liste zuzgreifen. Hier muss der Wert zuerst per SL_Get in einer Temp-Variable zwischengespeichert werden, um anschließend verwendet werden zu können. Ebenfalls sind keine Mehrfachabfragen möglich, wenn man zum Beispiel in einer If-Anweisungen zwei Bedingungen prüfen will (oder auch in einer while-Schleife). Auch ist die Verwendung der einzelnen Funktionen umständlicher als in anderen (nicht-visuellen) Programmiersprachen.

Im Paket mit enthalten sind einige Demoprogramme, die z.B. verschiedene Sortieralgorithmen oder ein Überprüfungen für Primzahlen implementieren:

BubbleSort:

Primzahl Überprüfung:

Nachdem ich mir die Struktur ein wenig angeschaut habe, habe ich den InsertionSort implementiert:

Dieses Objekt wird vom Hauptprogramm aufgerufen in dem eine Liste von Zahlen generiert wird und dem InsertionSort Objekt übergeben wird. Mehr zur Verfahrensweise von InsertionSort hier: http://de.wikipedia.org/wiki/Insertionsort

Um Gravatar für Ruby on Rails zu verwenden, ist lediglich eine kleine Methode im Application Helper nötig und deren Aufruf in der View.

application_helper.rb

require 'digest/md5'

  def gravatar_url_for(email, options = {})
    url_for({ :gravatar_id => Digest::MD5.hexdigest(email),
      :host => 'www.gravatar.com',
      :protocol => 'http://',
       nly_path => false,
      :controller => 'avatar.php'}.merge(options))
  end

View (z. B. index.html.erb)

# plain old gravatar url

<%= gravatar_url_for 'info@sketchit.de' %>

# gravatar url with a rating threshold

<%= gravatar_url_for 'info@sketchit.de', { :rating => 'R' } %>

# show the avatar

<%= image_tag(gravatar_url_for 'info@sketchit.de') %>

# show the avatar with size specified, in case it's served slowly

<%= image_tag(gravatar_url_for('info@sketchit.de'), { :width => 80, :height => 80 }) %>

# link the avatar to some/url

<%= link_to(image_tag(gravatar_url_for 'info@sketchit.de'), 'some/url')%>

Die oben definierte Methode nimmt die übergebene E-Mail Adresse, wandelt es in einen MD5 Hash um, baut daraus die URL von Gravatar zusammen (http://www.gravatar.com/avatar.php?gravatar_id=HASH_WERT) und liefert den Avatar zurück.

Und hier noch das gezippte XCode Project:

SchereSteinPapier iPhone XCode Project

QuadTrees v0.1

Der Rest ist normalerweise selbstklärend. Den Chat einfach im Terminal (unter OS X) starten, dann noch ein Terminal Fenster auf machen, auch hier den Chat starten, und schon funktionierts!
Hint:
- kompilieren per "g++ -o test main.c"
- aufruf per "./chat"
- (natürlich ohne die " " )

#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <errno.h>
#include <string.h>
#include <netdb.h>

#include <sys/unistd.h>
#include <sys/fcntl.h>

#include <iostream>

using namespace std;

void reportError(string str) {
	cout << endl << str << errno << endl;
}

int main(int argc, char* argv[])
{
	// set the variables
	int sock, bytes_recieved, bytes_send;
	int port1 = atoi("5000");
	int port2 = atoi("5001");
	char send_data [1024] , recv_data[1024];       

	struct sockaddr_in myAddr;
	struct sockaddr_in clientAddr;
	socklen_t sin_size;

	fd_set rfds;

	// create the tcp socket
	if ((sock = socket(AF_INET, SOCK_DGRAM, 0)) == -1) {
		reportError("Cannot create send socket ....");
		exit(1);
	}

	myAddr.sin_family = AF_INET;
	myAddr.sin_port = htons(port1);
	myAddr.sin_addr.s_addr = inet_addr("127.0.0.1");

	if (bind(sock, (struct sockaddr *)&myAddr, sizeof(struct sockaddr))== -1) {
		myAddr.sin_family = AF_INET;
		myAddr.sin_port = htons(port2);
		myAddr.sin_addr.s_addr = inet_addr("127.0.0.1");

		clientAddr.sin_family = AF_INET;
		clientAddr.sin_port = htons(port1);
		clientAddr.sin_addr.s_addr = inet_addr("127.0.0.1");

		if(bind(sock, (struct sockaddr *)&myAddr, sizeof(struct sockaddr))== -1) {
			reportError("Unable to bind socket.");
			exit(1);
		}
	}
	else
	{
		clientAddr.sin_family = AF_INET;
		clientAddr.sin_port = htons(port2);
		clientAddr.sin_addr.s_addr = inet_addr("127.0.0.1");
	}

	cout << "Wait for data, or type something!" << endl;

	// process incoming connections (forever) ....
	while(1){
		sin_size = sizeof(struct sockaddr_in);

		FD_ZERO(&rfds);
		FD_SET(sock, &rfds);
		FD_SET(0, &rfds);

		select(sock + 1, &rfds, NULL, NULL, NULL);

		if(FD_ISSET(sock, &rfds))
		{
			// receive the reply from the client
			bytes_recieved = recvfrom(sock, recv_data, 1024,0, (struct sockaddr*)&myAddr, &sin_size);

			// client wants the leave, so do we
			if (strcmp(recv_data , "q") == 0 || strcmp(recv_data , "Q") == 0) {
				close(sock);
				break;
			}
			else if(bytes_recieved == -1)
			{
				reportError("recvfrom failed.");
				exit(1);
			} else {
				recv_data[bytes_recieved] = '\0';
				cout << "<Received> " << recv_data << endl;
			}
		}
		else if(FD_ISSET(0, &rfds))
		{
			gets(send_data);

			if (strcmp(send_data , "q") != 0 && strcmp(send_data , "Q") != 0) {
				bytes_send = sendto(sock, send_data, 1024, 0, (struct sockaddr*)&clientAddr, sizeof(struct sockaddr));

				if(bytes_send == -1)
				{
					reportError("Error sending data.");
					exit(1);
				}
			}
			else
			{
				close(sock);
				break;
			}
		}
	}

	close(sock);

	return 0;
}

Hoffe jemanden bringts was!

Bei der Suche nach einem passenden Programm bin ich schnell darauf gekommen, dass zumindest die von mir gewünschte Grundstruktur kein einziges Programm zufriedenstellend bewerkstelligen kann (Interpret - Interpret/Album - Titel). Darum hab ich mich entschlossen, das Ganze im Finder per Hand zu sortieren. Und da sind wir auch schon bei der Problematik:

Um zumindest einmal grob zu sortieren, wollte ich automatisch alle MP3's eines Interpreters in dessen Ordner schieben. Die Ordner von Hand anzulegen, sehr langwierig. Darum hab ich mich hingesetzt und ein kleines aber feines AppleScript geschrieben.

Das Skript nimmt die gerade im Finder selektierten Dateien, prüft ob ein "-" (Bindestrich) als Trennung zwischen Interpret und Titel vorhanden ist (wenn nicht, kann man einen eigenen definieren) und filtert darauf hin den Interpreten Namen heraus, der wiederrum als Ordnername dient.

tell application "Finder"

set fileList to selection
set currentDir to the folder of item 1 of fileList as text
set targetDirTMP to the name of item 1 of fileList

set endCount to offset of "-" in targetDirTMP

if endCount = 0 then
display dialog "No delemiter found, specify a custom one, or click Cancel." default answer "" with icon 2
set delimiter to text returned of result
if delimiter is "" then error
set endCount to offset of delimiter in targetDirTMP
end if

set checkSpace to characters (endCount - 1) thru (endCount - 1) of targetDirTMP

if " " is in checkSpace then
set removeRight to 2
else
set removeRight to 1
end if

set targetDir to (text items 1 thru (endCount - removeRight) of targetDirTMP) as text

if not (exists folder (currentDir & targetDir)) then
make new folder at currentDir with properties {name:targetDir}
move fileList to (currentDir & targetDir)
else
display dialog "The folder already exists. Would you like to merge the data?" buttons {"Cancel", "Yes"}
if button returned of result = "Yes" then
move fileList to (currentDir & targetDir)
end if
end if

end tell

Zur Installation einfach Code in den AppleScript Editor ziehen, eine APP daraus speichern, und per Drag&Drop in die obere Leiste des Finders ziehen.

Oder ihr ladet euch meine hier runter