home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 2 / RISC_DISC_2.iso / pd_share / program / code / wt / wtexample / Examples_!Tools_!Run < prev    next >
Encoding:
Text File  |  1995-04-06  |  1.4 KB  |  49 lines
  1. | !Run file !Tools.
  2.  
  3. Set WTExamples$Path <Obey$Dir>.^.
  4. Set WTExamples$Dir <Obey$Dir>.^
  5. Set Tools$Dir <Obey$Dir>
  6.  
  7. Iconsprites <Tools$dir>.!Sprites
  8.  
  9. | We don't want to change user's sprites for no reason
  10. If "<WT$Path>" = "" Then Iconsprites <Tools$Dir>.WTSprs
  11.  
  12. | Check if !System has been seen by the filer
  13. If "<System$Path>" = "" Then Error 0 System resources cannot be found
  14.  
  15. | Check if !WT has been seen by the filer
  16. | the next line may corrupt Tools$Dir variable
  17. If "<WT$Path>" = "" Then /<Tools$Dir>.> /System:!WT.!Boot
  18. If "<WT$Path>" = "" Then Error 0 Please run !WTInstall to install Wacky-Talky
  19.  
  20. | Load the manager
  21. RMEnsure Wacky-Talky 0.60 RMLoad WT:WackyTalky
  22.  
  23. | Ensure GLib
  24. If "<GLib$Path>"="" Then /WT:3rdParty.!GLib
  25.  
  26. | Set some usefull alaises.
  27. Set Alias$Ensure  WTEnsure %%0 >WTLoad WTModules:%%*0
  28. Set Alias$Ensure2 WTEnsure %%0 >WTLoad WTModules:%%*1
  29.  
  30. | Ensure a nice version of BASIC module (Hello RO2 users!)
  31. RMEnsure BASICTrans 1.00 >RMReInit BASICTrans
  32. RMEnsure BASICTrans 1.00 RMLoad <Tools$Dir>.BASICTrans
  33. RMEnsure BASIC 1.05 %>RMReInit BASIC {:} WTLoad WTModules:WT+
  34. RMEnsure BASIC 1.05 %RMLoad <Tools$Dir>.BASIC {:} WTLoad WTModules:WT+
  35.  
  36. | Ensure that the following WT modules are loaded and load them this
  37. | is not the case.
  38. Ensure FarAddress
  39. Ensure2 LocalLabels LocalLabel
  40. Ensure RunData
  41. Ensure RunPath
  42. Ensure SquashInfo
  43. Ensure WTasm
  44. Ensure WTDLRs+
  45. Ensure WTTokens
  46. Ensure PrettyHelp
  47.  
  48. | Ensure Tokens
  49. WTTokensEnsure WTService_0 WTTokensLoad WTResources:WT_Tokens