Zitat

---

Meine Displays laufen nachdem ich erkannt habe dass das erste Display defekt war, und garantiert nicht durch meine Schuld ;-).
Etwas mehr Nachsicht mit den Unwissenden ;-).

---

ähm , sorry wenn Du Dir den Schuh angezogen hast , aber Du warst da überhaupt nicht mit gemeint und dachte dabei auch nicht an Dich jetzt speziell ....

Diese Idee schwebt mir schon seit Jahren durch den Kopf , immer wenn ich für andere Projekte mache die mit Displays zu tun haben und es meist nie an Größe reicht.
Gut , man wechselt dann meist auf nen Nextion HDMI Enhanced TFT Display .

Das "Problem" is ja , das die Displays noch rund herum ein Stück Platine haben , so das eine Anderander-Reihung ( komisches Wort ) selten schön aussieht .

Ich denke , es ist wie bei jedem Hobby ,
man brauch die Zeit , die Lust UND ( besonders bei Modellbahn) das nötige Kleingeld.
Da kannst mal schnell eben 1000de € los werden. :-(

Dafür ist das Interesse nicht groß genug , sich dem allem auszusetzen

Naja, sowas hab ich in den ersten Stunden vor 10 Jahren gemacht .
Sicher war toll und schön , als Einstieg auch ne nette Sache .

Hausautomation , Websteuerung , TouchDisplay ,.... bin da doch schon 1-2 Dekaden weiter ....

Dies soll jetzt keine Kritik sein , mit Wunsch von Naubaddi hier mal wie man es .....mh ... auch machen könnte

$regfile = "m8def.dat"
$crystal = 8000000
$hwstack = 40
$swstack = 40
$framesize = 40
 
Config Lcdpin = Pin , Db4 = Portd.4 , Db5 = Portd.5 , Db6 = Portd.6 , Db7 = Portd.7 , E = Portd.2 , Rs = Portd.3
Config Lcd = 16 * 2
Cursor Off
Cls
 
Config Servos = 1 , Servo1 = Portb.0 , Reload = 10
Config Adc = Single , Prescaler = Auto, Reference =avcc
 
config portb = output
config Portc = input
 
const Faktor=8.525' Servobereich von 30-150 / 1024Bit : 120 = 8.525
 
dim Potiwert as word
dim Servowert as byte
dim Dummy as single
dim Servo_alt as byte
 
enable Interrupts
locate 1,1
lcd "Poti :"
locate 2,1
lcd "Servo:"
 
do
 
    Potiwert=getadc(0)
    Dummy=Potiwert/Faktor
    Servowert=Dummy+30
 
    locate 1,7
    lcd Potiwert ; "    "
 
    if Servowert<>Servo_alt then
       Servo_alt=Servowert
 
       locate 2,7
       lcd Servowert ; "   "
       locate 2,11
 
       Select case Servowert
               case 30 to 89
                   lcd "Links   "
 
               case 91 to 150
                   lcd "Rechts   "
 
               case  90
                   lcd "Mitte   "
       end select
 
       Servo(1) =Servowert
 
    endif
 
loop
end
 
 

Definitiv : NEIN !!

Jeglicher Versuch würde die Picaxe zerstören !

Da die Picaxe ja kein echter Mikrocontroller ist , sondern nur ein kleiner geladener Code (Picaxe) in einem speziellen Bereichs des Wirts (die PIC ), würde man mit dem Auslesen eher versuchen den Wirt ( also die PIC )
anzusprechen , als den kleinen speziellen Teil Programmcode der irgendwo tief vergraben ist und sich Picaxe nennt.
An den Code der Picaxe kommt man also nie wieder dran .

Na das freut mich , das das so schnell und gut geklappt hat

Muss man das jetzt verstehen ??

Hat ein super professionelles Board und will mit nem popeligem Steckbrett das testen ??

ich wiederhole noch mal , für die , die es mit lesen etwas schwer haben :



Das Programm an sich ist fehlerfrei , also grammatisch korrekt ;-)
Läuft auch tadellos im Simulator.
Vielleicht nicht abtippen , sondern mal zur Sicherheit : Copy & Paste nutzen ??

ah , Stefan sein "Kunstwerk" ;-)