• Willkommen im Geoclub - dem größten deutschsprachigen Geocaching-Forum. Registriere dich kostenlos, um alle Inhalte zu sehen und neue Beiträge zu erstellen.

Reaktives Licht mit Atmel AVR

Geo Chief

Geo Chief

Geocacher
Juhu! Es tut!

Die Zeile
Code: 
$hwstack = 6
hat wahre Wunder bewirkt. Damit konnte ich das Programm ohne Probleme durch den Compiler schicken.

Ich habe auch mein Kabel auf 30cm gekürzt und danach hat es auch mit der Programmierung geklappt. Die drei Atmels sind sogar noch funktionsfähig.

Ansonsten habe ich keine Änderungen vornehmen müssen. Die Tips von Windi kamen zu spät :)

Danach habe ich schnell mal einen Prototypen zusammengebacken. Die Reichweite ist noch nicht so toll aber das ist sicher noch verbesserungsfähig. Mit meiner 3W-LED kam ich auf 15m. Da werde ich noch ein wenig experimentieren.

Geniale Schaltung! Das macht Lust auf mehr. Nur gut, daß ich meinen ganzen alten Elektronikkram noch nicht entsorgt habe...
 
Windi

Windi

Geoguru
Geo Chief schrieb:
Die Reichweite ist noch nicht so toll aber das ist sicher noch verbesserungsfähig. Mit meiner 3W-LED kam ich auf 15m. Da werde ich noch ein wenig experimentieren.
Zum Vergrößern anklicken....
Setz mal in der LED-Abfrage die Wartezeit von 20ms auf 100ms hoch. Mit meiner Mag5d schaff ich damit über 200 Meter.
Wenn das nicht klappt probier mal eine andere LED.
Es sollte auf alle Fälle eine transparente LED sein, keine diffuse.
 
S

Schittlewiller

Geonewbie
Hier, wie versprochen mein Progrämmchen.
Was ausgegeben wird lese ich aus dem EEPROM. Dieses solltet ihr also "füllen". Das geht direkt übers BASCOM. Ich erledige das aber per Code (folgt später). Vergesst nicht, das Fusebit G auf 0 zu stellen.

Code: 
'============================================================
'
' ***********************************************************
' ***                                                     ***
' *** Reaktiv-Tiny v0.5 2006-02-25                   (AP) ***
' ***                                                     ***
' *** Morsecodeabfrage eines Morsezeichens mit            ***
' *** anschließender Ausgabe von bis zu 64 Morsezeichen.  ***
' *** Es können Koordinaten oder beliebiger Text          ***
' *** ausgegeben werden.                                  ***
' *** Die Eingabegeschwindigkeit wird mit der ersten      ***
' *** empfangenen Zeichenlänge bestimmt                   ***
' ***                                                     ***
' ***                                                     ***
' *** --------------- Einstellungen --------------------- ***
' ***                                                     ***
' *** Fusebit H:    0                                     ***
' *** Fusebit G:    0                                     ***
' *** Fusebit F:    1                                     ***
' *** Fusebit E:    1                                     ***
' *** Fusebit DCBA: 1011                                  ***
' ***                                                     ***
' *** Beachtet das Fusebit G. Es muss auf 0 stehen!       ***
' ***                                                     ***
' *** Unter 'Options' ' Compiler' 'Chip'                  ***
' *** den "HW Stack" runterstellen. z.B. auf 6            ***
' ***                                                     ***
' ***********************************************************
'
' µC: ATtiny13V
'
'============================================================
'
$regfile = "ATtiny13.DAT"
$crystal = 113000              'Reale Frequenz des internen 128kHz-Oszillators
$hwstack = 6
'
Config Portb = &B00011000      'Pinb.3 und .4 auf 'Ausgang', Rest auf 'Eingang' schalten
Portb = &B11100111             'Pullups zuschalten, außer für Pinb.3 und .4
'
Stop Adc                       'A/D-Wandler abschalten, um Strom zu sparen
Stop Ac                        'Analog-Komparator abschalten, um Strom zu sparen
'
'
'Anmerkung zur Deklaration: bin sparsam mit den Variablen umgegangen,
'd.h. diese werden zum Teil im Programm mehrfach für verschiedene Aufgaben verwendet.
'Grund: ich kenne das "Drosseln" des HW Stack erst seit es hier im Fred stand. Dank an Gonzoarts.
Dim Hell As Bit
Dim Vhell As Bit
Dim Ok As Bit
Dim A As Byte
Dim B As Byte
Dim Ein As Integer
Dim Bx As Byte
Dim Z As Byte
Dim D1 As Byte
Dim D2 As Integer
'
'
'
'
' Es können alle Buchstaben und Zahlen gesendet werden, da diese maximal 5 Zeichen lang sind. 
' Ausgabe der Zeichen aus dem EEPROM mit Länge
'                                             
'
'
' dit = kurz = . = 0   
' dah = lang = - = 1
'
'             
'            765 43210                              
'            \_/ \___/                              
'             |    |                                
'           Länge  |                                
'                  |                                
'            Morsezeichen v.rechts (rückwärts)     
'
'     Morse   Bit v.r.
'1 = .---- = 100|11110
'2 = ..--- = 100|11100
'3 = ...-- = 100|11000
'4 = ....- = 100|10000
'5 = ..... = 100|00000
'6 = -.... = 100|00001
'7 = --... = 100|00011
'8 = ---.. = 100|00111
'9 = ----. = 100|01111
'0 = ----- = 100|11111
'
'N = -.    = 001|00010
'E = .     = 000|00000
'
'KA (Spruch Anfang) = -.-.- = 100|10101
'AR (Spruch Ende)   = .-.-. = 100|01010
'
'Wortabstand einfügen mit 111|11111  (FF)
'
'
' Übertragungsrate
' 1 WPM: 1 dit = 1200 ms
' 5 WPM: 1 dit =  240 ms
'10 WPM: 1 dit =  120 ms
'20 WPM: 1 dit =   60 ms
'
'
'==> Übertragungsrate festlegen, hier 5 Wörtern pro Minute (WPM)
D1 = 240                                    'D1 entspricht der Länge eines dit in Millisekunden
D2 = 480                                    'D2 entspricht der doppelten Länge eines dit
'
'==> Abgefragtes Zeichen festlegen
Ein = &B0000000000111000                    'Beispiel: SOS  ...---...   
'
'
Ok = 1
Gosub Morsen                                'beim Start das ganze mal testweise Morsen
'
' Morsezeichen - Abfrage:
Do
   Gosub Led_abfrage
   If Hell = 1 Then Vhell = 1               'Bei Licht Merker setzen
   If Vhell = 1 And B < 255 Then B = B + 1  'Wenn Merker gesetzt wurde, Zähler für Lichtdauer erhöhen (bis max. 255)
   If Hell = 0 Then
      If Vhell = 1 Or B = 255 Then          'Übergang zu Dunkel
         If Z = 0 Then
            Ok = 1                          'Neues Spiel, neues Glück
                                            'Festlegen der Grenzdauer. Diese entscheidet, ob ein dit oder dah eingegeben wurde.
           '==> Leider muss man hier "von Hand" eintragen, ob das erste Zeichen dit oder dah ist. Bei dit B), bei dah A) auskommentieren
           'Die benötigte If-Abfrage hat im 1k Programmspeicher des ATtiny13V keinen Platz mehr.
                                       'A) erstes abgefragtes Zeichen ist ein dit
            If B < 127 Then            'A) dies sollte nicht zu lange sein
               Bx = B * 1.7            'A) Grenzdauer Bx durch Länge des ersten dit festlegen
            Else                       'A)
               Ok = 0                  'A) das war zu lange fürs erste dit
            End If                     'A)
                                       'B) erstes abgefragtes Zeichen ist ein dah
'            Bx = B / 2                'B) Grenzdauer Bx durch Länge des ersten dah festlegen
         End If
         If B < Bx Then
            If Ein.z = 1 Then Ok = 0   'dit empfangen, wenn Ein.z = 0, dann richtig
         Else
            If Ein.z = 0 Then Ok = 0   'dah empfangen, wenn Ein.z = 1, dann richtig
         End If
         Z = Z + 1
         If Z = 9 Or Ok = 0 Then       'Auswerten wenn Falsch ODER Anzahl Zeichen erreicht
            Gosub Morsen               '==> Z auf die Anzahl abgefragter Zeichen einstellen
         End If
      End If
   End If
   If Hell = 0 Then                    'Bei Dunkelheit Merker und Zähler für Lichtdauer löschen
      Vhell = 0
      B = 0
   End If
Loop


Morsen:
   Waitms 500                          'Pause, sonst ist das erste Zeichen schwer zu lesen
   If Ok = 1 Then                      'Morsezeichen senden
      For Bx = 0 To 36                 '=> Länge anpassen!
         Readeeprom A , Bx             'in A steht der zu morsende Code (Bit 0 bis 4 dit und dah, Bit 5 bis 7 die Anzahl
         Z = 0
         Z.0 = A.5                     'Zeichenlänge steht in den vorderen 3 Bit (A.5 bis 7)
         Z.1 = A.6
         Z.2 = A.7
         If Z = 7 Then                 'bei FF einen Wortabstand einfügen (4dit = 7dit - 3dit)
            Waitms D2
            Waitms D2
         Else                          'Zeichenlänge: 1 bis 5  (0 bis 4)
            Gosub Licht
         End If
      Next Bx
   Else                                ' IRRUNG senden
       If B < 255 Then                 ' aber nicht, wenn die Dämmerung eintritt bzw. ein langes Lichtsignal anlag
          Z = 7
          A = 0                        ' Irrung  =  ........ =  0
          Gosub Licht
       End If
   End If
   'A = 0
   B = 0
   Z = 0
Return


Licht:
   For B = 0 To Z
      Portb.3 = 1                      'LED an
      Waitms D1                        '1  . dit
      If A.b = 1 Then
         Waitms D2                     '3  - dah
      End If
      Portb.3 = 0                      'LED aus
      Waitms D1                        '1 dit  Pause
   Next B
   Waitms D2                           '+2 dit Pause nach Ziffer
Return


Led_abfrage:
   Portb.3 = 0                         'Portb.3 auf Masse schalten
   Portb.4 = 1                         'Portb.4 auf +Ub schalten, um die LED zu 'laden'
   Waitus 1                            'Ladezeit 1 µs, kann ggf. noch verkleinert werden
   Config Portb.4 = Input              'Portb.4 nun zwecks Abfrage der LED-Ladung auf 'Eingang' schalten
   Portb.4 = 0                         'Pullup abschalten, sonst geht's nicht!
   Waitms 20                           'Entladezeit 20 ms - je größer, desto weniger Licht genügt (je kleiner, je unempfindlicher)
   If Pinb.4 = 0 Then                  'Ladezustand einlesen: '1' -> dunkel, '0' -> hell
      Hell = 1
   Else
      Hell = 0
   End If
   Config Portb.4 = Output             'Portb.4 wieder auf Ausgang schalten
   Portb.4 = 0                         'Portb.4 auf Masse schalten
Return


End

Viel Spaß
Andi
 
S

Schittlewiller

Geonewbie
So schreibe ich die Morsezeichen ins EEPROM.

Vorgehensweise:
1. das Fusebit G = 0 setzen (sonst überschreibt man sich dieses beim eingentlichen Programmieren wieder.)
2. die gewünschte Ausgabe in diesem Code anpassen
3. hiermit das EEPROM beschreiben (F7, dann F4)
4. das eigentliche Programm in den ATtiny schreiben



Code: 
'============================================================
'
' ***********************************************************
' ***                                                     ***
' *** Reaktiv-Tiny EEPROM schreiben  2006-02-25      (AP) ***
' ***                                                     ***
' ***                                                     ***
' *** Beachtet das Fusebit G. Es muss auf 0 stehen!       ***
' ***                                                     ***
' *** Fusebit H:    0                                     ***
' *** Fusebit G:    0                                     ***
' *** Fusebit F:    1                                     ***
' *** Fusebit E:    1                                     ***
' *** Fusebit DCBA: 1011                                  ***
' ***                                                     ***
' ***                                                     ***
' ***********************************************************
'
' µC: ATtiny13V
'
'============================================================
'
$regfile = "ATtiny13.DAT"
$crystal = 113000             'Reale Frequenz des internen 128kHz-Oszillators
$hwstack = 6
'
'Config Portb = &B00011000     'Pinb.3 und .4 auf 'Ausgang', Rest auf 'Eingang' schalten
'Portb = &B11100111            'Pullups zuschalten, außer für Pinb.3 und .4
'
Stop Adc                      'A/D-Wandler abschalten, um Strom zu sparen
Stop Ac                       'Analog-Komparator abschalten, um Strom zu sparen
'
'
Dim A As Byte
'
'
'--------------------------------------------------------------
' Bitwert 0=dit, 1=dah
' das Byte von rechts lesen, da Schleife von 0 bis z läuft
' z ist die Zeichenlänge minus eins, die in den oberen 3 Bit festegelgt wird
'
'     Morse  Bit v.r.       Hex   Dec
'1 = .---- = 100|11110   1  9E    158
'2 = ..--- = 100|11100   2  9C    156
'3 = ...-- = 100|11000   3  98    152
'4 = ....- = 100|10000   4  90    144
'5 = ..... = 100|00000   5  80    128
'6 = -.... = 100|00001   6  81    129
'7 = --... = 100|00011   7  83    131
'8 = ---.. = 100|00111   8  87    135
'9 = ----. = 100|01111   9  8F    143
'0 = ----- = 100|11111   0  9F    159
'
'N = -.    = 001|00001   N  21     33
'E = .     = 000|00000   E  00      0
'
' Pause    = 111|11111   0  FF    255
'
' KA (Spruch Anfang) = -.-.- = 100|10101   95    149
' AR (Spruch Ende)   = .-.-. = 100|01010   8A    138
'
'
'
'Wortabstand ==             FF
'H = ....  = 011|00000   H  60     96
'A = .-    = 001|00010   A  22     34
'P = .--.  = 011|00110   P  66    102
'P   .--.  = 011|00110   P  66    102
'Y = -.--  = 011|01101   Y  6D    109
'Wortabstand ==             FF
'H = ....  = 011|00000   H  60     96
'U = ..-   = 010|00100   U  44     68
'N = -.    = 001|00001   N  21     33
'T = -     = 000|00001   T  01      1
'I = ..    = 001|00000   I  20     32
'N = -.    = 001|00001   N  21     33
'G = --.   = 010|00011   G  43     67
'Wortabstand ==             FF
'Ende                       8A
'
'
'
'=============================================
' Beispiel Cache: N49.12.345 E008.56.789
'=============================================
'
'
A = &B11111111           ' Pause
Writeeeprom A , 0
A = &B10010101           ' KA (Spruch Anfang) = -.-.-
Writeeeprom A , 1
A = &B11111111           ' Pause
Writeeeprom A , 2
A = &B00100001           ' N = -.
Writeeeprom A , 3
A = &B10010000           ' 4 = ....-
Writeeeprom A , 4
A = &B10001111           ' 9 = ----.
Writeeeprom A , 5
A = &B10011110           ' 1 = .----
Writeeeprom A , 6
A = &B10011100           ' 2 = ..---
Writeeeprom A , 7
A = &B10011000           ' 3 = ...--
Writeeeprom A , 8
A = &B10010000           ' 4 = ....-
Writeeeprom A , 9
A = &B10000000           ' 5 = .....
Writeeeprom A , 10
A = &B11111111           ' Pause
Writeeeprom A , 11
A = &B00000000           ' E = .
Writeeeprom A , 12
A = &B10011111           ' 0 = -----
Writeeeprom A , 13
A = &B10011111           ' 0 = -----
Writeeeprom A , 14
A = &B10000111           ' 8 = ---..
Writeeeprom A , 15
A = &B10000000           ' 5 = .....
Writeeeprom A , 16
A = &B10000001           ' 6 = -....
Writeeeprom A , 17
A = &B10000011           ' 7 = --...
Writeeeprom A , 18
A = &B10000111           ' 8 = ---..
Writeeeprom A , 19
A = &B10001111           ' 9 = ----.
Writeeeprom A , 20
A = &B11111111           ' Pause
Writeeeprom A , 21
A = &B01100000           ' H = ....
Writeeeprom A , 22
A = &B00100010           ' A = .-
Writeeeprom A , 23
A = &B01100110           ' P = .--.
Writeeeprom A , 24
A = &B01100110           ' P = .--.
Writeeeprom A , 25
A = &B01101101           ' Y = -.--
Writeeeprom A , 26
A = &B11111111           ' Pause
Writeeeprom A , 27
A = &B01100000           ' H = ....
Writeeeprom A , 28
A = &B01000100           ' U = ..-
Writeeeprom A , 29
A = &B00100001           ' N = -.
Writeeeprom A , 30
A = &B00000001           ' T = -
Writeeeprom A , 31
A = &B00100000           ' I = ..
Writeeeprom A , 32
A = &B00100001           ' N = -.
Writeeeprom A , 33
A = &B01000011           ' G = --.
Writeeeprom A , 34
A = &B11111111           ' Pause
Writeeeprom A , 35
A = &B10001010           ' AR (Spruch Ende)   = .-.-. =
Writeeeprom A , 36

End
 
Geo Chief

Geo Chief

Geocacher
Nach der Erhöhung der Empfindlichkeit ist die Reichweite phänomenal! Jetzt muß nur noch der passende Cache geboren werden :) .

Das Spielen mit dem ATtiny macht definitiv Lust auf mehr. Da starte ich gleich mal einen neuen Fred für ein neues Projekt was mich sehr interessieren würde...
 
Geo Chief

Geo Chief

Geocacher
Der abschließende Test steht noch aus. Ich habe die Empfindlichkeit auf 80 eingestellt und hatte auf 30m keine Probleme das Licht mit einer fast leeren 3D Mag zu aktivieren was vorher nicht ging. Da sind locker 100m drinn mit vollen Batterien schätze ich mal.
 
Geo Chief

Geo Chief

Geocacher
Heute habe ich es endlich geschafft, einen kleinen Reichweitentest zu machen:

- Empfindlichkeit im Programm auf 80ms
- 8mm Reichelt LED (LED 8-4500 RT) ohne Reflektor
- Uhrzeit ca. 19:15-19:30 Uhr (also noch nicht 100% dunkel aber fast)

Meine 3W LED-Lampe (mit Akkus bestückt) hat erstaunlich schlecht abgeschnitten. Mehr als 35m waren nicht zu erreichen.

Deutlich besser war da schon die Mag 3D. Mit dieser kam ich ohne Probleme auf 100m. Im direkten Vergleich zur Luxeon-LED ist der Strahl der Mag wirklich ausgezeichnet aber zum Cachen würde ich dieses unhandliche, kalte und schwere Teil nie mehr mitnehmen.

Der 55W-Halogenstrahler hatte auch bei 200m keine Probleme die LED zu aktivieren. Weiter ging es leider nicht weil dann Bäume im Weg waren.

Gesehen hat man die LED übrigens auch noch auf 200m ohne Probleme.
 
radioscout

radioscout

Geoking
Geo Chief schrieb:
Meine 3W LED-Lampe (mit Akkus bestückt) hat erstaunlich schlecht abgeschnitten. Mehr als 35m waren nicht zu erreichen.
Zum Vergrößern anklicken....
Wahrscheinlich passt die Wellenlänge (oder die hellsten WL) der LED nicht zum Empfindlichkeitesmaximum der "Empfangs"-LED.
 
A

aninu

Geocacher
Hallo,
Wie genau wird die Schaltung mit dem 25 pol. Stecker verbunden?
Müssen dort auch noch Widerstände verbaut werden?
 
Windi

Windi

Geoguru
aninu schrieb:
Hallo,
Wie genau wird die Schaltung mit dem 25 pol. Stecker verbunden?
Müssen dort auch noch Widerstände verbaut werden?
Zum Vergrößern anklicken....

Auf Seite 5 dieses Freds steht das Schaltbild. Hier ist es nochmals.
programmer7sm.gif

Du brauchst 2 Widerstände a 220 Ohm für die Verbindung PC -> Tiny.
 
A

aninu

Geocacher
Das mit dem Schaltbild hatte ich schon gesehen.
Mir fehlten nur die Werte der Widerstände.
Danke nochmals.
 
Geo Chief

Geo Chief

Geocacher
Das mit der Wellenlänge hatte ich auch im Kopf. Da müsste man mal mit diversen Farbfiltern testen. Sicher ist auch die Bündelung der Luxeons ein "Problem". Alles in allem ist die Empfindlichkeit klasse!
 
R

Ralf

Geocacher
Als "Nebenprodukt" meiner Einarbeitung in diese Thematik ist eine Zusammenfassung des Themas entstanden.
Gewährleistungen für eventuelle Fehler übernehme ich natürlich nicht. Aber es ist alles ein bißchen strukturierter und kompakter aufgeschrieben. Hoffentlich, ohne etwas durcheinander zu bringen.

Ralf
 
Windi

Windi

Geoguru
Da hat sich einer ja wirklich Mühe gegeben. Respekt.
Jetzt fehlt nur noch ein Bastel- und Lötkurs für die Nichtelektroniker hier.

Noch ein kleiner Verbesserungsvorschlag.
Füge doch das fertige stromsparende Programm mit Watchdog-Abschaltung mit ein.

Code: 
'============================================================
'
' **********************************************
' ***                                        ***
' *** Reaktiv-Tiny mit Watchdog-Abschaltung  ***
' ***      von Sir Vivor und Windi           ***
' ***                                        ***
' **********************************************
'
' µC: ATtiny13
' +Ub: 3,00 V
' I: 5 µA im Leerlauf
'
'============================================================

$regfile = "ATtiny13.DAT"
$crystal = 16000                                            'Frequenz des internen Oszillators

Config Portb = &B00011000                                   'Pinb.3 und .4 auf 'Ausgang', Rest auf 'Eingang' schalten
Portb = &B11100111                                          'Pullups zuschalten, außer für Pinb.3 und .4
Stop Adc                                                    'A/D-Wandler abschalten, um Strom zu sparen
Stop Ac                                                     'Analog-Komparator abschalten, um Strom zu sparen

Wdtcr = &B11010011                                          'Watchdog definieren: 0.125 Sekunden, Interrupt auslösen, kein Reset

'Interrupts freigeben
Enable Interrupts


Dim A As Byte
Dim B As Byte
Dim C As Byte
Dim Led_ladezustand As Bit
Dim Hell As Bit
Dim Hell_2 As Byte

Do
    Gosub Led_abfrage
    If Led_ladezustand = 0 Then Hell = 1                    'Bei Licht Merker setzen
    If Hell = 1 And B < 255 Then B = B + 1                  'Wenn Merker gesetzt wurde, Zähler für Lichtdauer erhöhen (bis max. 255)
    If Led_ladezustand = 1 And Hell = 1 And B < 30 Then     'Wenn es wieder dunkel ist und der Lichtimpuls nur kurz war
       Hell_2 = 0                                           'zweiten Hell-Merker setzen
       For C = 0 To 5                                       'und 5 mal afragen
         Gosub Led_abfrage
         If Led_ladezustand = 0 Then Hell_2 = Hell_2 + 1    'ob es auch wieder dunkel ist
       Next C
       If Hell_2 = 0 Then Gosub Blinken                     'erst dann blinken
       Hell = 0
       B = 0
    End If


   If Led_ladezustand = 1 Then                              'Bei Dunkelheit Merker und Zähler für Lichtdauer löschen
      Hell = 0                                              'damit sich das Programm nicht aufhängt
      B = 0
   End If
Loop

Led_abfrage:
    Portb.4 = 1                                             'Portb.4 auf +Ub schalten, um die LED zu 'laden'
    Waitus 1                                                'Ladezeit 1 µs, kann ggf. noch verkleinert werden
    Config Portb.4 = Input                                  'Portb.4 nun zwecks Abfrage der LED-Ladung auf 'Eingang' schalten
    Portb.4 = 0                                             'Pullup abschalten, sonst geht's nicht!
    Reset Watchdog                                          'Watchdog zurücksetzen dass µC rechtzeizig aufwacht
    Powerdown                                               'Während des Entladens den µC Schlafen schicken
    Led_ladezustand = Pinb.4                                'Ladezustand einlesen: '1' -> dunkel, '0' -> hell
    Config Portb.4 = Output                                 'Portb.4 wieder auf Ausgang schalten

    Return

Blinken:
    For A = 1 To 10
        Portb.3 = 1
        Reset Watchdog
        Powerdown
        Portb.3 = 0
        Reset Watchdog
        Powerdown
        Next A
Return

End
 
Windi

Windi

Geoguru
Vielleicht kann der Moderator von diesem Fred oder Sir Vivor den Link auf das PDF in den ersten Beitrag reinsetzen.
 
G

GdE-||-Striker

Geomaster
********************************
* Reaktivlichter für Nichtelektroniker *
********************************

In diesem kleinen Tutorial will ich euch erklären wie ihr ohne Bastel und/oder Lötkenntnisse an ein Reaktivlicht kommt.

1) Windi eine Mail schreiben, dass er eines bereitstellen soll
2) Auf http://www.ebay.de gehen
3) Falls noch nicht vorhanden, Account erstellen. Ansonsten diesen Punkt überspringen.
4) Einloggen (mit dem Account den Du grade erstellt hast)
5) Noch eine Mail an Windi schicken und nach seinem EBay Namen fragen
6) Alle Artikel suchen die von Windi stammen
7) Drauf bieten, am besten ganz, ganz viel (damit euch keiner überbietet, die Teile haben reißenden Absatz)!!!
8) Warten das die Auktion zu Ende ist und Daumen derweil drücken.
9) Bei Windi bezahlen
10) auf den Postboten warten
11) Auspacken
12) Windi anrufen und fragen was man mit dem komischen Verhau und den Batterien aus dem Karton machen soll.
13) Fertig. Kühlschrank auf machen und Bier holen.
14) Windi anrufen ob er auch eins will

Sascha
 
Du musst dich einloggen oder registrieren, um hier zu antworten.
Oben