home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 2 / ETO Development Tools 2.iso / Tools - Objects / Virtual User 1.0b5 / Virtual User / MPW Scripts / SetTargetZone_vu < prev    next >
Encoding:
Text File  |  1990-10-05  |  277 b   |  12 lines  |  [TEXT/MPS ]
  1. SET Exit 0
  2. SET TempVar ''
  3. SET TempVar "`REQUEST 'Please enter new zone name:'`"
  4. SET localVar "∂'{TempVar}∂'"
  5. IF ("{localVar}" =~ /∂'∂*∂'/) OR ("{localVar}" != "''")
  6.     SET VUTargetZone "{TempVar}"
  7.     TARGET "{VUSettings}"
  8.     FIND 1
  9.     ECHO "{TempVar}" > §
  10.     CLOSE -y "{VUSettings}"
  11. END
  12.