----- Wiadomość oryginalna -----
Od: PhooYara
Grupy dyskusyjne: pl.soc.seks
Wysłano: 22 listopada 1999 18:06
Temat: Re: Jak to zrobić


> Giant napisał(a) w wiadomości: <[e-mail]>...
> >Mam dziewczynę którą bardzo tego chce, ja chcem również ale nie wiemy jak
> to
> >zrobić. Jaki ma być ten pierwszy raz. Prosimy o pomoc.Opiszcie wszystko ze
> >szczegółami.
>
>
>
> 1. Najsampierw ona musi twojego mieczaka
> troche possac. Jak juz sie zrobi twardy, przejdzcie
> do punktu drugiego.
>
> 2. Potem ty musisz jezorem trocche pomieszac miedzy
> jej nogami, az zacznie piszczec lub jeczec. I tu uwaga,
> jezeli piszczy to daj sobie spokuj, najlepiej kaz jej pojsc
> do domu. Jezeli jeczy mozesz przejsc do punktu 3.
>
> 3. Jezeli twoj twardziel nie jest juz twardzielem, wroc
> do punktu 1 aby poprawic jego konsystencje.
>
> 4. Umiesc twardziela w jej gniazdku.
>
> a teraz implementacja procedury seks.
>
> procedure TSeks(Sender: TObject);
> var
> i:byte; {dla doswiadczonych powinien byc integer }
> begin
> i:=0;
> repeat
> inc(i)
> dupa_w_doł;
> dupa_w_gore;
> until (strzal=true)
> if (i>=2400) then Writeln(' Kochanie jestes cudowny')
> else
> Writeln(' To juz ??? Wracaj do mamy. ');
>
>