Relationships, made code

START; $SELF = ~1; $PARTNER = ~1; FIND PARTNER; IF ( $SELF + $PARTNER < 2 ) {GO TO START} ELSE {END};