home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 17 / CD_ASCQ_17_101194.iso / vrac / cpcemu12.zip / CPCPD1.DSK / pomask.bas (.txt) < prev    next >
Locomotive BASIC  |  1994-09-04  |  2KB  |  43 lines
  1. POMASK  BAS
  2. jetzt aber
  3.  Pomask  -  Pointer-Programming mask
  4.  Marco Vieth, 2.9.92
  5. example
  6. init all
  7. set pd-buffer
  8. show window
  9. pd-window
  10. ,"*");
  11. "continue output in"
  12. "the normal window"
  13. "select something ..."
  14. "it was line ";
  15. "and column ",
  16.  0, 2,78,2,24
  17.  "this is the", "background window."
  18.  "","you can,t select this text, if"
  19.  "a PD-window is active"
  20.  "(such as the continue-window)"
  21.  1,5,30,8,17
  22.  "this is a pd-window"
  23.  "it seems to be the same", "as before, but ..."
  24.  1,8,35,9,15
  25.  "you selected something"
  26.  "let me see ..."
  27.  1,3,20,4,10
  28.  "you see that ?", "it's the background of", "the old window !"
  29.  create & fill window :
  30. botto
  31. botto
  32. "continue...";
  33.  Select
  34.  Error-Einsprung
  35. "Error ";
  36. A;" Line ";
  37. "!POPACK2.BIN",
  38. jetzt aber
  39. 9.6.1992)
  40. nolist
  41. ;WRITE"POPACK2.BIN"
  42. org &9E00;bis 
  43.