PC robot pågår.
Robot os. Oändlig loop.
Medan true %
' Ange eller Återställ värden
"sensor indatavärden
"Andra jobb
"Göra vad som behövs utifrån indatavärden.
wend
Del I. Ange eller återställa värdena.
Del II få sensor värden.
Läsa in stiften
Kommandot för att läsa från hamnar i qbasic är INP. Adressen du behöver läsa från är adressen till parallellporten (vanligtvis 378h) + 1. så vanliga adressen är 379h. Som jag nämnt tidigare, är stiften används för indata 10-13 och 15. Läsa olika stiften är lite hårdare än skriva till hamnarna, som du har att maskera ut stiften din inte intresserad. När du läser porten, används de första 3 bitarna återvände inte. Till exempel skulle qbasic koden nedan läsa pin 12 (av papper). När denna port är hög, "slut på papper / pin 12 växlas" kommer att visas:
data = inp (& h379)
IF (data och 32) = 32 och skriv sedan ut "slut på papper / pin 12 hög"
Tabellen nedan lista ingångsstift pinkod, dess normala funktion och hur många som krävs för att läsa det (t.ex 32 används i exemplet ovan):
PIN-kod | Normala syfte | Nummer att läsa |
10 | Ackowledge | 64 |
11 | Hög vid inte upptaget | 128 |
12 | Hög när av papper | 32 |
13 | Hög när skrivare online | 16 |
15 | Hög när inget fel | 8 |
Om du förstår binär, bör du omedelbart se var dessa siffror kommer från, och varför de används för att maskera ut alla andra stift vi inte försöker läsa. Det enklaste du kan använda för att testa detta är att bara ansluta en växla mellan en ingångsstift och en marken pin (18-25). Till exempel om du ansluter en växla mellan stift 15 och 20, kan du använda följande kod för att övervaka när strömbrytaren trycks:
start:
Res = INP (& H379)
CLS
IF (res och 8) = 8 då utskrift "knappen sköt" annat PRINT "Knappen inte drivit"
FÖR dröjsmål = 1 till 500: nästa fördröja
Gå till start
Jag vet att denna kod är lite rörig, och kommer att flimra, men den är skriven för klarhet. Samma kod kan användas för att övervaka andra fyra ingående linjer genom att ändra till "8" till ett annat från tabellen.
Del III andra jobb.
Del IV
Vi kan använda program som parcon för att ange värden på den parallella porten för sådana jpbs som kontrollerande makten tåget. Se även: