home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 7 / 64er_Magazin_Sonderheft_07_86-07_1986_Markt__Technik_de_Side_A.d64 / text < prev    next >
Text File  |  2022-10-26  |  2KB  |  76 lines
  1.                    Lemwerder 15.02.86
  2.  
  3. 64.Redaktion            Uwe Wiards
  4. Hans-Pinselstr.2        Johannesweg4
  5. Haar bei Muenchen       2874 Lemwerder
  6.                         Tel.0421/679395
  7.  
  8.  
  9. Hiermit biete ich Ihnen das folgende
  10. Programm zum Abdruck in der 64.er an.
  11. Ich versichere, dass dieses Programm
  12. frei von Rechten dritter ist. Ich bitte
  13. Sie, bei Nichtinteresse mir eine Mittei-
  14. lung zu schicken.
  15.     Mit freundlichen Gruessen
  16.            Uwe Wiards
  17. ----------------------------------------
  18.  
  19.  
  20.   Statuszeilen-einblendung
  21.  
  22. Dieses kurze Programm, wurde aus der Not
  23. geboren, dass bei einem Dateiprogramm
  24. in Basic,laufend Informationen ueber den
  25. aktuellen Zustand des Programms benoe-
  26. tigt wurden. Beim Scrolling waren diese
  27. aber immer verschwunden!
  28.   Um dies zu verhindern, gab es der Me-
  29. thoden viele; z.B. erneutes Printen auf
  30. dem Bildschirm. Dieses ist aber sehr um-
  31. staendlich und zeitraubend.
  32.   Das Programm 'Statuszeilen' ist leicht
  33. von Basic aus zu Handhaben und loest so-
  34. mit das genannte Problem. Es wird von
  35. Basic aus mit SYS12*4096 gestartet.
  36.  
  37.  
  38.   Programmerklaerung:
  39.  In der 'INIT'-Routine werden die Zeiger
  40. des Interupt auf das Programm verbogen.
  41. Ab 'START' liegt das eigendliche Pro-
  42. gramm. In der Schleife 'LOOP' wird der
  43. Text (indirekt adressiert mit x) gelesen
  44. und in den Bildschirmspeicher abgelegt.
  45. Ab 'END' wird mit Hilfe der Betriebssys-
  46. tem-Routine 'PLOT' die Cursorposition
  47. gelesen. Ist der Cursor innerhalb der
  48. ersten beiden Zeilen, wird er mit der
  49. Routine 'SET' in die dritte Zeile ge-
  50. setzt. 'AUS' lenkt den Interupt auf die
  51. normale Interuptroutine im Betriebssys-
  52. tem.
  53.   Wird mit SYS49283 die Routine 'STOP'
  54. aufgerufen, wird der Irq-Zeiger wieder
  55. auf den urspruenglichen Wert gesetzt,
  56. und das Programm somit abgeschaltet.
  57. Die Hintergrundfarbe der Statuszeilen
  58. laesst sich in Speicherstelle $C016 =
  59. dez.49174 veraendern. Der Text, der max.
  60. 80 Zeichen umfassen kann, liegt ab dez.
  61. 49203, und kann dort direkt hineingepokt
  62. werden.Im Programm 'STATUSEDIT.BAS'
  63. wird in der Zeile 110 gezeigt wie.
  64.  
  65.   Das Assemblerlisting ist ausfuehrlich
  66. dokumentiert, um auch Anfaengern das
  67. Leben leicht zu machen.
  68. Mit anderen Programmen, die den Interupt
  69. beeinflussen, wird diese Programm ohne
  70. Anpassung nicht laufen.
  71.  
  72.                      (Uwe Wiards)
  73.  
  74. ----------------------------------------
  75.  
  76.