Полезные исходники для DOS

Всё, что касается программирования на старых языках или для старых систем

Полезные исходники для DOS

Сообщение longhorn_gnu » 25 сен 2023, 08:20

Тема сделана для того, чтобы товарищ rvg и другие, могли выкладывать исходники мелких программ и утилит для DOS.
Решил хакер блины печь. Первый блин у него вышел, как водится, комом. А второй - экзешником.
Аватара пользователя
longhorn_gnu
Мастер Даунгрейда
 
Сообщения: 620
Зарегистрирован: 05 июн 2023, 08:32

Re: Полезные исходники для DOS

Сообщение longhorn_gnu » 15 окт 2023, 11:06

Реализация Press Any Key на QBasic:
Код: Выделить всё
CLS
PRINT "Press any key to continue"
A$=""
WHILE A$ = ""
A$ = INKEY$
WEND
Решил хакер блины печь. Первый блин у него вышел, как водится, комом. А второй - экзешником.
Аватара пользователя
longhorn_gnu
Мастер Даунгрейда
 
Сообщения: 620
Зарегистрирован: 05 июн 2023, 08:32

Re: Полезные исходники для DOS

Сообщение krotan » 15 окт 2023, 16:28

Можно проще:
CLS
PRINT "Press any key to continue"
INPUT$(1)
krotan
Мастер Даунгрейда
 
Сообщения: 118
Зарегистрирован: 03 фев 2022, 20:16


Вернуться в Программирование

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2