home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 6 / Sonderheft_6-96.iso / amigaplus_cd-rom_index / nr.6-96 < prev    next >
Text File  |  1996-11-03  |  2KB  |  43 lines
  1. ; (C) Sandro Paolini / s_paolini@pluribus.wupper.de / 6/96
  2. ; Altered by Onur Pekdemir (Pekdemir@eure.de)
  3.  
  4. ; Don't ask me, ask AmigaGuide! ;(
  5.  
  6. IF NOT exists RAM:
  7.   Echo "Ohne die Ram-Disk *"RAM:*" funktioniert dieses Skript leider nicht!"
  8.   Echo "Auf jeder normalen Workbench sollte die RAM-Disk verfügbar sein."
  9.   Wait 5
  10.   Quit
  11. ENDIF
  12.  
  13. CD AmigaPlus_CD-ROM_Nr.6-96:AmigaPlus_CD-ROM_Index
  14. FailAt 240
  15. Stack 30000
  16. Set >NIL: Suchmuster ""
  17. Set Suchmuster `AmigaPlus_CD-ROM_Nr.6-96:AmigaPlus_CD-ROM_Index/ESR "" TITLEBAR "Amiga Plus CD-ROM Index" MESSAGE "Bitte Suchbegriff eingeben:"`
  18. IF "$Suchmuster" EQ ""
  19.   QUIT
  20. ENDIF
  21.  
  22. Echo >RAM:Plus-CD-Temp-1 "@DATABASE Such-Guide"
  23. Echo >>RAM:Plus-CD-Temp-1 "@REMARK Von Onur Pekdemir für Amiga Plus CD Vol. 6/96"
  24. Echo >>RAM:Plus-CD-Temp-1 "@REMARK (basierend auf dem Suchsystem von S. Paolini)"
  25. Echo >>RAM:Plus-CD-Temp-1 "@NODE MAIN *"Gefundene Einträge auf >>$Suchmuster<<*""
  26. Echo >>RAM:Plus-CD-Temp-1 ""
  27. Echo >>RAM:Plus-CD-Temp-1 " Nr. | Verzeichnis"
  28. Echo >>RAM:Plus-CD-Temp-1 "==================="
  29. AmigaPlus_CD-ROM_Nr.6-96:AmigaPlus_CD-ROM_Index/AGrep >RAM:Plus-CD-Temp-2 -i "$Suchmuster" Index_6-96
  30. Echo >>RAM:Plus-CD-Temp-2 "@ENDNODE"
  31. Join RAM:Plus-CD-Temp-1 RAM:Plus-CD-Temp-2 TO RAM:Plus-CD-Suche.guide
  32. Delete >NIL: RAM:Plus-CD-Temp-1 RAM:Plus-CD-Temp-2
  33. Copy >NIL: FROM #?Shell#? TO RAM:
  34. Protect RAM:Shellstart +s
  35. Protect RAM:ShellOpen +s
  36. Protect RAM:ShellCopy1 +s
  37. Protect RAM:ShellCopy2 +s
  38. Protect RAM:ShellDir1 +s
  39. Protect RAM:ShellDir2 +s
  40. AmigaPlus_CD-ROM_Nr.6-96:System/c/UseGuide RAM:Plus-CD-Suche.guide
  41. Delete >NIL: RAM:Shell#? RAM:Plus-CD-Suche.guide
  42. ENDCLI
  43.