JotD / QotD Ελληνική Λίστα Ανεκδότων (JotD)


Θέμα: An8rwpino DNA


(nil): Nicholas (mcmxc(@)freemail.gr)
Ημερομηνία: Τρι 06 Ιουν 2000 - 01:27:11 EEST

Ανθρώπινο DNA

Μετά από πολύπονες και κουραστικές προσπάθειες οι γενετιστές
κατάφεραν να αποκωδικοποιήσουν το ανθρώπινο DNA και έκπληκτοι
ανακάλυψαν ότι μόνο το 30% του κώδικα κάνει κάτι χρήσιμο διότι
το υπόλοιπο είναι ... σχόλια!

Ιδού η απόδειξη:

==============
/* HUMAN_DNA.H
 *
 * Ανθρώπινο γονίδιο
 * Έκδοση 2.1
 *
 * (C) Θεός
 */

/* Ιστορικό αναθεώρησης:
 *
 * 00-00-0000 00:00 1.0 Αδάμ.
 * 00-00-0002 10:00 1.1 Εύα
 * 00-00-0003 02:11 1.2 Πρόσθεση γεννητικού κώδικα στον Αδάμ.
                          Ψιλοχάλια - θα χρειαστεί να ξαναγραφτεί
                          μετά ώστε να γίνει κομψότερο.
 * 17-03-0112 03:14 1.3 Πρόσθεση επιπλέον σεξ-drive στο male.h;
                          Δότης elephant-dna.c.
 * 15-10-0203 16:33 1.4 Αφαίρεση ουράς.
 * 15-00-0531 17:20 1.5 Επιμήκρινση εμπρόσθιων άκρων. Επέκταση
                          κρανίου.
 * 01-08-0920 13:56 1.6 Αντίχειρας προστέθει στη συνάρτηση hand()
 * 01-04-1309 14:04 1.7 Μικροβελτιώσεις (χρώμα δέρματος, μέτωπο
κ.τ.λ.)
 * 09-07-1512 02:21 1.8 Στοματική υγιεινή: προστέθεικαν φρονιμήτες.
                          (πρέπει να θυμηθώ να επεκτείνο ανάλογα και το
στόμα)
 * 01-12-1731 14:18 1.9 Αύξηση μέσου ύψους (χμμ, νομίζω πως κάτι
ξέχασα...)
 * 13-02-1912 17:09 2.0 Προσθήκη ομοφυλικών επιλογών (αίτιο:
υπερπληθυσμός
 * προσπάθεια αντιμετώπισης του προβλήματος)
 * 04-08-2004 16:11 2.1 Κάτσε κάτω από τη μπάρααααααααααα
 *
 */

/*
 * Βασικοί ορισμοί
 */

#define SEX male
#define HEIGHT 1.84
#define MASS 68
#define RACE caucasian

/*
 * Κληρονομικοί παράγοντες:
 */

#include "mother.h"
#include "father.h"

#ifdef !FATHER
#warn("Father unknown -- guessing\n")
#include "bastard.h"
#endif

/*
 * Διαμόρφωση εξωτερικών χαρακτηριστικών...
 */
#include <sex.h>

/*
 * ...πάντα έχω την εντύπωση ότι κάτι ξεχνώ...
 */
struct genitals
   {
#ifdef MALE
   Penis *jt;
#endif
   /* G_spot *g; Αφαιρέθηκε για debuging */
#ifdef FEMALE
   Vagina *p;
#endif
   }

/*
 * Εγκατάσταση ρουτίνας εκείνισης -- καλείτε πριν την αναπαραγωγή του
DNA.
 */

DNA *zygote_initialize(Sperm *, Ovum *);

/* ΒΑΣΙΚΟΣ ΚΩΔΙΚΑΣ
 *
 * Θα τροποποιηθεί μετά ώστε το αποτέλεσμα να είναι λιγότερο άνοστο.
 */

Characteristic *lookup_phenotype(Identifier *i);
==============

...και συνεχίζεται.

--
Νίκος
--
Η Έβελυν (το ρομπότ της λίστας) γράφει :
Έκλαψε, και ο δικαστής σκούπισε τα δάκρυά της με το μπλοκ επιταγών μου.
			Tommy Manville
_________________________________________________________________
         Joke of the Day ... Ελληνική Λίστα Ανεκδότων
      Newsgroup (Read-Only) news://news.sae.gr/grk.jokes
    Πληροφορίες --> https://anekdota.duckdns.org/  
_________________________________________________________________

Γραφτείτε και εσείς στην Ελληνική Λίστα ανεκδότων (JotD) και στείλτε τα ανέκδοτά σας!!!

Επιστροφή στον κεντρικό κατάλογο αυτού του αρχείου