home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format 95 / af095a.adf / c / start.lzx / c / 2 < prev    next >
Text File  |  2019-03-15  |  2KB  |  89 lines
  1. lab 67
  2. assign AF95a: exists >ram:necessary
  3. search ram:necessary "Mounted" >nil:
  4. if warn
  5. echo "*EcPlease insert the *E[33m*E[3mAmiga Format*E[0m Coverdisk."
  6. else
  7. skip 68
  8. endif
  9. skip 67 back
  10. lab 68
  11. endif
  12. delete ram:necessary quiet
  13. echo "*EcWould you like to install to a floppy or hard drive?"
  14. echo "Enter either 'f' or 'h' (the default is floppy)."
  15. setenv >nil: type ?
  16. if not exists ram:type
  17. skip 31
  18. endif
  19. if not $type EQ h
  20. skip 31
  21. lab 39
  22. endif
  23. echo "Could you please now enter the path name for your hard drive?"
  24. echo "E.g. 'dh0:', 'work:test/', etc..."
  25. setenv >nil: pathname ?
  26. assign source: AF95a:archives/
  27. skip 32
  28. lab 31
  29. endif
  30. echo "*EcPlease wait..."
  31. copy AF95a:archives/Extras.lzx ram: BUF=10
  32. assign source: ram:
  33. echo "*EcYou must have a spare disk ready."
  34. setenv pathname "df0:"
  35. lab 33
  36. echo "Insert the spare disk into df0: (your internal drive)"
  37. ask "and press the <return> key."
  38. info df0: >ram:check
  39. search ram:check "af95" >nil:
  40. if warn
  41. skip 34
  42. endif
  43. echo "An Amiga Format disk is in df0:"
  44. skip 33 back
  45. lab 34
  46. search ram:check "No disk present" >nil:
  47. if warn
  48. skip 35
  49. endif
  50. echo "No disk detected in df0:"
  51. skip 33 back
  52. lab 35
  53. search ram:check "837k" >nil:
  54. if not warn
  55. skip 36
  56. endif
  57. search ram:check "879k" >nil:
  58. if not warn
  59. skip 36
  60. endif
  61. skip 37
  62. lab 36
  63. endif
  64. format drive df0: name AF95_Extras FFS noicons quick <ram:go >nil:
  65. skip 38
  66. lab 37
  67. format drive df0: name AF95_Extras FFS noicons <ram:go >nil:
  68. lab 38
  69. copy ram:disk.info df0:
  70. lab 32
  71. failat 21
  72. cd $pathname >nil:
  73. if fail
  74. failat 10
  75. skip 39 back
  76. endif
  77. failat 10
  78. echo "*EcOK... Installing."
  79. unlzx -a -q -bi24 x source:extras.lzx ""
  80. if exists ram:extras.lzx
  81. delete ram:extras.lzx quiet
  82. endif
  83. delete ram:pathname quiet
  84. if exists ram:type
  85. delete ram:type quiet
  86. endif
  87. assign source: remove
  88. type ram:main
  89.