AmigActive 13/AACD13.ISO/AACD/Resources/System/VersCheck2/Goodies/Check_Your_System_russian

Text File | 1999-12-20 | 5KB | 152 lines

; $VER: VersCheck-Select-Script V1.8 (14.12.1999) by Michaela Pruess, Russian by Michael Malyshev (Ami1251)

Echo "Running Script"
IF NOT EXISTS SCRIPTS
    IF EXISTS /SCRIPTS
        PATH "" ADD
        CD /
    ELSE
        IF EXISTS C:SCRIPTS
            PATH "" ADD
            CD C:
        ELSE
            Echo "Íåâîçìîæíî íàéòè ñêðèïòû, îòìåíÿþ..."
            END
        ENDIF
    ENDIF
ENDIF

STACK 250000

RTSimpleReq TITLE "Ïðîâåðêà Âàøåé Ñèñòåìû" TEXT "Íà÷àòü ïðîâåðêó âåðñèé äëÿ" CENTER BUTTON "_ÂÑÅ|_Libs|_Devs|D_Types|_MUI|_Handler|_Classes|_ÂÛÕÎÄ" >ENV:VCREQ1

IF $VCREQ1 EQ "1"
    ECHO "Y" >ENV:VCREQ0
    ECHO "2" >ENV:VCREQ1
    ECHO "1" >ENV:VCREQ2
ELSE
    ECHO "N" >ENV:VCREQ0
ENDIF

IF $VCREQ1 EQ "2"
    IF $VCREQ0 EQ "N"
        RTSimpleReq TITLE "Ïðîâåðêà Áèáëèîòåê LIBS:" TEXT "Âûáåðèòå ïóòü äëÿ ïðîâåðêè" CENTER BUTTON "_Libs:|_Óêàçàòü|_Îòìåíèòü" >ENV:VCREQ2
    ENDIF
    IF $VCREQ2 EQ "1"
        VersCheck -1*fnmosvx3
    ENDIF
    IF $VCREQ2 EQ "2"
        RTFileReq TITLE "Ïóòü ê áèáëèîòåêàì LIBS:" DRAWER Libs: NOFILES >ENV:VCREQ3
        VersCheck -1fnmosvx3 "$VCREQ3"
    ENDIF
ENDIF

IF $VCREQ0 EQ "Y"
    ECHO "3" >ENV:VCREQ1
ENDIF

IF $VCREQ1 EQ "3"
    IF $VCREQ0 EQ "N"
        RTSimpleReq TITLE "Ïðîâåðêà Óñòðîéñòâ DEVS:" TEXT "Âûáåðèòå ïóòü äëÿ ïðîâåðêè" CENTER BUTTON "_Devs:|_Óêàçàòü|_Îòìåíèòü" >ENV:VCREQ2
    ENDIF
    IF $VCREQ2 EQ "1"
        VersCheck -2*fnmosvx3
    ENDIF
    IF $VCREQ2 EQ "2"
        RTFileReq TITLE "Ïóòü ê óñòðîéñòâàì DEVS:" DRAWER Devs: NOFILES >ENV:VCREQ3
        VersCheck -2fnmosvx3 "$VCREQ3"
    ENDIF
ENDIF

IF $VCREQ0 EQ "Y"
    ECHO "4" >ENV:VCREQ1
ENDIF

IF $VCREQ1 EQ "4"
    IF $VCREQ0 EQ "N"
        RTSimpleReq TITLE "Ïðîâåðêà Äàòàòèïîâ" TEXT "Âûáåðèòå ïóòü äëÿ ïðîâåðêè" CENTER BUTTON "_Sys:Classes/Datatypes|_Óêàçàòü|_Îòìåíèòü" >ENV:VCREQ2
    ENDIF
    IF $VCREQ2 EQ "1"
        VersCheck -3*fnmosvx3
    ENDIF
    IF $VCREQ2 EQ "2"
        RTFileReq TITLE "Ïóòü ê Äàòàòèïàì" DRAWER Sys:Classes/Datatypes NOFILES >ENV:VCREQ3
        VersCheck -3fnmosvx3 "$VCREQ3"
    ENDIF
ENDIF

IF $VCREQ0 EQ "Y"
    ECHO "5" >ENV:VCREQ1
ENDIF

IF $VCREQ1 EQ "5"
    IF $VCREQ0 EQ "N"
        RTSimpleReq TITLE "Ïðîâåðêà MUI" TEXT "Âûáåðèòå ïóòü äëÿ ïðîâåðêè" CENTER BUTTON "_MUI:Libs/MUI|_Óêàçàòü|_Îòìåíèòü" >ENV:VCREQ2
    ENDIF
    IF $VCREQ2 EQ "1"
        VersCheck -4*fnmsv
    ENDIF
    IF $VCREQ2 EQ "2"
        RTFileReq TITLE "Ïóòü ê MUI" DRAWER MUI:Libs/MUI NOFILES >ENV:VCREQ3
        VersCheck -4fnmsvx3 "$VCREQ3"
    ENDIF
ENDIF

IF $VCREQ0 EQ "Y"
    ECHO "6" >ENV:VCREQ1
ENDIF

IF $VCREQ1 EQ "6"
    IF $VCREQ0 EQ "N"
        RTSimpleReq TITLE "Ïðîâåðêà L: (Handler)" TEXT "Âûáåðèòå ïóòü äëÿ ïðîâåðêè" CENTER BUTTON "_L:|_Óêàçàòü|_Îòìåíèòü" >ENV:VCREQ2
    ENDIF
    IF $VCREQ2 EQ "1"
        VersCheck -5*fnmsvx3
    ENDIF
    IF $VCREQ2 EQ "2"
        RTFileReq TITLE "Ïóòü ê L: (Handler)" DRAWER l: NOFILES >ENV:VCREQ3
        VersCheck -5fnmsvx3 "$VCREQ3"
    ENDIF
ENDIF

IF $VCREQ0 EQ "Y"
    ECHO "7" >ENV:VCREQ1
ENDIF

IF $VCREQ1 EQ "7"
    IF $VCREQ0 EQ "N"
        RTSimpleReq TITLE "Ïðîâåðêà Êëàññîâ" TEXT "Âûáåðèòå ïóòü äëÿ ïðîâåðêè" CENTER BUTTON "Sys:_Classes+MUI:|_Sys:Classes|_MUI:|_Óêàçàòü|_Îòìåíèòü" >ENV:VCREQ2
    ENDIF
    IF $VCREQ2 EQ "1"
        VersCheck -afnmsv -0s .class -0l* ClassList -0n CLASS
        VersCheck -afnmsv -0s .image -0l* ImageList -0n CLASSIMG
        VersCheck -afnmsv -0s .gadget -0l* GadgetList -0n CLASSGAD
        VersCheck -afnmsv -0s .codec -0l* CodecList -0n CLASSCOD
        VersCheck -afnmsv -0s .decoder -0l* DecoderList -0n CLASSDEC
    ENDIF
    IF $VCREQ2 EQ "2"
        VersCheck -afnmsv -0s .class -0l ClassList -0n CLASS Sys:Classes
        VersCheck -afnmsv -0s .image -0l ImageList -0n CLASSIMG Sys:Classes
        VersCheck -afnmsv -0s .gadget -0l GadgetList -0n CLASSGAD Sys:Classes
        VersCheck -afnmsv -0s .codec -0l CodecList -0n CLASSCOD Sys:Classes
        VersCheck -afnmsv -0s .decoder -0l DecoderList -0n CLASSDEC Sys:Classes
    ENDIF
    IF $VCREQ2 EQ "3"
        VersCheck -afnmsv -0s .class -0l ClassList -0n CLASS MUI:
        VersCheck -afnmsv -0s .image -0l ImageList -0n CLASSIMG MUI:
        VersCheck -afnmsv -0s .gadget -0l GadgetList -0n CLASSGAD MUI:
        VersCheck -afnmsv -0s .codec -0l CodecList -0n CLASSCOD MUI:
        VersCheck -afnmsv -0s .decoder -0l DecoderList -0n CLASSDEC MUI:
    ENDIF
    IF $VCREQ2 EQ "4"
        RTFileReq TITLE "Ïóòü ê Êëàññàì" DRAWER Sys:Classes NOFILES >ENV:VCREQ3
        VersCheck -afnmsv -0s .class -0l ClassList -0n CLASS "$VCREQ3"
        VersCheck -afnmsv -0s .image -0l ImageList -0n CLASSIMG "$VCREQ3"
        VersCheck -afnmsv -0s .gadget -0l GadgetList -0n CLASSGAD "$VCREQ3"
        VersCheck -afnmsv -0s .codec -0l CodecList -0n CLASSCOD "$VCREQ3"
        VersCheck -afnmsv -0s .decoder -0l DecoderList -0n CLASSDEC "$VCREQ3"
    ENDIF
ENDIF
Delete ENV:VCREQ? >NIL:
RTSimpleReq TITLE "ÊÎÍÅÖ" TEXT "Òåïåðü ïðîâåðüòå ðåçóëüòàòû íà RAM-Äèñêå" CENTER BUTTON "_Ïðèíÿòü" >NIL: