Codeschloss programmieren in Basic Stamp 1 (Parallax Stamp 1 Project Board)

Ich möchte mit dem Parallax Project Board in Basic Stamp 1 ein 
Codeschloss so programmieren, dass die Diode auf dem Bord grün leuchtet, 
wenn ich den richtigen Code des Codeschlosses eingebe. Bei falscher Zahl 
soll die rote Diode leuchten. Ich habe Schwierigkeiten beim Stecken der 
Komponenten und bei der Programmierung.

Hier mein Programmierversuch:

' {$STAMP BS1}

Anfang:

IF PIN4 = 1 THEN Gruen

IF PIN5 = 1 THEN Rot

IF PIN7 = 1 THEN Rot

Rot:

HIGH 6

PAUSE 10000

LOW 6

GOTO Anfang

Gruen:

HIGH 3

PAUSE 2000

LOW 3

GOTO Weiter

Weiter:

IF PIN4 = 1 THEN Rot

IF PIN5 = 1 THEN Gruen

IF PIN7 = 1 THEN Rot

IF PIN4 = 1 THEN Rot

IF PIN5= 1 THEN Rot

IF PIN7 = 1 THEN Gruen

END

Ein Foto vom Board und der aktuellen Steckung habe ich beigefügt. Kann 
mir jemand helfen?