home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 13 / AACD13.ISO / AACD / System / EASys / InstallPack_47 / EASys!_inst / EASys!_iGuide / Modas2Standard.script < prev    next >
Text File  |  2000-01-21  |  3KB  |  96 lines
  1. ;convert ModAS c_Prepare to user-startup
  2. failat 30
  3. cd SYS:
  4.  
  5. ; re-enable original Amiga-Startup
  6. ; disable ModAS completely
  7.  
  8. SYS:EASys!/bin/CLIexchange MultiNotify KILL
  9.  
  10. ;remove things coupled directly to modas first
  11. delete >NIL: sys:startsys/b_gui/#?LOGIN QUIET
  12. delete >NIL: sys:startsys/b_gui/#?sayhello QUIET
  13. delete >NIL: sys:startsys/b_gui/#?User_env QUIET
  14. delete >NIL: sys:startsys/b_gui/6_MCP QUIET
  15. delete >NIL: sys:startsys/b_gui/#?BootScreenStart QUIET
  16. delete >NIL: sys:startsys/d_system/0_ModAS_deamon QUIET
  17. delete >NIL: sys:startsys/e_wb/#?User_Icons QUIET
  18. delete >NIL: sys:startsys/e_wb/#?User_WBstartup QUIET
  19. delete >NIL: sys:startsys/e_wb/#?sayready QUIET
  20. delete >NIL: sys:startsys/e_wb/#?CleanUp QUIET
  21. delete >NIL: sys:startsys/b_gui/#?BootScreenClose QUIET
  22.  
  23. ;convert startup-sequence
  24. if exists T:SSeq_core
  25.  delete >NIL: T:SSeq_core T:SSeq_Begin T:SSeq_End QUIET
  26. endif
  27.  
  28. copy s:startup-sequence t: CLONE QUIET
  29. rx Install_C:RemoteEd.rexx movetext T:startup-sequence "sTaRt" "~~;BEGIN ModAS" T:SSeq_Begin
  30. rx Install_C:RemoteEd.rexx movetext T:startup-sequence "~~;END ModAS" "§§##" T:SSeq_End
  31.  
  32. echo >T:tmpscript_a "failat 30"
  33. list sys:startsys/a_Init/~(_#?) >>T:tmpscript_a LFORMAT "type >>T:SSeq_core *"%s%s*"*n"
  34. sort T:tmpscript_a to T:sseq_a
  35.  
  36. echo >T:tmpscript_a "failat 30"
  37. list sys:startsys/b_GUI/~(_#?) >>T:tmpscript_a LFORMAT "type >>T:SSeq_core *"%s%s*"*n"
  38. sort T:tmpscript_a to T:sseq_b
  39.  
  40. echo >T:sseq_c "echo >>T:SSeq_core *"**nif exists s:user-startup**n execute s:user-startup**nendif**n*""
  41.  
  42. echo >T:tmpscript_a "failat 30"
  43. list sys:startsys/d_System/~(_#?) >>T:tmpscript_a LFORMAT "type >>T:SSeq_core *"%s%s*"*n"
  44. sort T:tmpscript_a to T:sseq_d
  45.  
  46. echo >T:tmpscript_a "failat 30"
  47. list sys:startsys/e_WB/~(_#?) >>T:tmpscript_a LFORMAT "type >>T:SSeq_core *"%s%s*"*n"
  48. sort T:tmpscript_a to T:sseq_e
  49.  
  50. join T:sseq_a T:sseq_b T:sseq_c T:sseq_d T:sseq_e AS T:conv_sseq.script
  51. execute T:conv_sseq.script
  52.  
  53. join T:sseq_Begin T:sseq_core T:sseq_End AS T:NewSSeq
  54. delete >NIL: T:sseq_#? T:tmpscript_a T:conv_sseq.script QUIET
  55.  
  56.  
  57. ;convert User-Startup
  58. if exists T:NewUserStartup
  59.  delete >NIL: T:NewUserStartup QUIET
  60. endif
  61.  
  62. echo >T:tmpscript_a "failat 30"
  63. list sys:startsys/c_prepare/~(_#?) >T:tmpscript_a LFORMAT "execute T:tmpscript_b *"%s%s*" *"%n*""
  64. sort T:tmpscript_a to T:conv_users.script
  65.  
  66. echo >T:tmpscript_b ".key file,name*nfailat 30"
  67. echo >>T:tmpscript_b "echo >>T:NewUserStartup *";BEGIN <name>*"*ntype >>T:NewUserStartup *"<file>*"*necho >>T:NewUserStartup *";END <name>**n*"*n"
  68.  
  69. execute T:conv_users.script
  70. delete >NIL: T:conv_users.script T:tmpscript_a T:tmpscript_b QUIET
  71.  
  72. ;Replace Startup Files now
  73. if not exists s:user-startup.modas
  74.  copy s:user-startup s:user-startup.modas CLONE QUIET
  75. endif
  76. copy T:NewUserStartup S:User-Startup CLONE QUIET
  77.  
  78. if not exists s:startup-sequence.modas
  79.  copy s:startup-sequence s:startup-sequence.modas CLONE QUIET
  80. endif
  81. copy T:NewSSeq S:Startup-sequence CLONE QUIET
  82.  
  83. ;Cleanup
  84. delete >NIL: T:tmpscript_a T:tmpscript_b T:NewUserStartup T:NewSSeq QUIET
  85.  
  86. assign profile: REMOVE
  87. path SYS:StartSys REMOVE
  88.  
  89. EASys!_bin:swipe >NIL: SYS:StartSys FORCE ALL QUIET
  90. EASys!_bin:swipe >NIL: SYS:ShutDown FORCE ALL QUIET
  91. delete >NIL: SYS:StartSys.info SYS:ShutDown.info FORCE QUIET
  92.  
  93. delete >NIL: ENVARC:ModAS_activated ENV:ModAS_activated SYS:StartSys/ModAS_activated FORCE QUIET
  94. delete >NIL: ENVARC:LoggedLast env:LoggedLast QUIET
  95. delete >NIL: ENVARC:LoggedPrevious env:LoggedPrevious QUIET
  96.