home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format 55 / af055a.adf / Examples / PPI_TECH.DM < prev    next >
Text File  |  1993-02-10  |  6KB  |  149 lines
  1. Reset
  2. OpenScreen 2 HALF
  3. Color AAA 000 FFF 06F
  4. Pens 0 1 1 2 1 3 1 0 3
  5. Font Siesta/8
  6.  
  7. AddMenu Project, Display Format, D, SetFormat
  8. AddMenu Project, Add Command, AddCmd
  9. AddMenu Project, Change Command, ChgCmd
  10. AddMenu Project, Add Menu Item, AddMenu
  11. AddMenu Project, Add Auto Command, AddAutoCmd
  12. AddMenu Project, Add Key Command, AddKeyCmd
  13. AddMenu Project, Palette, Color
  14. AddMenu Project, Printer Setup, SetPrinter
  15. AddMenu Project, Save Config, S, SaveConfig
  16. AddMenu Project, ReConfig, batch sys:startup.dm
  17. AddMenu Project, Save Cmd Window, SaveCmdWin
  18. AddMenu Project, About, About
  19. AddMenu Project, Quit DM, Q, Quit
  20.  
  21. AddMenu Tools, Execute Command.., Extern
  22. AddMenu Tools, Test REXX, A, REXX
  23. AddMenu Tools, Run Selected, Single;External run %s
  24. AddMenu Tools, Run DM Script, single;batch %s
  25. AddMenu Tools, Change Font, Font
  26. AddMenu Tools, New Window, N, OpenWindow 240 40 260 120
  27. AddMenu Tools, New Cmd Window, C, OpenWindow 240 40 260 120 CMD;AddCmd
  28. AddMenu Tools, Run DM Script, Single;Batch %s
  29. AddMenu Tools, Print Dir, P, printdir %s prt:
  30. AddMenu Tools, PrintFiles.., O, Extern tools/printfiles %s
  31.  
  32. AddMenu Sort, Sort By NAME.., sortby Name
  33. AddMenu Sort, Sort By DATE.., sortby Date
  34. AddMenu Sort, Sort By SIZE.., sortby Size
  35.  
  36. AddMenu Archives, Lharc Add, StdIO "CON:0/12/640/100/Add Window";Archive "Lharc <* -x -r a";StdIO CLOSE
  37. AddMenu Archives, Arc   Add, StdIO "CON:0/12/640/100/Add Window";Archive "Arc <* a";StdIO CLOSE
  38. AddMenu Archives, Zoo   Add, StdIO "CON:0/12/640/100/Add Window";Archive "Zoo <* a";StdIO CLOSE
  39. AddMenu Archives, Lharc Extract, StdIO "CON:0/12/640/100/Extract Window";Extern Lharc <* x %s;StdIO CLOSE
  40. AddMenu Archives, Lharc X >Dest, StdIO "CON:0/12/640/100/Extract Window";Extern CD %d \Lharc <* x %s;StdIO CLOSE
  41. AddMenu Archives, Lharc X Req, Confirm "Enter destination path" Continue Cancel %P;StdIO "CON:0/12/640/100/Extract Window";Extern CD %R \Lharc <* x %s;StdIO CLOSE
  42. AddMenu Archives, Arc   Extract, StdIO "CON:0/12/640/100/Extract Window";Extern Arc <* x %s;StdIO CLOSE
  43. AddMenu Archives, Zoo   Extract, StdIO "CON:0/12/640/100/Extract Window";Extern Zoo <* x// %s;StdIO CLOSE
  44. AddMenu Archives, Lharc List, StdIO "CON:0/12/640/160/List Window";Extern Lharc v %s;Wait;StdIO CLOSE
  45. AddMenu Archives, Arc   List, StdIO "CON:0/12/640/160/List Window";Extern Arc v %s;Wait;StdIO CLOSE
  46. AddMenu Archives, Zoo   List, StdIO "CON:0/12/640/160/List Window";Extern Zoo v %s;Wait;StdIO CLOSE
  47. AddMenu Archives, DM Pack, Pack %s %d
  48. AddMenu Archives, DM UnPack, Unpack %s %d
  49.  
  50. AddMenu Disk, Format, F, Format
  51. AddMenu Disk, DiskCopy, X, DiskCopy
  52. AddMenu Disk, Format DF0:, Confirm "Are you sure?";Format DF0:
  53. AddMenu Disk, Format DF1:, Format DF1: VERIFY "WorkDisk"
  54. AddMenu Disk, Clear  DF0:, Format DF0: QUICK INSTALL VERIFY
  55. AddMenu Disk, Copy DF0: DF0:, DiskCopy DF0: DF0:
  56. AddMenu Disk, Copy DF0: DF1:, DiskCopy DF0: DF1:
  57. AddMenu Disk, DiskERR DF0:, extern c:diskerr df0:
  58.  
  59. AddMenu Control, Lock as Source, Lock S
  60. AddMenu Control, Lock as Dest, Lock D
  61. AddMenu Control, Swap S<->D, -, Swap
  62. AddMenu Control, UnLock, UnLock
  63. AddMenu Control, UnLock all, UnLock All
  64. AddMenu Control, Toggle Expand, Expand
  65.  
  66. AddMenu MMedia, Play.., P, Play %s
  67. AddMenu MMedia, -Stop!, p, Play
  68. AddMenu MMedia, Show.., V, ShowPic %s
  69.  
  70. AddMenu DMS, DMS Read.., extern sys:c2/DMS read ram:DMSfile
  71. AddMenu DMS, DMS Write.., extern sys:c2/DMS write %s
  72.  
  73. SetPrinter PICA NLQ DENSITY 3 LEFT 1 RIGHT 81 LINES 66 LPI 6
  74. Button "parent"
  75. SetFormat "NS T DMY A C"
  76. BarFormat "DiskMaster %V  %W %T %D %M %Y  Total RAM: %P Kbytes"
  77. TitleFormat "%B/%F %I/%C"
  78.  
  79. OpenWindow 547  12  94 219 CMD
  80.  
  81. AddCmd Root, 10, Root
  82. AddCmd Parent, 10, Parent
  83. AddCmd , 20, 
  84. AddCmd All, 20, Select *
  85. AddCmd Clear, 20, Deselect *
  86. AddCmd , 20, 
  87. AddCmd MakeDir, 30, MakeDir
  88. AddCmd Copy, 30, ReqPattern;Copy %s %d
  89. AddCmd Copy NEW, 30, Copy %s %d NEWER
  90. AddCmd Copy AS, 30, Copy %s $d RENAME
  91. AddCmd Move, 30, ReqPattern;Move %s %d
  92. AddCmd Rename, 30, Recurse OFF;Rename %s
  93. AddCmd , 20, 
  94. AddCmd Delete!, 32, ReqPattern;Confirm "All selected files will be lost.";Protect %s +D;Delete %s
  95. AddCmd , 20, 
  96. AddCmd IFF2DCTV, 12, external c:ifftodctv %s -w640 -h400 -d3 -oram:; this is an example of how to use an external file like IFF2DCTV
  97. AddCmd ShowPIC, 12, showpic %s
  98.  
  99. OpenWindow 619  12  85 219 CMD
  100.  
  101. AddCmd Protect, 20, Recurse OFF;Protect %s
  102. AddCmd Comment, 20, Recurse OFF;Comment %s
  103. AddCmd Exclude, 20, DeSelect
  104. AddCmd Find, 20, ReqPattern "Please enter search pattern";Find %s
  105. AddCmd SizeChk, 20, UnMark OFF;Check %s
  106. AddCmd , 20, 
  107. AddCmd Read, 30, Read %s LACE
  108. AddCmd HexRead, 30, Read %s HEX
  109. AddCmd Edit, 30, scrback; external c:ced %s; scrfront
  110. AddCmd , 20, 
  111. AddCmd Print, 12, Single; Print %s PRT:
  112. AddCmd PrtDir, 12, printdir %s PRT:
  113. AddCmd , 20, 
  114. AddCmd , 20, 
  115. AddCmd , 20, 
  116. AddCmd , 20, 
  117. AddCmd , 20, 
  118. AddCmd , 20, 
  119. AddCmd , 20, 
  120. AddCmd Quit, 21, Quit
  121.  
  122. OpenWindow 326  12 220 219 
  123.  
  124. OpenWindow   0  12 217 219 SYS:
  125.  
  126. OpenWindow 218  12 107 219 
  127.  
  128. AddAutoCmd FORM????ACBM, ShowPic %s
  129. AddAutoCmd FORM????8SVX, ShowPic %s
  130. AddAutoCmd FORM????ILBM, ShowPic %s
  131. AddAutoCmd FORM????ANIM, Extern sys:utilities/View %s
  132. AddAutoCmd ??-lh,StdIO "CON:0/12/640/100/Extract Window";Extern Lharc <* x %s;StdIO CLOSE
  133. AddAutoCmd ^Z,StdIO "CON:0/12/640/100/Extract Window";Extern Arc <* x %s;StdIO CLOSE
  134. AddAutoCmd ZOO ?.?? Archive,StdIO "CON:0/12/640/100/Extract Window";Extern Zoo <* x// %s;StdIO CLOSE
  135. AddAutoCmd TEXT,Read %s
  136. AddAutoCmd DEFAULT,Read %s HEX
  137. AddKeyCmd Q, quit
  138. AddKeyCmd c, copy %s %d
  139. AddKeyCmd C, copy %s
  140. AddKeyCmd D, delete %s
  141. AddKeyCmd r, rename %s
  142. AddKeyCmd m, move %s %d
  143. AddKeyCmd M, move %s
  144. AddKeyCmd e, extern c:ed %s
  145. AddKeyCmd E, extern c:ced %s
  146. AddKeyCmd /, Parent
  147. AddKeyCmd :, Root
  148. AddKeyCmd q, quit
  149.