Da algemeine Elektronik nicht mehr geht geh ich halt hier her. [Archiv] - ProgForum.com

PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : Da algemeine Elektronik nicht mehr geht geh ich halt hier her.

Import-Script

28.12.2003, 00:17

Hi leute ich habe eine frage wie kann man in dos bzw.mit qbasic den com-port auslesen wenn ich da jetzt eine ir-empfangsdiode dranhäng. weil ich einen robo bauen will den ich mit meinem pc steuer. der robo hat dann ein mainboard in sich und soll kabellos gelenkt werden. bauanleitung für so ein kabel <a href="http://213.221.104.186/pcmax/forum/portal.php?web=articles&id=4886&page=0" target=_top>http://213.221.104.186/pcmax/forum/portal.php?web=articles&id=4886&page=0</a> hier aber ich will keinen mc programiren das kann ich nämlich nicht.

Import-Script

28.12.2003, 13:31

Die Com1 liegt auf 3f8h Die Com2 liegt auf 2f8h also sollte ein Wert% = inp(&h3f8) in Basic durchaus genügen. Die Baudrate aus Qbasic einzustellen, da kannst Du entweder selbst in die Register greifen, aber bis 9600 Baud tut es auch SHELL "Mode Com1:,96,n,8,1" also direkt den Mode Befehl unter DOS absetzen mit dem SHELL Kommando. Für eine IR-Diode würde ich allerdings eine Steuerleitung nehmen, also CTS oder DTR oder den RingIndikator auf Pin 9 Das gibt es unter Wert& = inp(&h3f8+6) und dann D7=DCD D6=RI --> den meinte ich D5=DSR D4=CTS D3=Delta DSR - liefert Signal wenn sich was verändert hat (Delta) D2=TERI auch ein Delta, wenn sich die Ring Indikator Leitung geändert hat D1=DDSR - eben das Delta für die DSR-Leitung D0=DCTS - dto Delta CTS Ring Indikator heisst übrigens "Telefon Klingel" also "ring ring ring" so, und dann viel Spass in Basic. Ein Bit fragst Du ab, BSP das RI IF inp(&h3f8+6) AND 64 = 64 then.... klar, input des Registers, AND 64 weil 7.Bit und dann gleich dem Bitwert. Nochmal: für Bit 1 = DDSR IF inp(&h3f8+6) AND 2 = 2 then.... viel Spass <img src="http://progshop.com/elektronik/diskussion/clipart/smile.gif" border=0>

Import-Script

28.12.2003, 20:11

also wenn ich jetzt die empfangsdiode an den lpt hängen würde müsste ich dieses prog in qbasic eingeben oder wie: wert% = inp(&h378) if wert% and 64 = 64 then out 888 ,(1 oder 2 oder 4...) oder wie soll ich das verstehn weil die empfangs diode ist ja nur an einem pin des lpt- oder comports. und wie baue ich den passenden sender??? oder ist das egal momm ich muss mal einen schaltplan zeichnen und scanen...

Import-Script

28.12.2003, 20:56

hier ist der plan <img src="http://progshop.com/elektronik/diskussion/messages/4982/10477.jpg" alt="">

Import-Script

29.12.2003, 17:42

ohhh das wird nix. Probiers doch erstmal mit einem einfachen Schalter und guck mal, ob Pin9 (Ring Indikator) gegen Pin5 (Masse) reagiert. Da müsstest Du zumindest erstmal 0 bzw 1 lesen können. dann weiter <img src="http://progshop.com/elektronik/diskussion/clipart/smile.gif" border=0>

Import-Script

29.12.2003, 18:31

hi auch dass geht nicht so ist mein programm. 1 : a% = inp(888) print A% goto 1 aber es wird immer 0 angezeigt. kannst du mir vielleicht mal eine bas von dir schicken. mfg robin

Import-Script

29.12.2003, 18:33

ps. ich nehme denn lpt-port

Import-Script

29.12.2003, 19:37

IBM kompatible Rechner können auf Port 0x378 nur Daten ausgeben, die dann an D0-D7 erscheinen, die Steuerregister, also die restlichen Pins, welche teilweise nur Eingänge und teilweise I/O's sind werden über 0x378+1 oder +2 abgefragt/gesetzt. die Meisten Komposter können zwar auch die D0-D7 als Ein-/Ausgänge nutzen, allerdings ist das nicht zu 100% sichergestellt. (vor allem nicht unter DOS/qBasic) LameM edit: also probier einfach mal a% = inp(889) und nehme ein anderen Pin als D0-D7

Import-Script

29.12.2003, 22:48

@Robin: a) warum machst Du es Dir so schwer mit der Hex-Dez Umrechnung? knall einfach ein &h davor, den Rest macht der Compiler / Interpreter also inp(888) ist das gleiche wie inp(&h378) das macht das Programm schon. Zum LPT: Das ist übel den zu lesen, aber es gibt Druckersteuerleitungen (Paper out usw.) nimm die. Beispiel: Schalter auf Pin 12 (Paper out) wie bei der seriellen Sache mit Ring Ring... Dann bekommst Du auf &h378+1 (nämlich dem Printer Statusregister), deswegen die +1 folgendes zu lesen: Bit 5 = Paper out also IF (INP(&h378) AND 32 = 32) then... klaro???<img src="http://progshop.com/elektronik/diskussion/clipart/smile.gif" border=0>

Import-Script

29.12.2003, 22:52

sorry, muss natürlich heissen if inp(&h378+1... also letztenendes inp(&h379).. aber das plus1 rechnet Dir Dein Computer schon von ganz alleine; dafür ist es ein Computer...<img src="http://progshop.com/elektronik/diskussion/clipart/smile.gif" border=0>

Import-Script

30.12.2003, 05:07

Nachtrag: @Robin das C- Äquivalent heist 0x378 also HEXadezimal 378 Basic: &h378 (und hex) so könnte man es interpretieren, in Pascal macht man ein Dollar davor wert := port[$378]; wert := port[888]; ist absolut baugleich, nur warum selber rechnen, wenn man einen Compiler benutzt??? <img src="http://progshop.com/elektronik/diskussion/clipart/smile.gif" border=0>

Import-Script

01.01.2004, 12:06

ja ich habe die hex-zahl nicht gewusst und 888 war so einfach zu merken darum habe ich dez genommen und den bit giebt man also dann einfach mit "and" und der binärenzahl an. also pin1 = 1 " 2 = 2 " 3 = 4 ... mfg Robin Imhof

Import-Script

01.01.2004, 12:06

Import-Script

01.01.2004, 12:17

sorry weiß nicht wiso der beitrag 2mal gespeichert wurde??? mfg Robin Imhof

Import-Script

01.01.2004, 14:07

also mit dem schalter zeigt der pc mir zwei werte an nämlich 0 und 32. aber wie kann man infrarot signale entschlüsseln das ich drei signale min. über einen pin am lpt-port steuern kann. Meine vorstellung ist nämlich an den einen rechner die sendediode zu hängen und an den anderen die empfangsdiode und so meinen Robo fahren zu lassen. mfg Robin

Import-Script

02.01.2004, 18:04

@Robin: soweit doch schon mal gut. Jetzt brauchst Du nur noch RC5 Software und dann geht das mit der IR-Diode.<img src="http://progshop.com/elektronik/diskussion/clipart/smile.gif" border=0>

Import-Script

02.01.2004, 18:26

und wie geht das mit qbasic??? mfg Robin

Import-Script

03.01.2004, 00:27

Wert%=(inp(&h378)and 32) if Wert% <> 0 then... REM oder sowas halt. Du solltest Dir allerdings mal einen Quickbasic Compiler besorgen, das qbasic ist zwar nett aber das war´s dann schon. Kirschbaum ist auch nich übel (PowerBasic). Noch ein Tipp: Wenn Du an BIOS Aufrufe ranwillst, den Compiler mit "/B" starten, das steht aber in der Doku. also "QB /B", dann kommst Du auch an Interrupts und etliche anderen DOS-Funktionen dran. So schlecht ist das Teil echt nicht, man muss es nur zu nutzen wissen. Die IR-Software - da googelst Du einfach mal.<img src="http://progshop.com/elektronik/diskussion/clipart/smile.gif" border=0>

Import-Script

03.01.2004, 13:22

ich habe schon quickbasic. unw unter was soll ich da googlen? ps was bedeutet REM????

Import-Script

03.01.2004, 13:24

Hallo Robin, Schau dir auch mal die deutsche Seite von Purebasic an. <a href="http://www.purebasic.de/" target=_top>http://www.purebasic.de/</a> Dort findest Du viele Beispiele. Der Programmcode kann sofort in eine lauffähige exe Datei umgewandelt werden und läuft dann problemlos unter Windows. Ein sehr ausführliches deutsches Einsteiger-Tutorium ist ebenfalls vorhanden. <a href="http://www.purebasic.de/tutorium.shtml" target=_top>http://www.purebasic.de/tutorium.shtml</a> Im deutschen Board bekommst Du garantiert Unterstützung. <a href="http://www.pure-board.de/" target=_top>http://www.pure-board.de/</a> Gruß Willi

Import-Script

03.01.2004, 15:40

@Robin: REM heisst Remark also Kommentar. Eine Zeile die mit REM beginnt ignoriert der Compiler. Das könnte so aussehen: REM Das ist mein erstes Programm REM erstellt im neuen Jahr REM von ROBIN REM am Samstag, 3. Januar REM und jetzt geht´s los a=5 b=7 REM und die addieren wir jetzt c=a+b REM und wenn alles richtig ist sollte REM der nächste Print Befehl 12 zeigen print c REM alles klar???

Import-Script

03.01.2004, 16:28

@Robin: Nachtrag! Statt des REM akzeptiert Quietschbasic auch einen Abostroph - (eben Quietschbasic und VB mit Sicherheit auch) - würd ich mich nicht auf allen Computern drauf verlassen. Trotzdem: REM Hallo ´ist dazu identisch <img src="http://progshop.com/elektronik/diskussion/clipart/smile.gif" border=0>

Import-Script

03.01.2004, 16:38

ja danke.nach was soll ich eigentlich Googlen??? mfg Robin

Import-Script

03.01.2004, 16:50

@Robin: "RC5 - BASIC" ansonsten versuch Dich doch erst mal selber dran. Geht um den Lerneffekt...<img src="http://progshop.com/elektronik/diskussion/clipart/smile.gif" border=0>