home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilst / texture / !Texture / !RunImage (.txt) < prev    next >
Encoding:
RISC OS BBC BASIC V Source  |  1995-05-15  |  632 b   |  22 lines
  1.  Texture
  2.  "<Texture$Dir>.WimpLib.Poll"
  3.  "<Texture$Dir>.WimpLib.Windows"
  4.  "<Texture$Dir>.WimpLib.Icons"
  5.  "<Texture$Dir>.WimpLib.Templates"
  6. startup("Texture",2)
  7. startup_windows(1)
  8. load_templates("<Texture$Dir>.Templates",4096)
  9. respond%(3)=
  10. respond%(6)=
  11. poll(1)
  12. respond_close
  13. quit%=
  14. user_load
  15. create_template("Choices",1,block%)
  16. openwindow(x%)
  17. respond_click
  18.  ihandle% 
  19.  "Filer_Run <Texture$Dir>.Progs.Colour"
  20.  "Filer_Run <Texture$Dir>.Progs.B/W"
  21.  "Filer_Run <Texture$Dir>.Pix"
  22.