Программа - шутка, демонстрация возможностей CMD скриптов.

02.07.08

Разработка - Математика и алгоритмы

Демонстрашка возможностей скриптов

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
Str.cmd
.1214868618 1,26Kb
28
28 Скачать (1 SM) Купить за 1 850 руб.
Это CMDшка которая компилит маленькую программку при помощи "debug". Программка просто отображает бегущую строчку. Потом удаляется тем же скриптом.

Скрипт:

8<--------------------------------------------------------------------------------------------------------------------------------------------------
echo off
goto Self

a 100
mov cx,01C4
push cx
push cx
mov ah,0 ;­ з «® в ©¬Ґа 
int 1A
mov bx,dx
add bx,0
int 1A
cmp dx,bx
jle 010E ; Є®­Ґж в ©¬Ґа 
pop cx
mov si,014D
sub cx,01C4
sub si,cx
mov di,400
mov cx,14
rep movsb
mov byte ptr [di],24
mov bh,0
mov dx,0c1f
mov ah,02
int 10
mov dx,400
mov ah,09
int 21
mov ah, 86
inc cx
inc cx
xor dx,dx
int 15
mov ah,01
int 16
pop cx
jnz 014C
loop 0103
jmp 0100
ret
db " __-~-_-~-_-~-_-~-_-~-_-~-_-~-_-~-_-~-"
db " ќв® ¤«ЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁ­­ п бва®Є . Њ®¦Ґв Ўлвм ¤®"
db " 64Є ¤«Ё­®©. Ђ ҐйҐ вгв ¬®¦Ґв Ўлвм §«®ўаҐ¤­л© Є®¤ Є®в"
db "®ал© § а §Ёв ўбҐ ‚ иЁ ¤®Єг¬Ґ¬­вл Ё ЇҐаҐЇЁиҐв"
db " DBF­лҐ д ©«ҐЈЁ!!!!!!! Ќ® ў®®ЎйҐ-в® нв® Їа®бв® ¤Ґ¬®­б"
db "ва жЁп в®Ј®, зв® ¬®¦­® § ЇЁе вм  бᥬЎ«Ґа­л© «ЁбвЁ­"
db "Ј ў CMDиЄг Ё бЄ®¬ЇЁ«Ёвм ҐЈ® бв ­¤ ав­л¬Ё б।бвў ¬"
db "Ё Windows. ‚®®ЎйҐ ¬®¦­® нв® § ЇЁе вм ў «оЎ®© бЄаЁЇв."
db " „ ¦Ґ ў 1‘­л© ¬®¤г«м. C ­ Ё«гзиЁ¬Ё Ї®¦Ґ« ­Ёп¬Ё MadDAD. $"

rcx
219
n r_string.com
w
q

If "%1"=="" goto self

:exit

exit

:self

debug < %0 > %~DPN0.log
cls
r_string.com
echo Y|del r_string.com
goto exit

8<--------------------------------------------------------------------------------------------------------------------------------------------------

См. также

Математика и алгоритмы Программист Платформа 1C v8.2 Конфигурации 1cv8 Россия Абонемент ($m)

На написание данной работы меня вдохновила работа @glassman «Переход на ClickHouse для анализа метрик». Автор анализирует большой объем данных, много миллионов строк, и убедительно доказывает, что ClickHouse справляется лучше PostgreSQL. Я же покажу как можно сократить объем данных в 49.9 раз при этом: 1. Сохранить значения локальных экстремумов 2. Отклонения от реальных значений имеют наперед заданную допустимую погрешность.

1 стартмани

30.01.2024    3208    stopa85    12    

38

Математика и алгоритмы Бесплатно (free)

Разработка алгоритма, построенного на модели симплекс-метода, для нахождения оптимального раскроя.

19.10.2023    7618    user1959478    52    

36

Математика и алгоритмы Разное Платформа 1С v8.3 Конфигурации 1cv8 Россия Абонемент ($m)

Расширение (+ обработка) представляют собою математический тренажер. Ваш ребенок сможет проверить свои знание на математические вычисление до 100.

2 стартмани

29.09.2023    3147    maksa2005    8    

26

Математика и алгоритмы Инструментарий разработчика Программист Платформа 1С v8.3 Мобильная платформа Россия Абонемент ($m)

Что ж... лучше поздно, чем никогда. Подсистема 1С для работы с регулярными выражениями: разбор выражения, проверка на соответствие шаблону, поиск вхождений в тексте.

1 стартмани

09.06.2023    10931    7    SpaceOfMyHead    18    

61

Математика и алгоритмы Программист Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Три задачи - три идеи - три решения. Мало кода, много смысла. Мини-статья.

03.04.2023    4401    RustIG    9    

25

Механизмы платформы 1С Математика и алгоритмы Программист Платформа 1С v8.3 Россия Бесплатно (free)

В статье анализируются средства платформы для решения системы линейных уравнений в 1С. Приводятся доводы в пользу некорректной работы встроенных алгоритмов, а значит потенциально некорректного расчета себестоимости в типовых конфигурациях.

23.11.2022    3567    gzharkoj    14    

25

Математика и алгоритмы Программист Платформа 1С v8.3 Россия Абонемент ($m)

Обычно под распределением понимают определение сумм пропорционально коэффициентам. Предлагаю включить сюда также распределение по порядку (FIFO, LIFO) и повысить уровень размерности до 2-х. 1-ое означает, что распределение может быть не только пропорциональным, но и по порядку, а 2-ое - это вариант реализации матричного распределения: по строкам и столбцам. Возможно вас заинтересует также необычное решение этой задачи через создание DSL на базе реализации текучего интерфейса

1 стартмани

21.03.2022    9051    7    kalyaka    11    

44
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. brr 184 01.07.08 08:59 Сейчас в теме
Строка в какой кодировке?
2. MadDAD 136 01.07.08 09:20 Сейчас в теме
Строка как и комментарии к коду в кодировке 866 (DOS)
3. andrewalexk 01.07.08 10:56 Сейчас в теме
:)
.. а без скринов не кошерно...
aleks_cons; +1 Ответить
4. MadDAD 136 02.07.08 02:23 Сейчас в теме
Да ам вобщем то скринить нечего :)
5. Dolly_EV 269 02.07.08 08:32 Сейчас в теме
Подскажите для неассемблиста - чем регулируется видимая ширина строкии "плавность" (а то как-то рывками все...)
aleks_cons; +1 Ответить
6. MadDAD 136 02.07.08 08:45 Сейчас в теме
jle 010E ; Конец таймера
pop cx
mov si,014D
sub cx,01C4
sub si,cx
mov di,400
mov cx,24 ; <- Это длина строки (отображается от начальной позиции)
rep movsb
mov byte ptr [di],24
mov bh,0
mov dx,0c1f ; <- А вот тут задается начальная позиция (экран - как длинная строка, вектор 80*25)
mov ah,02
int 10

Плавнее, даже не знаю, можно задержку в таймере сделать, а лучше распахнуть на полный экран, тогда все будет плавно :)... Забыл сказать вроде тут таймер вообще не включен(add bx,0) ...
7. MadDAD 136 03.07.08 07:22 Сейчас в теме
Вот нашел статью которая сподвигла... http://wasm.ru/article.php?article=nocompiler

В код приведенный в статье я добавил таймер.
Оставьте свое сообщение