home *** CD-ROM | disk | FTP | other *** search
/ Chip 1994 February / CHIP0294.ISO / digital / best100 / lernen / box / box12.mag < prev    next >
Encoding:
Text File  |  1994-03-19  |  1.4 KB  |  66 lines
  1. m18
  2. O3
  3. RF0 0 639 479
  4. O1
  5. T5
  6. RE8 9 630 451
  7. O0
  8. T1
  9. te30 35 DEFAULT
  10. Bytes können aber auch Befehle reprä-
  11. sentatieren. Sie könnten eine Sprache
  12. erstellen, in der jede der 256 mögli-
  13. chen  Kombinationen einen  Befehl für
  14. den Computer darstellt. Wenn der Wert
  15.   34   bedeutet: schreibe einen roten
  16. Punkt in die  Mitte des  Bildschirms,
  17. und der  Wert  176 : bewege den Punkt
  18. nach links...Sie könnten auf die Idee
  19. kommen, das daß Programmieren ist.
  20.         KLAR !! ist es !
  21.  
  22. Es gibt sicher mehr als  256 Arbeiten
  23. für den Computer.
  24. Wenn jetzt jedes Byte einen einfachen
  25. Befehl darstellt, können  Kombinatio-
  26. nen  von Bytes  bereits ein komplexes
  27. Programm sein.
  28. Programmierer brauchen sich heute die
  29. Zahlen allerdings nicht mehr merken.
  30. Ihre 'Programmiersprachen' ordnen die
  31. Bytes passenden englischen Worten zu.
  32. ~
  33. te350 35 DEFAULT
  34. Hier ist mal ein Beispiel-
  35. Programm.  Dieses Beispiel läuft
  36. gerade.  Es ist ein Teil von
  37.           CMSHOW.EXE:
  38. ~
  39. O0
  40. te339 350 DEFAULT
  41.  (Es wertet Ihren nächsten Tasten-
  42.   druck aus; falls Sie 'N' drücken
  43.   gelangen Sie zur nächsten Seite.
  44.             'NEXT'                )
  45. ~
  46.  
  47. T3
  48. O12
  49. RE345 178 588 323
  50. O0
  51. RF348 181 585 320
  52. RF356 324 595 330
  53. RF589 191 595 326
  54.  
  55. O7
  56. te350 185 DEFAULT
  57.   case upcase(u) of 'N' :
  58.      begin
  59.        inc(whichone);
  60.        if whichone > max
  61.        then whichone := max;
  62.        readfile(whichone);
  63.      end;
  64. ~
  65.  
  66.