home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 3 / Meeting_Pearls_III.iso / Index / Scripts / show_prg_choose < prev    next >
AmigaDOS Script File  |  1995-09-19  |  688b  |  25 lines
  1. .key Language/A,Application/A,DEV
  2. .bra {
  3. .ket }
  4.  
  5. CD {DEV}:
  6.  
  7. Failat 25
  8.  
  9. IF {Language} EQ "deutsch"
  10.     :C/ReqList INPUT :Index/bricks/choose-list-{Language} OUTPUT ENV:MPTMPCHOOSELIST{$$} LIST :Index/bricks/choose-list-scriptnames HEADER "Was soll mit diesem Softwarepaket getan werden?" CLONERT
  11.     IF WARN
  12.         Skip endchoose
  13.     ENDIF
  14. ELSE
  15.     :C/ReqList INPUT :Index/bricks/choose-list-{Language} OUTPUT ENV:MPTMPCHOOSELIST{$$} LIST :Index/bricks/choose-list-scriptnames HEADER "What shall we do with this software package?" CLONERT
  16.     IF WARN
  17.         Skip endchoose
  18.     ENDIF
  19. ENDIF
  20.  
  21. Execute :Index/Scripts/$MPTMPCHOOSELIST{$$} {Language} {Application} {DEV}
  22.  
  23. LAB endchoose
  24. Delete ENV:MPTMPCHOOSELIST{$$} QUIET
  25.