[V] Olympia Infoglobe (Rotierende Laufschrift)

[Markus B. (dalotel)]

Verkaufe einen nie benutzten Opympia Infoglobe.
Das ist sowas wie eine rotierende Laufschrift wie man es
von einer Propelleruhr kennt.
Naja, jedenfalls wurde das mal (neu) gekauft um so eine Uhr
daraus zu machen. Aus Zeitmangel wurde das Projekt jetzt verworfen.
Bis jetzt ist es noch eine schnuckelige Telefonanrufanzeige
mit 15 cm Durchmesser. Ob das am aktuellen Telefonnetz noch
funktioniert kann ich nicht sagen.
Das Ding hat intern einen Propeller mit blauen Leds, die durch die hohe
Drehzahl statisch erscheinen. Im Moment wird eine schöne Animation 
abgespielt. Laufschrift rauf, runter, drehen,....
Wie gesagt war die Idee das Teil mechanisch so zu benutzen,
da das Selberbauen doch eine hohe mechanische Herausforderung darstellt,
lediglich neu programmiert sollte es werden um eine stylische Uhr
daraus zu bauen. Weiß allerdings nicht was für ein Controller darin
verbaut ist, hab das Ding noch nie geöffnet.
Vielleicht hat ja jemand anders mehr Zeit dazu.

Lieferung erfolgt in Originalverpackung mit Anleitung und Netzteil.

Würde es für 25 Eur
+ 5 Eur Porto Päckchen,
oder 7 Eur Porto Paket
per Paypal oder Überweisung abgeben

[Stoer P. (stoerpeak)]

Markus B. schrieb:
> Vielleicht hat ja jemand anders mehr Zeit dazu.

Als es das Teil vor etlichen Jahren bei Tchibo gab habe ich den auch zum 
Basteln mitgenommen.
Anstatt der Innereien umzuprogrammieren speiße ich mit einem Tiny 25 
über eine Leitung mein eigenes "Infrarot" Signal in den rotierenden 
Propeller.

[Esmu P. (Firma: privat) (max707)]

Ist es dieses Ding? 
https://wilke.de/fileadmin/templates/Bilder/success/pdf_komplett/Applikationsbericht_071_WilkeTechnology.pdf

[Markus B. (dalotel)]

Esmeralda P. schrieb:
> Ist es dieses Ding?
> 
https://wilke.de/fileadmin/templates/Bilder/success/pdf_komplett/Applikationsbericht_071_WilkeTechnology.pdf

Genau dieses "Ding" ist es.

Das Teil intern per infrarot anzusteuern finde ich genial.
Super Idee!!

[Markus B. (dalotel)]

Hallo han_swurst,
schick mir mal eine eMail Adresse wo ich dich erreichen kann.

[Stoer P. (stoerpeak)]

Markus B. schrieb:
> Das Teil intern per infrarot anzusteuern finde ich genial.
> Super Idee!!


Zur Ansteuerung benutze ich die sowieso schon vorhandene 
IR-Datenübertragung.
Mein Controller ist lediglich über drei Leitungen Verbunden (5V Gnd 
Daten).

Im Sockel befindet sich eine IR-Diode für das Drehwinkeltiming die der 
Rotor mittels einer Fotodiode "sehen" kann sowie eine zweite, die die 
Daten auf den IR-Empfänger des Rotors überträgt.

Meine Datenleitung moduliert den Sende-Transistor dieser 
IR-Datenstrecke.

Im Bild sind die IR-Bauteile fürs Drehwinkeltiming rot und die für die 
Daten gelb markiert.
Der grüne Draht ist meine Datenleitung. Den Datenverkehr an diesem Punkt 
habe ich damals per Salea Logic Analyzer analysiert und dann für eigene 
Texte emuliert.

[Markus B. (dalotel)]

Stoer p. schrieb:
> Zur Ansteuerung benutze ich die sowieso schon vorhandene
> IR-Datenübertragung.
> Mein Controller ist lediglich über drei Leitungen Verbunden (5V Gnd
> Daten).

Würdest du den Code für den Attiny 25 veröffentlichen?

[Stoer P. (stoerpeak)]

Die Idee, die interne Infrarotübertragung zu modifizieren habe ich von 
hier:
https://hanixdiy.blogspot.com/2010/10/hacking-infoglobe-part-1.html

ebenso die Info für die Steuerzeichen zur Textanimation:
https://hanixdiy.blogspot.com/2010/10/hacking-infoglobe-part-3.html



Ich bin dann aber den einfacheren Weg gegangen und habe die bereits 
vorhandene Sendediode benutzt und eine simplere Hardware gebaut.

/*
Infoglobe.c

ATTiny 25 Pinbelegung:
PB0  frei
PB1  TX Datenausgang
PB2  frei
PB3  Quarz 8MHz
PB4  Quarz 8MHz
PB5  Reset
*/

#include <avr/io.h>
#include <avr/interrupt.h>

#define F_CPU 1000000UL  // Prozessortakt 1MHz (Fuse CKDIV8 gesetzt)
#include <util/delay.h>


void Lowbit (void);  // erzeugt 1ms Burst aus 38 Pulsen (je 10µs high / 16µs low)
void Highbit (void);  // erzeugt 1ms Pause
void Zeichen_senden (unsigned char z);    // gibt ein Zeichen aus
void Text(char *zeiger);  // gibt eine Zeichenkette plus Steuerzeichen aus

unsigned char Timeout =1;  // Merker für "1ms vorbei" (Low Aktiv)


// ISR für den Timer 0 Overflow Interrupt
ISR (TIMER0_OVF_vect)
{
  Timeout = 0;    // Merker für "1ms vorbei" setzen (Low Aktiv)
  TCNT0 =133;    // Preset für 1ms Overflowdauer
}



// main
int main(void)
{
  // Initialisierung des Controllers
  DDRB |= (1 << DDB1);  // Port B1 Ausgang
  #define Tx  PB1  // Datenausgang
  
  // Timer 0
  TCCR0B |= (1 << CS01);  // Timer 0 im "Normal Mode" Vorteiler 1:8
  TIMSK |= (1 << TOIE0);  // Timer 0 Overflow Interrupt Enable setzen
  
  sei();      // Interrupts global freigeben
  
  
  // preset
  _delay_ms(3000);  // 3 Sekunden warten damit der Rotor anlaufen kann
  
  Text ("Das ist ein Test");  // Textausgabe
  
  // mainloop
  while(1)
    {
    
    }
}



// Subroutinen

// Zeichenkette ausgeben
void Text( char *zeiger)
{
  // zunächst den Beginn einer Millisekunden Periode abwarten
  Timeout = 1;  // Merker für "1ms vorbei" zurücksetzen
  Highbit();    // kein IR, bis eine neue Millisekunde beginnt
  
  // Start der Ausgabe
  Zeichen_senden (0x00);                // Steuerzeichen
  while(*zeiger != 0) {Zeichen_senden (*zeiger++);}  // Zeichenkette Zeichenweise senden
  Zeichen_senden (0x03);                // Steuerzeichen 3 Fade out Fade in
  Zeichen_senden (0x05);                // Steuerzeichen
}


void Zeichen_senden (unsigned char z)
{
  for (unsigned char i = 8; i > 0; i--)  // 8 mal das MSB auf "0" oder "1" prüfen, ausgeben und einmal linksschieben
  {
    if (z & (1 << 7))
    Highbit();    // MSB war eine "1" => 1ms lang kein IR Signal
    else
    Lowbit();    // MSB war eine "0" => 1ms lang IR-Burst mit 38kHz
    
    z <<= 1;    // Datenbyte einmal linksschieben und sich selbst zuweisen
  }
}


void Lowbit (void)  // solange IR-Pulse 10µs high / 16µs low bis T0 überläuft
{
  
  // IR Pulse von 10µsPuls / 16µsPause ausgeben, 
  while (Timeout)
  {
    PORTB |= (1 << Tx);    // Tx Pin high
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
    PORTB &= ~(1 << Tx);  // Tx Pin low
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
    asm volatile ("nop");
  }
  Timeout = 1;  // Merker für "1ms vorbei" zurücksetzen
}


void Highbit (void)  // 1ms kein IR Signal
{
  while (Timeout)  // bis T0 überläuft
  {
    PORTB &= ~(1 << Tx);  // Tx Pin low
  }
  
  Timeout = 1;  // Merker für "1ms vorbei" zurücksetzen
}

an meinem Controllerboard habe ich noch eine weitere dreiadrige Leitung 
für ein Funkmodul, damit ich dem Globe auch Texte schicken kann. Den 
Code dafür müsste ich aber erst noch schreiben.

[Chris R. (han_swurst)]

Hallo Markus,

hab Dir ne Nachricht geschickt.
Mit freundlichen Grüßen
Christian

[Markus B. (dalotel)]

Trotz daß ich dank Stoerpeak wieder "Blut geleckt" habe hat das Teil 
einen neuen Besitzer gefunden.
Viel Spaß damit.

[Stoer P. (stoerpeak)]

Markus B. schrieb:
> Trotz daß ich dank Stoerpeak wieder "Blut geleckt" habe hat das Teil
> einen neuen Besitzer gefunden.

Hallo Markus,
willst du meinen Infoglobe haben? :-)


oder braucht ihn sonst jemand?
Bei mir liegt er nur rum.

Gruß Stoerpeak

[Stoer P. (stoerpeak)]

Stoer p. schrieb:
> oder braucht ihn sonst jemand?
> Bei mir liegt er nur rum.

***ist verkauft***