Файловый менеджер на Qbasic

Здравствуйте, можете сказать, можно ли написать на qbasic файловый менеджер, очень простой, с одной панелью, переключением дисков, передвижением по папкам и файлами и запуском их? Если да, то можете написать как это осуществить, хотя бы передвижение по файлам.

0

Тогда имена файлов будут в ковычках, а мне это не надо. Есть какой то способ убрать их?

Добавлено через 5 минут
Кстати, я тоже думаю что такой код для мыши не очень, потому что при нажатии любой клавиши и одновременно передвижении курсора, его начинает колбасить и он летает по всему экрану. Хотя проблема может не в этом

Добавлено через 9 минут
Я немного не понял, что с HEXами делать?

0

Сообщение от Артем Пешков Тогда имена файлов будут в ковычках

Вы не изучили вопрос. Внимательно, что делает каждый оператор и каждое преобразование данных.
Не тыкаем пальцем в небо, изучаем. Всего 1 строчка. Я подожду. Если вам сейчас подскажу -
всё будет на смарку и коту под хвост. Перечитайте внимательно всё, что вам писал, это поможет.

Сообщение от Артем Пешков что с HEXами делать?

Это было для информации. За 30 минут невозможно понять, что с ними нужно делать.
Человек который знает для чего программа - применяет её.
Когда вы вбиваете код в отладчике или же из листинга - вы имеете HEX коды(байтовые, двухбайтовые
и т.д.) машинных команд, моя программа просто для удобного хранения пачек этих кодов,
а также для автоматического размещения их в программе, всё это можно делать и без неё, руками,
просто это немного больше работы и с бОльшим шансом на ошибку.

P.S: У вас кстати голова не болит от такого кол-ва новой информации? Потому что мозг это штука такая,
в него надо вливать информацию дозированно иначе он рекурсивно порождает тысячи вопросов и
пытается найти на них ответ, расходуя больше ресурсов, чем имеет в наличии. Программировнаие
штука интересная, но не стоит переусердствовать.

0

Я не очень в английском разбираюсь(это я про описание команд в qbasic), но мне кажется, что все дело или в INSTR или в LEFT$. Как я понял, они что то делают с символами и строками, или типа того.

Добавлено через 0.00005 минут
И не судите строго, если я неправильно ответил, я первый раз этим занимаюсь

0

Сообщение от Артем Пешков Я не очень в английском разбираюсь(это я про описание команд в qbasic), но мне кажется, что все дело или в INSTR или в LEFT$. Как я понял, они что то делают с символами и строками, или типа того.

Короче вам нужно своё мышление привести в порядок, тут дело то в банальных вещах.
У вас в руках Google(поиск который найдёт вам всё, нужно только настучать на клавиатуре что искать
и его сервис translate, который переведёт всё что угодно), у вас в руках справка QuickBasic\QBasic
(QBasic есть и с русскоязычной справкой, в гугле легко ищется). Там есть примеры на каждый оператор.
Мешать может только одно - лень. Всё остальное - это отмазки, которые мной не принимаются.

Помню когда начинал, прежде чем смог писать свои программы, причём жутко какашечные(не ту, которую
вы пытаетесь написать сейчас), изучил почти все операторы QBasic прямо по списку, изучить в данном
контексте означает - знать как работает, просто пришлось это сделать. Вопросов о собственной
мотивации у меня не возникало никогда. Надеюсь, что после этого поста и у вас не возникнет.

P.S: И да, английский лучше подтягивать, без него будет полная труба.

0

Ураа, получилось!

0

Вот архив:

Вложения

1.rar (2.3 Кб, 5 просмотров)

0

почему-то я потерял кусок той строки, просто заменил в оригинальном коде WRITE на PRINT и все заработало без кавычек.

0

WRITE то вы заменили. Вопрос в другом, понятно ли вам отличие этого кода:

от вот этого:

0

Не особо), но по моему в первом примере играет роль INSTR(1 или CHR$(0))-1).
И может -1 отнимает лишние символы до названия файла.
Ну это мои догадки, т.к. раньше я с этим дело не имел.

Добавлено через 2 минуты
Теперь надо "пронумеровать" файлы, что бы при нажатии ENTER, коммандой SHELL запускался файл с заданным номером, или сделать это другим способом.

Добавлено через 10 минут
Я походу немного понял:
Там походу LEFT возвращает количество символов в строке DTA.DtaFileName chr$-1 INstr

Кароче ничо я не понял.

Добавлено через 15 минут
Похоже, мне снова придётся учить qbasic. Основные команды я знаю. Но кроме:type,left$,right$,instr,call absolute, data,read,palette и ещё некоторые. И читая про left$ например, я вообще не понимаю, что за символы, что за строки, возвращает количество символов?

0

Сообщение от Артем Пешков Кароче ничо я не понял.

Вы примеры со справки запускали? Смотрели как они работают и что происходит в результате?
Вы в гугле вбивали название операндов?
Ежели, как вы, указали язык является препятствием, то вы пробовали переводить описание
работы операнда или искать русскоязычную справку?
Вы хоть что-нибудь делали из описанного? Или зря трачу своё время, пытаясь вам привить
основные принципы программирования?

Сообщение от Артем Пешков Кароче ничо я не понял.

Откройте справку QBasic и перепечатайте сюда на форум, что там написано касательно
LEFT$() и INSTR(). Это займёт у вас 10 минут от силы.

0

ВОТ:

Миниатюры

 

0

Как только вы написали, я зашел, включил, написал, запустил и короче понял
Например:
и число 5 означает количество букв с левой стороны, которые надо вывести на экран
В таком случае на экран выводится "ABC13"
c RIGHT тоже самое, только с правой стороны.

Добавлено через 6 минут
INSTR:
На экран выведется 7
То есть это типа сколько букв от 1 до слова 2456

Добавлено через 5 минут
И я работал на qbasice английском, и там вроде примеров не было. Сейчас скачал русскую версию, там примеры есть. Я на них посмотрел и сразу врубился.

0

Сообщение от Артем Пешков И я работал на qbasice английском, и там вроде примеров не было.

Были.

Сообщение от Артем Пешков Как только вы написали, я зашел, включил, написал, запустил и короче понял

Ну и какой вывод можно сделать из всего этого касательно разницы между двумя строками
в этом сообщении ?

0

Во втором там от начала до 13 символа выводить имя файла(DTA.DtaFileName), в первом наверное INSTR считает количество символов от начала до конца DTA.DtaFileName или до знака CHR$(0). И я не знаю, что означает CHR$(0), он же ничего не означает, это просто ноль.

0

Сообщение от Артем Пешков И я не знаю, что означает CHR$(0)

Ну почти всё "попали". Суть простая, когда вы читаете описание оператора, будьте предельно
внимательным, INSTR - это ПОИСК, поиск подстроки в строке. Он возвращает вам найденную
позицию. CHR$(0) - это однобайтовый ASCII символ, имеющий значение - ноль. Есть общепринятый
формат строк ASCIIZ, это обычная ASCII строка, заканчивающаяся нулём. Так вот сервис 21h
DOS возвращает строку именно в этом формате, при этом он не заполняет поле имени дальше и
попытка взять все 13 символов как у вас в коде - приводит к артефактам(остатки от старого имени).
Именно такую аналитику хотел услышать от вас, хоть в каком-то виде, вы должны научиться
понимать истинные причины ошибок, если этого навыка не сформируете - будет полная жопа
что под DOS-ом что под виндой.

Добавлено через 46 минут
И виноват в данном случае я сам, потому что дал код на три головы выше ваших знаний,
так как сразу не понял(обычно такие вопросы не задают начинающие).
Вам сейчас в самый раз взять тот первый код из второго сообщения и поучиться на нём,
и вообще лучше подобные простые исходники поразбирать, прям много и долго.
Сейчас очевидно, что вы эту прогу не осилите, потому что хотелок то обычно много, например,
захотите сделать поиск по файлам и всё - абзац, взять чужое не получится потому что 99%
исходников - рекурсия, а под досом это нагиб(надо говорить как истинный дюнист т.е. - "наиб")...

Короче возьмите волков коммандер и не мучайтесь. Попишите пока игрульки и
какую-нибудь чушь, руку набейте, синтаксис изучите. Сам вот об этом никогда не думал,
ну как-бы просто знаю что эти файловые менеджеры и так нормально писаны, лучше уже
не сделать, т.к. их писали реальные звери. Раньше были суровые времена не то, что сейчас.

0

Взять какой код, там где shell "dir /b..." ?

0

Сообщение от Артем Пешков Взять какой код, там где shell "dir /b..." ?

Именно, на таких простых примерах изучить языковые конструкции.
Циклы, условия, структуры, операторы. Отбросить пока все коды с ABSOLUTE.
Если чё - это не демотивация, а призыв к действию, т.е. писать программы осмысленно.

0

Код который с SHELL "DIR /B..." ? И кстати про файл. Менеджер: я ж хотел оболочку написать, там в принципе все просто(кроме всяких процедур, suboв), отследить координаты мыши, и если кнопка нажата, то..., даже калькулятор написал, там где мышкой цифры вводятся. Так вот, в такую штуку мне надо поставить примерно такой, очень простенький файловый менеджер, что бы хоть чуть-чуть легче на dos работать было.



И вообще я не знаю, что я все на досе пишу, но мне как-бы не на чем писать свои штуки. И опять повторюсь, не хочу я под виндовс писать, там уже все есть. Я даже химичил в файлах command.com и io.sys и переименовывал там все MS- .. Да там на что угодно переписать можно, если просто открыть в редакторе. Но я понимаю, что там все уже написано, и command.com это только командный интерпри(слово забыл), и остаётся или под dos писать, или учить асм, и писать свою ось. Но это все сказки, и выбор очевиден.

Добавлено через 1 минуту
* не на досе, а под дос

0

Сообщение от Артем Пешков там в принципе все просто

В одной строчке кода тоже было "в принципе всё просто". Написать как вы хотите
это будет очень неуклюжий файловый менеджер, пожирающий кучу оперативы,
без какого-либо функционала(чтобы сделать что-то сложнее запуска - тут надо понимать сам процесс).
Окошко хардкодится в константной позиции. Код мыши - ненадёжен. Дальше продолжать?
Настанет момент вы захотите почистить код, уберёте кое что и настанет кабзда, вы будете
долго гадать, почему же рабочий код не работает и это будет 100%, а всё потому, что
нет понимания вопроса.

Сообщение от Артем Пешков не хочу я под виндовс писать, там уже все есть.

Вы ошибаетесь. Всегда есть куча задач. Многое есть, но это не означает, что оно лучшее.
Например СПО сейчас терпит очень сильно. DOS-ом уже вообще никто не пользуется,
это фетиш 33-го порядка.

Сообщение от Артем Пешков или учить асм, и писать свою ось.

Это всё пустая болтовня, сам тут фигову тучу лет тусуюсь, никто даже из раздела ASM
не накодил свою ОС. Единственного крутого чувака, который мог это сделать забанили
к чертям собачьим люди, которые в этом не шарят ни на йоту. Помню когда-то давно по
молодости и глупости тоже хотел этим заняться и когда окинул взором кол-во литературы,
необходимой для самого минимального начального уровня в ОС строении, понял, что
нафиг это надо - тратить свою жизнь и мозги на этот никому не нужный бред. Один знакомый
писал свою ОС, он был сильнейший программист, в итоге ей никто не пользовался, хотя он
даже собственный ЯП высокоуровневый запилил.

Добавлено через 12 минут

Сообщение от Артем Пешков (кроме всяких процедур, suboв)

Модульное программирование это АЗЫ. Бисквит с GW-BASIC - оспорит, но вы не бисквит.
Помню неделю колупал его программу - макаронину, в итоге плюнул и написал свою, начисто.

0

И по поводу памяти: ERASE очищает только переменную, но не память, это в примере было.

Добавлено через 16 минут
И если Dos Ом никто не пользуется, не писать же мне оболочку для windows? Ведь я для всего этого тему создал, уже начал что то писать. У меня ж не windows 20 получится, и я это знаю. Если я напишу это под DOS, и хотя бы человек 5 будут этой оболочкой пользоваться, это будет огромный прорыв для меня, т.к. мне только 13 лет, правда.

0