home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format 123 / af123a.adf / af123a2.lzx / Selector / browser / makefile next >
Encoding:
AmigaDOS Script File  |  1999-03-04  |  933 b   |  34 lines

  1. .key dir
  2. .bra {
  3. .ket }
  4.  
  5. failat 21
  6.  
  7. echo >ram:file.sel "title 'File Browser'"
  8. echo >>ram:file.sel "gap 0"
  9. echo >>ram:file.sel "sortbuttons on"
  10. echo >>ram:file.sel "settings off"
  11. echo >>ram:file.sel "flow right"
  12.  
  13. echo >>ram:file.sel "onexit exec 'delete >nil: ram:file.sel'"
  14. echo >>ram:file.sel "color yellow black"
  15. echo >>ram:file.sel "button Parent exec @execute browser/makefile *"{dir}/*"@ load ram:file.sel"
  16. echo >>ram:file.sel "color white"
  17. echo >>ram:file.sel "text Dirs:"
  18.  
  19. list >>ram:file.sel "{dir}" pat ~(#?.info) dirs lformat "button *"%n*" exec @execute browser/makefile *"{dir}%n/*"@ load ram:file.sel"
  20. if warn
  21.     copy >nil: browser/welcome.sel ram:file.sel
  22.     skip opa
  23. endif
  24.  
  25. echo >>ram:file.sel "color black"
  26. echo >>ram:file.sel "text Files:"
  27.  
  28. list >>ram:file.sel "{dir}" pat ~(#?.info) files lformat "button *"%n*" run £execute browser/what *"{dir}%n*"£"
  29. if warn
  30.     copy >nil: browser/welcome.sel ram:file.sel
  31. endif
  32.  
  33. lab opa
  34.