summaryrefslogtreecommitdiff
path: root/language/cyrtug/cyrinst.bat
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /language/cyrtug/cyrinst.bat
Initial commit
Diffstat (limited to 'language/cyrtug/cyrinst.bat')
-rw-r--r--language/cyrtug/cyrinst.bat31
1 files changed, 31 insertions, 0 deletions
diff --git a/language/cyrtug/cyrinst.bat b/language/cyrtug/cyrinst.bat
new file mode 100644
index 0000000000..dd89538393
--- /dev/null
+++ b/language/cyrtug/cyrinst.bat
@@ -0,0 +1,31 @@
+echo off
+echo * EMTEX 3.14 programs installation *
+if NOT exist tinstall.bat goto err
+if .%1==. goto err
+if .%2==. goto err
+if %1==%2 goto err
+for %%c in (c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z) do if %%c==%1 goto cont
+for %%c in (C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z) do if %%c==%1 goto cont
+for %%c in (a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z) do if %%c==%2 goto cont
+for %%c in (A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z) do if %%c==%2 goto cont
+goto err
+:cont
+echo I will write to directory %1:\EMTEX and its subdirectories
+echo press A to abort installation or C -- to continue
+respond.com A Cá
+if errorlevel 3 goto inst
+goto end
+:inst
+if NOT exist %1:\emtex\*.* md %1:\emtex >nul
+copy tinst1.bat %1:\
+copy ckd.bat %1:\
+copy pkunzip.exe %1:\unz.exe
+copy respond.com %1:\resp.com
+copy *.ls %1:\
+%1:\tinst1 %1 %2
+rem We go here also if %1 is an invalid drive
+:err
+echo Type CYRINST [drive letter to install to] [drive letter for diskete]
+echo for example CYRINST C B
+:end
+echo The end \ No newline at end of file