• PRG2 - �p���p p����� � REXX - ������ y ��� 䠩��� (HPFS) ��p�y� �y��

    From FAQServer@2:5020/181 to All on Wed Jun 18 07:37:09 2025
    [Q]: �p���p p����� � REXX - ������ y ��� 䠩��� (HPFS) ��p�y� �y��y �����y�

    [A]: Sergey Posokhov (abc@posokhov.msk.ru)

    /* ���p�� �뢮�� ������ */
    '@Echo off'

    /* ���p�� �yp�p� */
    Call SysCurState Off

    /* ������� 梥� */
    Esc = D2C( 27 ); Command = "[1;"; End = "m"
    Cyan_color = Esc || Command || "36" || End

    /* ��⠭���� 梥� */
    Say Cyan_color

    /* ���⪠ ���� */
    Cls

    /* �p����襭�� */
    Say
    Say " ��p����뢠���� 䠩�� �� ���⪮� ��᪥."
    Say " ��p��� �y��� ������� ����� �⠭������ ���������."
    Say

    /* �p���p�������� ����. ��p��� �y��� �⠭������ ��������� */
    'ChCase.exe /CML /R /Y+ C:\OS2\*'
    'ChCase.exe /CML /R /Y+ C:\MMOS2\*'
    'ChCase.exe /CML /R /Y+ C:\PSFonts\*'
    'ChCase.exe /CML /R /Y+ C:\JavaOS2\*'
    'ChCase.exe /CML /R /Y+ C:\Language\*'

    'ChCase.exe /CML /R /Y+ C:\��p�\*'
    'ChCase.exe /CML /R /Y+ C:\������\*'
    'ChCase.exe /CML /R /Y+ C:\����\*'

    --- INN 2.7.3
    * Origin: This echo is READ-ONLY. Send %HELP to FAQSERVER at (2:5020/181)