home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 April / CHIP4_98.ISO / software / ccconrad / basic.exe / CHIP / Programme.Bas / Beispiele_2 / OUTPUT2.BAS < prev    next >
Encoding:
BASIC Source File  |  1997-03-06  |  583 b   |  30 lines
  1. '**************************************
  2. '
  3. ' C-Control/BASIC       OUTPUT2.BAS
  4. '
  5. ' Aufgabe:
  6. '
  7. ' - Messung der Schaltzeiten fuer
  8. ' - Einzelport und Gesamtport
  9. ' - mit einem Oszilloskop
  10. '
  11. '**************************************
  12. ' --- Definitionen --------------------
  13.  
  14. define Ausgang port[1]
  15. define Ausgaenge byteport[1]
  16.  
  17. ' --- Programmoperationen -------------
  18.  
  19. #Loop
  20.   Ausgang = 1          'Einschalten
  21.   Ausgang = 0          'Ausschalten
  22.   Ausgaenge = &B11111111  'alle EIN
  23.   Ausgaenge = &B00000000  'alle AUS
  24. goto Loop              'Endlosschleife
  25.  
  26.  
  27.  
  28.  
  29.  
  30.