home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 April / CHIP4_98.ISO / software / ccconrad / basic.exe / CHIP / Programme.Bas / Beispiele_3 / BSP05.BAS < prev    next >
Encoding:
BASIC Source File  |  1997-08-29  |  413 b   |  14 lines
  1.  
  2. DEFINE relais1 PORT[1] 'die Variable relais1 wird definiert 
  3. DEFINE ein     1       'die Konstante 1 erhΣlt den Namen "ein"
  4. DEFINE aus     0       'die Konstante 0 erhΣlt den Namen "aus"
  5.  
  6. relais1 = aus          'Relais ausschalten
  7. PAUSE 50           '1s Pause
  8. relais1 = 1           'Relais einschalten
  9. PAUSE 50           '1s Pause
  10. relais1 = &H0           'Relais ausschalten 
  11.  
  12. END                   'Programmende
  13.  
  14.