cmnd

##批处理版记事本源代码 @ECHO Off
REM QBFC Project Options Begin
REM HasVersionInfo: Yes
REM Companyname: TSKBATTOOL Co.,Ltd
REM Productname: CommandLine Notepad
REM Filedescription: �����а����±�
REM Copyrights:
REM Trademarks: TSK
REM Originalname: CommandLine-Notepad.exe
REM Comments:
REM Productversion: 26.28.00.00
REM Fileversion: 26.28.00.00
REM Internalname:
REM AdministratorManifest: Yes
REM QBFC Project Options End
@ECHO off
set p1=.
set l1=1.�����·���ʾ������"R"®���Է�����ҳ�棬����ѯ�����Ƿ񱣴�֮ǰ���������ݡ�
set p2=.
set l2=2.ע�ⲻҪʹ��"Enter"�����У�������ֱ����ת������ȷ�Ͻ��档
set p3=.
set l3=3.ע�ⲻҪ�ڱ������е�����һ�����������������ţ��������쳣������
@echo off&setlocal enabledelayedexpansion >nul 2>nul
if /i “%1""/m" goto main (
) else (
if /i "%1"
”/?" goto help (
) else (
echo ����"cmnd /?"����ʹ�ð�����&color 0C&sleep 3&exit /b
)

:main
mode con: cols=80 lines=25
start capslock.exe /on >nul
color 07
title �����а����±� - ��ʼ����
cls
:maingui
set agreetoopen=cmd,bat,vbs,js,txt,html,xml,rtf
cls
echo off&for /f %%t in (‘time /t’) do set timex=%%t
echo.
@echo.���ڵ�ʱ���ǣ�%timex%��

echo ������������������������������������������������������
echo |ѡ��|��������������������������������|��Ӧ����|
echo.
echo (ѡ��O)��������������������������������(�򿪼��±��ļ�)
echo.
echo (ѡ��C)��������������������������������(�������±��ļ�)
echo.
echo (ѡ��E)��������������������������������( �˳����� )
echo ������������������������������������������������������
echo.
choice /c OCE /cs /n /m |�������ϱ����ṩ��ѡ�ѡ����Ϊ��д(��д����������ǰ�Ѿ��򿪣��������Զ��ر�)��|:
if %errorlevel%==1 start capslock.exe /off >nul&goto open
if %errorlevel%==2 start capslock.exe /off >nul&goto create
if %errorlevel%==3 start capslock.exe /off >nul&exit

:open
cls
color 07
title �����а����±� - ����…
@echo.���ڵ�ʱ���ǣ�%timex%��
echo.
set textfile=“no00”&set /p textfile=|��������Ҫ�򿪵��ı��ļ���·������������Ҫ�򿪵��ı��ļ������ɰ�����������(��������չ������ʽΪ��<�ļ���>.<��չ��>)��(����R������ҳ��)|:
rem write and file exists check
if !textfile!“no00” goto nulerror1 (
) else (
if /i “!textfile!”
“R” goto main (
) else (
if exist “!textfile!” goto check
) else (
if not exist “!textfile!” goto unknownfile(s) (
) else (
goto invaildinput1
)
:reading
color
title �����а����±� - ׼���Ķ�
cls
echo |�����Ķ�ģʽ��������������…���ڵ�ʱ���ǣ�!timex!��|
mode con: cols=144 lines=3223
pause >nul
cls
color F0
title �����а����±� - �Ķ��� - �����Ķ�"!textfile!"…
type !textfile!
echo.
echo ������������������������������"!textfile!"�ı��ļ����Ķ��������������������Ķ�…����������������������������
pause >nul
cls
goto main

:create
mode con: cols=144 lines=3223
cls&color
title �����а����±� - ׼������
cls
:creating
cls
color F0&title �����а����±� - ���ڴ�����…
@echo.���ڵ�ʱ���ǣ�!timex!
echo ��������������������������������������������������������������������������������������������������������������������
echo ������֪��
echo.
for /l %%t in (1,1,3) do echo !l%%t!&echo!p%%t!
echo ������������������������������������������������^| ������������������������ �� ^|����������������������������������������
set input=“no01”&set /p input= >nul
if /i “!input!”“R” goto main (
) else (
if /i !input!
“no01” goto inputnulerror (
) else (
goto save
)

:save
cls
color 07
title �����а����±� - ����
mode con: cols=80 lines=25
setlocal enabledelayedexpansion >nul 2>nul
set saveroad=“no02”&set /p saveroad=|�����������ı��ļ�����·�������ɰ����������źͿո���(����"R"®���������档|:
cls
if /i !saveroad!“no02” goto nulerror2 (
) else (
if /i !saveroad!
“R” goto main (
) else (
if exist !saveroad! goto savename (
) else (
goto unknowndir(s)
)
if not exist !saveroad! (
cls
color 06
choice /c YN /cs /n /m |���⵽��������·�������ڣ��Ƿ񴴽�����·�����ǣ�������д"Y"������������д"N"��|:
if %errorlevel%==1 if not exist !saveroad! md !saveroad!
if %errorlevel%==2 goto unknowndir(s)2
)

:savename
color 07
cls
set savename=“no03”&set /p savename=|�����������ı��ļ��������ƣ����ɰ����������š�(����"R"®������һ��|:
cls
if /i “!savename!”“R” goto save (
) else (
if /i !savename!
“no03” goto nulerror3 (
) else (
if exist !savename! goto saveext (
) else (
goto saveext
)
:saveext
cls&color 07
set saveext=“no04”&set /p saveext=|�����뱣���ļ���չ�����ڴ����������ַ��У�"txt��bat��cmd��rtf��R®"|:
cls
if /i !saveext!“no04” goto nulerror4 (
) else (
if /i “!saveext!”
“R” goto savename (
) else (
if /i !saveext!==txt goto extset (
) else (
if /i !saveext!==bat goto extset (
) else (
if /i !saveext!==cmd goto extset (
) else (
if /i !saveext!==rtf goto extset (
) else (
goto invaildinput4
)
:extset
title �����а����±� - ���ڴ���
echo ������…
set type=“no05”
if /i !saveext!==txt set type=�ı��ĵ�
if /i !saveext!==bat set type=Windows�������ļ�
if /i !saveext!==cmd set type=Windows�����ű�
if /i !saveext!==rtf set type=RTF�ĵ�
goto nextsave

:nextsave
color 07
start capslock.exe /on >nul
cls
title �����а����±� - ����ȷ��
mode con: cols=45 lines=85
echo.
echo �����������룬����������������Ϣ��
echo.
echo - ����·����!saveroad!
echo.
echo - �������ƣ�!savename!
echo.
echo - �������ͣ�!type!
echo.
echo - �ı����ݣ�!input!
echo.
echo - �ۺ���Ϣ�����ݽ������ڡ�!savename!.!saveext!���У������ļ��������ˡ�!saveroad!��·���£����������ǡ�!input!���������ǡ�!type!����
echo.
choice /c YN /cs /n /m |�����������ı�����Ϣ�����ǣ�������д"Y"�����򽫰���ָ������Ϣ���棻����������д"N"�����½���������Ϣ��(��д����������ǰ�Ѿ��򿪣��������Զ��ر�)|:
setlocal enabledelayedexpansion >nul 2>nul
if %errorlevel%==1 goto savingandsaved
if %errorlevel%==2 goto save
:savingandsaved
start capslock.exe /off >nul
cls
title �����а����±� - ������
echo !input!>!saveroad!!savename!.!saveext!
if exist !saveroad!!savename!.!saveext! (
cls
color 0A
title �����а����±� - �����ɹ�
echo |�ɹ�������"!saveroad!!savename!.!saveext!"��������������������…|
pause >nul
goto main
)
if not exist !saveroad!\savename!.!saveext! (
title �����а����±� - ����ʧ��
color 0C
echo |���󣬱���ʧ�ܣ���������:"!saveroad!!savename!.!saveext!"����������������ҳ��…|
pause >nul
goto main
)

endlocal

setlocal enabledelayedexpansion >nul 2>nul

rem invaild input warning pages
:invaildinput1
cls
title �����а����±� - ��Ч����
color 0C
echo |��Ч���룬��������������������!|
pause >nul
goto open
:invaildinput2
cls
title �����а����±� - ��Ч����
color 0C
echo |��Ч���룬��������������������!|
pause >nul
goto save
:invaildinput4
cls
color 0C
title �����а����±����±� - ��Ч����
echo ^|���������� - “!saveext!“���������������������룡^|
pause >nul
goto saveext
rem invaild input warning pages is end
:unknownfile(s)
color 0C
cls
echo |�����Ҳ�����Ӧ�ļ���|
sleep -k 4
goto open
:unknowndir(s)
color 0C
cls
goto open
:nulerror1
cls
color 0C
title �����а����±� - ����Ϊ��
echo |����Ϊ�գ����������룡|
pause >nul
goto create
:nulerror2
cls
color 0C
title �����а����±� - ����Ϊ��
echo |����Ϊ�գ����������룡|
pause >nul
goto save
:nulerror3
cls
color 0C
title �����а����±� - ����Ϊ��
echo |����Ϊ�գ����������룡|
pause >nul
cls
goto savename
:nulerror4
color 0C
title �����а����±� - ����Ϊ��
echo |����Ϊ�գ����������룡|
pause >nul
goto saveext
:inputnulerror
cls
color 04
echo |�������ݲ���Ϊ�գ��뷵���������룬�������������������룬��Ҳ�����ó����Զ����ء�|
sleep -k 4
goto create
:unknownfile(s)
cls
color 0C
title �����а����±� - �Ҳ���ָ�����ļ� -”!textfile!”
echo ^|ϵͳ�Ҳ���ָ�����ļ� -"!textfile!“����������…^|
sleepx -k 5
goto open
:unknowndir(s)2
cls
title �����а����±� - ·����Ч -”!saveroad!"
color 0C
echo ^|ϵͳ�Ҳ���ָ����·�� -"!saveroad!"����������…^|
sleepx -k 5
goto save
:help
color 07
echo.
echo ���������ƣ������а����±� �汾�ţ�2.6.2.9 �޶����ţ�3 �����ߣ�Tony Stack(cjw)
echo �������
echo. /? help ��ʾ����
echo.
echo. /m run main program ����������
echo.
echo û�в��� prompt ��ʾ��ʾ��Ϣ��������"cmnd /?"����ʹ�ð��������������˳�…��
exit /b 0
:check
cls
title �����а����±� - ���ڼ����������ļ��Ƿ����Ϲ淶…
if /i !textfile:~-3!==bat goto reading (
) else (
if /i !textfile:~-3!==cmd goto reading (
) else (
if /i !textfile:~-3!==vbs goto reading (
) else (
if /i !textfile:~-3!==js goto reading (
) else (
if /i !textfile:~-3!==txt goto reading (
) else (
if /i !textfile:~-4!==html goto reading (
) else (
if /i !textfile:~-3!==xml goto reading (
) else (
if /i !textfile:~-3!==rtf goto reading (
) else (
goto anunknownfiletoopen
)
:anunknownfiletoopen
cls
title �����а����±� - ��Ч������
color 0C
sleep -p |��Ч�Ĵ������󣬱��Ķ���ֻ�ܴ���"!agreetoopen!"��ʽ���ı��ļ�!�������˿�!| 3
goto open

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值