Subversion Repositories Kolibri OS

Rev

Rev 109 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 109 Rev 135
Line 17... Line 17...
17 
 dd 0x7fff0
 17 
 dd 0x7fff0
18 
 dd 0x0
 18 
 dd 0x0
19 
 dd 0x0
 19 
 dd 0x0
Line 20... Line 20...
20 
 
 20 
 
21 
include "macros.inc"
 - 
 
- 
 
 21 
include "macros.inc"
22 
 
 22 
include "lang.inc"
Line 23... Line 23...
23 
START:
 23 
START:
24 
 
 24 
 
25 
 call cmdexist
 25 
 call cmdexist
Line 298... Line 298...
298 
 int 0x40
 298 
 int 0x40
Line 299... Line 299...
299 
 
 299 
 
300 
 mov eax,0
 300 
 mov eax,0
301 
 mov ebx,100*65536+492
 301 
 mov ebx,100*65536+492
302 
 mov ecx,100*65536+280
 302 
 mov ecx,100*65536+280
303 
 mov edx,0
 303 
 mov edx,0x3000000
304 
 mov esi,0x805080d0
 304 
 mov esi,0x805080d0
305 
 mov edi,0x005080d0
 305 
 mov edi,0x005080d0
Line 306... Line 306...
306 
 int 0x40
 306 
 int 0x40
Line 310... Line 310...
310 
 mov ecx,0x10ddeeff
 310 
 mov ecx,0x10ddeeff
311 
 mov edx,title
 311 
 mov edx,title
312 
 mov esi,title_end-title
 312 
 mov esi,title_end-title
313 
 int 0x40
 313 
 int 0x40
Line 314... Line 314...
314 
 
 314 
 
315 
 mov eax,8
 315 
; mov eax,8
316 
 mov ebx,(492-19)*65536+12
 316 
; mov ebx,(492-19)*65536+12
317 
 mov ecx,5*65536+12
 317 
; mov ecx,5*65536+12
318 
 mov edx,1
 318 
; mov edx,1
319 
 mov esi,0x6688dd
 319 
; mov esi,0x6688dd
Line 320... Line 320...
320 
 int 0x40
 320 
; int 0x40
321 
 
 321 
 
322 
 mov eax,12
 322 
 mov eax,12
Line 975... Line 975...
975 
 mov eax,4
 975 
 mov eax,4
976 
 mov ebx,[ypos]
 976 
 mov ebx,[ypos]
977 
 shl ebx,16
 977 
 shl ebx,16
978 
 add ebx,[xpos]
 978 
 add ebx,[xpos]
979 
 mov ecx,0x00ddeeff
 979 
 mov ecx,0x00ddeeff
980 
 mov esi,27
 980 
 mov esi,33
981 
 int 0x40
 981 
 int 0x40
Line 982... Line 982...
982 
 
 982 
 
983 
 cld
 983 
 cld
984 
 mov ecx,27
 984 
 mov ecx,27
Line 2834... Line 2834...
2834 
title_end:
 2834 
title_end:
Line 2835... Line 2835...
2835 
 
 2835 
 
Line 2836... Line 2836...
2836 
smb_cursor db '|'
 2836 
smb_cursor db '|'
- 
 
 2837 
 
- 
 
 2838 
prompt db 'CMD>>'
- 
 
 2839 
if lang eq de
- 
 
 2840 
h1  db '  CMD - Command line interpreter version 0.26 '
- 
 
 2841 
h2  db '        copyleft Chemist - dmitry_gt@tut.by   '
- 
 
 2842 
h3  db '  Verfuegbare Kommandos:                      '
- 
 
 2843 
h4  db '  HELP - Zeoigt diesen Text LS - Zeigt Dateien'
- 
 
 2844 
h5  db '  EXIT - Programmende       CP - Kopiert Datei'
- 
 
 2845 
h6  db '  CLS  - Loescht Bildschirm PS - Processinfo  '
- 
 
 2846 
h7  db '  KILL - Process beenden    RN - File umnennen'
- 
 
 2847 
h8  db '        VER  - Zeigt Programmversion          '
- 
 
 2848 
h9  db '        DEL  - Loescht Datei von Ramdisk      '
- 
 
 2849 
h10 db '        SHUTDOWN - KolibriOS beenden          '
- 
 
 2850 
h11 db '        PAUSE    - Auf Taste warten           '
- 
 
 2851 
h12 db '        ECHO     - Schreibt Text auf Ausgabe  '
- 
 
 2852 
h13 db '        ENDS     - Scriptende                 '
- 
 
 2853 
h14 db '        /[filename] - Script starten          '
Line -... Line 2854...
- 
 
 2854 
h15 db '        Parameter mit "&" angeben:            '
- 
 
 2855 
h16 db '        tinypad&cmd.asm - oeffnet cmd.asm     '
- 
 
 2856 
 
- 
 
 2857 
about db 'Command Line Interpreter version 0.26         '
- 
 
 2858 
 
- 
 
 2859 
err1 db 'Kommando oder Dateiname unbekannt'
- 
 
 2860 
 
- 
 
 2861 
proc_head db  ' PID Name      Start     Laenge   Proc_NUMB  '
- 
 
 2862 
proc_hd11 db  '-------------------------------------------- '
- 
 
 2863 
 
- 
 
 2864 
mess1 db 'Taste druecken fuer weiter (ESC - abbrechen)..'
- 
 
 2865 
mess2 db 'Bitte 4 Byte Prozessnummer angeben (nicht PID)'
- 
 
 2866 
mess3 db 'Prozess mit angegebenere Nummer erfolgreich   '
- 
 
 2867 
mess4 db 'beendet.                                      '
- 
 
 2868 
mess5 db 'Verwendung: del [Dateiname]                   '
- 
 
 2869 
mess6 db 'Angegebene Datei erfolgreich geloescht.       '
- 
 
 2870 
mess7 db 'Datei nicht gefunden!                         '
- 
 
 2871 
mess8 db 'Prozess nicht gefunden!                       '
- 
 
 2872 
mess9 db 'Verwendung: cp [Quelle+Ziel]                  '
- 
 
 2873 
mess0 db 'Verwendung: rn [Quelle+Ziel]                  '
- 
 
 2874 
 
- 
 
 2875 
mess11 db 'Datei erfolgreich kopiert                     '
- 
 
 2876 
mess12 db 'ERROR: Kann Datei nicht kopieren!             '
- 
 
 2877 
mess13 db 'ERROR: Datei existiert bereits!               '
- 
 
 2878 
mess14 db 'Datei erfolgreich umbenannt                   '
- 
 
 2879 
mess15 db 'ERROR: Kann Datei nicht umbenennen!           '
2837 
 
 2880 
mess16 db 'Scriptname erwartet!                          '
2838 
prompt db 'CMD>>'
 2881 
mess17 db 'Dieses Kommando ist nur in Scripts zulaessig! '
2839 
 
 2882 
else
2840 
h1  db '  CMD - Command line interpreter version 0.26 '
 2883 
h1  db '  CMD - Command line interpreter version 0.26 '
2841 
h2  db '        copyleft Chemist - dmitry_gt@tut.by   '
 2884 
h2  db '        copyleft Chemist - dmitry_gt@tut.by   '
Line 2877... Line 2920...
2877 
mess13 db 'ERROR: Output file alredy exist!              '
 2920 
mess13 db 'ERROR: Output file alredy exist!              '
2878 
mess14 db 'File successfully renamed                     '
 2921 
mess14 db 'File successfully renamed                     '
2879 
mess15 db 'ERROR: Can not rename file!                   '
 2922 
mess15 db 'ERROR: Can not rename file!                   '
2880 
mess16 db 'You must specify a command script filename!   '
 2923 
mess16 db 'You must specify a command script filename!   '
2881 
mess17 db 'This command is available only in scripts!    '
 2924 
mess17 db 'This command is available only in scripts!    '
2882 
 
 2925 
end if
Line 2883... Line 2926...
2883 
 
 2926 
 
2884 
linen dd 2000
 2927 
linen dd 2000
2885 
lpress dd 1
 2928 
lpress dd 1
2886 
linel dd 0
 2929 
linel dd 0