home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #7 / amigamamagazinepolishissue1998.iso / www / makecd / ftp / makecd25.lha / MakeCD_2.5 / registerscript < prev    next >
AmigaDOS Script File  |  1997-09-11  |  6KB  |  184 lines
  1. .KEY language/A
  2. .BRA {
  3. .KET }
  4.  
  5. ; $Id: registerscript 1.5 1997/09/11 16:34:13 angela Exp $
  6.  
  7. ; If you want to add support for further languages, please
  8. ; contact angela@core.de first to check if somebody else is already
  9. ; working on such a translation.
  10.  
  11. SET makecdlang {language}
  12.  
  13. ; By Angela Schmidt
  14. ; *** This is the filename under which the registration form is saved
  15. SET makecdregfilename "Registerform"
  16. SET makecdnoregform "Sorry, could not find registration form for MakeCD."
  17. SET makecdregreq "Registration Request"
  18. SET makecdshallprint "Do you want the registration form being printed now?"
  19. SET makecdshalldelete "Do you want the registration form in T: being deleted now?"
  20. SET makecdansok "OK"
  21. SET makecdansyes "Yes"
  22. SET makecdansno "No"
  23.  
  24. ; by Angela Schmidt
  25. IF $makecdlang EQ "deutsch"
  26.   SET makecdregfilename "Registrierformular"
  27.   SET makecdnoregform "Leider konnte kein Registrierformular für MakeCD gefunden werden."
  28.   SET makecdregreq "Registrations-Dialogfenster"
  29.   SET makecdshallprint "Soll das Registrierformular nun gedruckt werden?"
  30.   SET makecdshalldelete "Soll das Registrierformular nun aus T: gelöscht werden?"
  31.   SET makecdansok "OK"
  32.   SET makecdansyes "Ja"
  33.   SET makecdansno "Nein"
  34. ENDIF
  35.  
  36. ; By Mark Holm <mholm@email.dk>
  37. IF $makecdlang EQ "dansk"
  38.   SET makecdregfilename "Registreringsformular"
  39.   SET makecdnoregform "Beklager, kan ikke finde MakeCD's registreringsformular."
  40.   SET makecdregreq "Registreringsforespørgsel"
  41.   SET makecdshallprint "Vil du udskrive registreringsformularen nu?"
  42.   SET makecdshalldelete "Vil du slette registreringsformularen i T: nu?"
  43.   SET makecdansok "OK"
  44.   SET makecdansyes "Ja"
  45.   SET makecdansno "Nej"
  46. ENDIF
  47.  
  48. ; By Jean-Marc Boursot <jmboursot@nucleus.fr>
  49. IF $makecdlang EQ "français"
  50.   SET makecdregfilename "FormEnregistrement"
  51.   SET makecdnoregform "Désolé, impossible de trouver le formulaire d'enregistrement pour MakeCD."
  52.   SET makecdregreq "Requête d'enregistrement"
  53.   SET makecdshallprint "Voulez-vous que la fiche d'enregistrement soit imprimée maintenant ?"
  54.   SET makecdshalldelete "Voulez-vous que la fiche d'enregistrement dans T: soit effacée maintenant ?"
  55.   SET makecdansok "OK"
  56.   SET makecdansyes "Oui"
  57.   SET makecdansno "Non"
  58. ENDIF
  59.  
  60. ; By Francesco Dipietromaria <dpm@sinet.it>
  61. IF $makecdlang EQ "italiano"
  62.   SET makecdregfilename "Moduloregistrazione"
  63.   SET makecdnoregform "Spiacente, non trovo il modulo di registrazione per MakeCD."
  64.   SET makecdregreq "Registrazione"
  65.   SET makecdshallprint "Volete stampare il modulo di registrazione adesso?"
  66.   SET makecdshalldelete "Volete cheil modulo di registrazione venga cancellato da T: adesso?"
  67.   SET makecdansok "OK"
  68.   SET makecdansyes "Si"
  69.   SET makecdansno "No"
  70. ENDIF
  71.  
  72. ; By Horváth Péter <pcpince@syneco.hu>
  73. IF $makecdlang EQ "magyar"
  74.   SET makecdregfilename "Regisztrációs ûrlap"
  75.   SET makecdnoregform "Sajnos nem találom a MakeCD regisztrációs ûrlapját."
  76.   SET makecdregreq "Regisztrációs kérés"
  77.   SET makecdshallprint "Kívánja a regisztrációs ûrapot most kinyomtatni?"
  78.   SET makecdshalldelete "Kívánja a T:-ben lévõ regisztrációs ûrlapot most letörölni?"
  79.   SET makecdansok "OK"
  80.   SET makecdansyes "Igen"
  81.   SET makecdansno "Nem"
  82. ENDIF
  83.  
  84. ; By Wessel Dankers <wsldanke@cs.ruu.nl>
  85. IF $makecdlang EQ "nederlands"
  86.   SET makecdregfilename "Registratieformulier"
  87.   SET makecdnoregform "Sorry, kon registratieformulier niet vinden voor MakeCD"
  88.   SET makecdregreq "Verzoek tot registratie"
  89.   SET makecdshallprint "Zal ik het registratieformulier nu printen?"
  90.   SET makecdshalldelete "Zal ik het registratieformulier in T: nu wissen?"
  91.   SET makecdansok "Ok"
  92.   SET makecdansyes "Ja"
  93.   SET makecdansno "Nee"
  94. ENDIF
  95.  
  96. ; By Eivind Olsen <eivindo@bgnett.no>
  97. IF $makecdlang EQ "norsk"
  98.   SET makecdregfilename "Registrerings-skjema"
  99.   SET makecdnoregform "Beklager, kunne ikke finne registrerings-skjemaet for MakeCD."
  100.   SET makecdregreq "Registrerings-forespørsel"
  101.   SET makecdshallprint "Vil du skrive ut registrerings-skjemaet nå?"
  102.   SET makecdshalldelete "Vil du slette registrerings-skjemaet som ligger i T:?"
  103.   SET makecdansok "OK"
  104.   SET makecdansyes "Ja"
  105.   SET makecdansno "Nei"
  106. ENDIF
  107.  
  108. ; By Mikko Virtanen <mtv@klinja.fipnet.fi>
  109. IF $makecdlang EQ "suomi"
  110.   SET makecdregfilename "Rekisteröintikaavake"
  111.   SET makecdnoregform "En löytänyt rekisteröintikaavaketta MakeCD:lle."
  112.   SET makecdregreq "Rekisteröintipyyntö"
  113.   SET makecdshallprint "Haluatko, että rekisteröintikaavake tulostetaan nyt?"
  114.   SET makecdshalldelete "Haluatko, että T:ssä oleva rekisteröintikaavake tuhotaan nyt?"
  115.   SET makecdansok "OK"
  116.   SET makecdansyes "Kyllä"
  117.   SET makecdansno "Ei"
  118. ENDIF
  119.  
  120. ; By Fredrik Zetterlund <frallan@canit.se>
  121. IF $makecdlang EQ "svenska"
  122.   SET makecdregfilename "Registreringsformulär"
  123.   SET makecdnoregform "Hittar inte registreringsformuläret för MakeCD."
  124.   SET makecdregreq "Registreringsförfrågan"
  125.   SET makecdshallprint "Vill du skriva ut registreringsformuläret nu?"
  126.   SET makecdshalldelete "Vill du radera registreringsformuläret i T: nu?"
  127.   SET makecdansok "Okej"
  128.   SET makecdansyes "Ja"
  129.   SET makecdansno "Nej"
  130. ENDIF
  131.  
  132. IF NOT EXISTS doc/$makecdlang/$makecdregfilename
  133.   SET makecdlang english
  134.   SET makecdregfilename "Registerform"
  135. ENDIF
  136.  
  137. IF NOT EXISTS doc/$makecdlang/$makecdregfilename
  138.   SET makecdlang deutsch
  139.   SET makecdregfilename "Registrierformular"
  140. ENDIF
  141.  
  142. IF EXISTS doc/$makecdlang/$makecdregfilename
  143.   Copy doc/$makecdlang/$makecdregfilename T:Registerform
  144.   Protect T:Registerform rwd
  145.   IF EXISTS ENV:EDITOR
  146.     $EDITOR T:Registerform
  147.   ELSE
  148.     Ed T:Registerform
  149.   ENDIF
  150. ELSE
  151.   IF EXISTS C:RequestChoice
  152.     RequestChoice >NIL: "$makecdregreq" "$makecdnoregform" "$makecdansok"
  153.   ELSE
  154.     Echo >CON:0/0/640/100/Error "$makecdnoregform"
  155.   ENDIF
  156.   SKIP unsetvars
  157. ENDIF
  158.  
  159. IF EXISTS C:RequestChoice
  160.   RequestChoice >ENV:makecdANSWER "$makecdregreq" "$makecdshallprint" "$makecdansyes" "$makecdansno"
  161.   IF $makecdANSWER EQ 1
  162.     Type T:Registerform TO PRT:
  163.   ENDIF
  164.   RequestChoice >ENV:makecdANSWER "$makecdregreq" "$makecdshalldelete" "$makecdansyes" "$makecdansno"
  165.   IF $makecdANSWER EQ 1
  166.     Delete QUIET T:Registerform
  167.   ENDIF
  168.   Delete QUIET ENV:makecdANSWER
  169. ENDIF
  170.  
  171. LAB unsetvars
  172.  
  173. UNSET makecdlang
  174. UNSET makecdregfilename
  175. UNSET makecdnoregform
  176. UNSET makecdregreq
  177. UNSET makecdshallprint
  178. UNSET makecdshalldelete
  179. UNSET makecdansok
  180. UNSET makecdansyes
  181. UNSET makecdansno
  182.  
  183. LAB end
  184.