home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 April / CHIP4_98.ISO / software / ccconrad / basic.exe / CHIP / Programme.Bas / Beispiele_1 / 002.BAS < prev    next >
Encoding:
BASIC Source File  |  1997-02-16  |  1.2 KB  |  64 lines
  1. '********************************************************************
  2. '
  3. ' C-Control/BASIC       002.BAS
  4. '
  5. ' Systemvoraussetzungen:
  6. '
  7. ' - serielle Verbindung zum PC
  8. ' - Terminalprogramm
  9. '
  10. ' Schwerpunkte:
  11. '
  12. ' - Definition von Labeln
  13. ' - Sprungbefehl GOTO
  14. '
  15. ' Das Beispiel zeigt, wie mit dem GOTO-Befehl im Programm
  16. ' verzweigt werden kann, dadurch jedoch schnell der
  17. ' Ueberblick ueber den Programmverlauf verloren geht.
  18. ' Der GOTO-Befehl sollte daher sparsam und wohlueberlegt
  19. ' eingesetzt werden.
  20. ' Das Einruecken von Quelltextzeilen innerhalb eines
  21. ' zusammenhaengenden Anweisungsblocks kann die Lesbarkeit eines
  22. ' Programms erhoehen.
  23. '********************************************************************
  24.  
  25. ' --- Programmoperationen -------------------------------------------
  26.  
  27. 'Programmtitel ausgeben 
  28.   print "C-Control/BASIC      002.BAS"
  29.   print "============================"
  30.   print
  31.  
  32.   goto abc
  33.  
  34. ' noch eine Leerzeile ausgeben und Programmende
  35. #ende
  36.   print
  37. end
  38.  
  39. #defg
  40.   print "DEFG";
  41. goto hijklmn
  42.  
  43. #uvwxyz
  44.   print "UVWXYZ"
  45. goto ende
  46.  
  47. #opq
  48.   print "OPQ";
  49. goto rst
  50.  
  51. #abc
  52.   print "ABC";
  53. goto defg
  54.  
  55. #rst
  56.   print "RST";
  57. goto uvwxyz
  58.  
  59. #hijklmn
  60.   print "HIJKLMN";
  61. goto opq
  62.  
  63.  
  64.