Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.82/11: Рейтинг темы: голосов - 11, средняя оценка - 4.82
0 / 0 / 0
Регистрация: 27.02.2015
Сообщений: 2

Посмотреть начало длинной программы

27.02.2015, 20:06. Показов 2147. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте!
Скажите пожалуйста, как в Бейсике можно прокрутить программу, например я вызываю длинную программу больше экрана оператором LIST, но там только последние строки, а как достать первые строки программы? Курсор доходит только до верха экрана и дальше не хочет идти, PG UP и PG DN не влияют, HOME и END переводят курсор только в строке в начало или в конец строки, как же достать начало программы чтобы её просмотреть всю с начала до конца и отредактировать если будут найдены ошибки? Прокрутки тоже нет.
Я пользуюсь не QBASIC, а обычным BASIC, классическим MS-DOS Basic Version 2.00. Открываю его через DOSBox, но в принципе это не так обязательно можно открыть и отдельно, только DOSBox позволяет открыть на весь экран, и в этом его преимущество заканчивается.
Спасибо.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
27.02.2015, 20:06
Ответы с готовыми решениями:

Можете посмотреть отрывок программы)
Public Sub MouseClick() Dim cbuttons As Long, dwExtraInfo As Long, mevent As Long mevent = MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP '...

В массиве определить начало и конец самой длинной цепочки из возрастающих цифр
Очень очень нужно)

Одномерный массив, определить начало и конец самой длинной послед. подряд идущих нулевых элементов.
В одномерный массив заданного размера N (от 2 до 30) ввести произвольные натуральные числа, Определить начало и конец первой, самой длинной...

6
 Аватар для Pro_grammer
6807 / 2839 / 527
Регистрация: 24.04.2011
Сообщений: 5,308
Записей в блоге: 10
28.02.2015, 07:10
Цитата Сообщение от sergaleksid Посмотреть сообщение
классическим MS-DOS Basic Version 2.00.
Эх как вас угораздило А что поновее ни чего не возьмете?
Я в этом Basic не знаток, но обычно LIST работает так например:

LIST N1, N2 -вывод части текста программы от строки с номером N1 до строки N2 включительно:
LIST N1, от строки с номером N1 до конца программы:
LIST, N2 - с начала программы до N2.
LIST вывод всего текста программы.
Экспериментируйте!
1
0 / 0 / 0
Регистрация: 27.02.2015
Сообщений: 2
28.02.2015, 17:01  [ТС]
Спасибо Вам за ответ. Но ничего не помогло, не запятые, пишет что-то не помню точно, но выводит какую-то ошибку, можно только LIST и номер кадра вывести, одного только, несколько кадров сразу тоже не выводятся, по крайней мере теми методами что я пробовал. Но всё равно спасибо.

Я так просто от нечего делать начал изучать язык Бейсик, да и просто ностальгия по студенческим временам, хотел просто повторить пройденное, освежить память.

А может Вы подскажите какие-нибудь книги по QBasic для начинающих несложные для понимая и изучения? Я изучаю Basic по книге: Г.Х. Геворкян, В.Н. Семёнов "Бейсик это просто".

И ещё не могли бы подсказать простые но важные операторы, команды, например: CLS - очищает экран, DELETE - удаляет содержимое полностью, CLEAR - тоже что-то очищает, какие-то данные в памяти, SAVE"текст" - сохраняет содержимое BASIC в компьютере в Windows, LOAD"текст" - выводит программу на экран в программу BASIC из Windows, LIST - выводит программу на экран, а ещё что-нибудь есть, ну кроме графики, и звука? Пусть это будет для QBasic.

А Вы знаете что печатать можно в QBasic на русском, это позволяет программа как DOSBox, так можно и без неё, надо провести следующую процедуру:

Для решения необходимо в реестре по адресу:

HKEY_LOCAL_MACHINE>SYSTEM>CurrentControl Set>Control>KeyboardLayout
изменить значение ключа 00000409 в папке DosKeybCodes на "ru".
Кроме этого, в файле "autoexec.nt", расположенном в Windows\system32, надо добавить строку "lh
%SystemRoot%\system32\kb16.com ru". После перезагрузки переключение раскладки клавиатуры в
DOS-приложениях будет производиться комбинациями Ctrl+Left Shift (английская) и Ctrl+Right
Shift (русская). Данный метод нормально работает в том случае, если Language settings for the
system (апплет Regional Options) в качестве Default стоит Cyrilic.
Если Вас не устраивают возможности предоставляемые системой, можете поставить внешний
русификатор, например, проверенный временем RKM v.3.0. Удобнее всего прописать его в файле
autoexec.nt (аналогично kb16).

В программе DOSBox немного по другому.

Добавлено через 1 час 27 минут
Я тут попробовал программу QBasic, так она оказалась ещё сложнее чем в Basic. Надо как-то особым образом сохранять файл, так я и не понял как, как-то его потом загружать, как-то проверять тоже не понятно как, в общем тоже больше вопросов чем ответов. А в Basic всё просто написал SAVE"127(например, можно любое другое число)" и он сохранил прямо в компьютере на рабочем столе программу с номером 127.BAS. Написал LOAD"127" и он из компьютера что было на рабочем столе выгрузил в Basic. Написал LIST и эту программу из памяти выгрузил Basic, всё просто только не листает программу, нет ползунка чтобы её просмотреть если она длинная, единственная пока проблема. И ещё проблема в QBasic, если ошибся строками, написал не подряд например 1350 за ней строку 1370, а потом 1360 так он их по-моему не расставляет, так и оставляет неправильно написанными, в Basic же если написал строку 1350 потом 1370 потом 1360, так после запуска программы командой RUN, или вызова программы командой LIST все стоки подряд будут расставлены 1350 1360 1370, или я ещё плохо знаю программу QBasic.
0
28.02.2015, 17:31

Не по теме:

Цитата Сообщение от sergaleksid Посмотреть сообщение
Я так просто от нечего делать начал изучать язык Бейсик
Может лучше учить бейсик по современнее?

0
 Аватар для Pro_grammer
6807 / 2839 / 527
Регистрация: 24.04.2011
Сообщений: 5,308
Записей в блоге: 10
28.02.2015, 18:43
Цитата Сообщение от sergaleksid Посмотреть сообщение
Надо как-то особым образом сохранять файл, так я и не понял как, как-то его потом загружать,
Вы современными программами пользуетесь? Ну там Блокнот хотя бы? У многих программ есть такая штука сверху, называется меню. С помощью меню вы открываете файл, сохраняете куда угодно или создаете новый.
В Qbasic есть такое меню

Оно активируется клавишей ALT, вот с его помощью и надо открывать файл, сохранять куда угодно или создавать новый.

А вообще, если есть желание писать современные программы для себя, без проблем с кодировками и работой в редакторе, как в Блокноте - вырезать, вставлять текст и т.п. то смотрите на современные FreeBASIC и PureBasic. С PureBasic получится проще - там не надо ни чего настраивать, есть IDE и Визуальный редактор окошек. Сразу после скачивания ( в демо версии размер кода до 800 строк, вам хватит пока) и установки можно компилировать программы, которых куча в комплекте с ним. Или писать свои, или копировать с форума код - всё будет работать сразу. Прочитайте PureBasic
1
Кормпилятор
 Аватар для Quiet Snow
5044 / 1718 / 409
Регистрация: 25.04.2010
Сообщений: 4,827
Записей в блоге: 2
04.03.2015, 06:25
Цитата Сообщение от sergaleksid Посмотреть сообщение
Я тут попробовал программу QBasic, так она оказалась ещё сложнее чем в Basic.
Офигеваю всё сильнее и сильнее. Т.е. работать без мыши, редактируя текст вслепую - это просто,
а кликнуть FILE -> SAVE -> набрать имя файла и нажать ok - это сложно. Ну вы даёте!

Не понимаю, зачем заниматься программированием если даже не пользователь.
Вам срочно нужно на компьютерные курсы или чтобы знающий человек показал, как работать
в текстовых редакторах, рассказал про файлы и работу с ними, про взаимодействие ПК с
пользователем. Даже если вы что-то и знали раньше, эти знания устарели настолько, что
применять их сейчас - похоже на шутку. Да есть люди типа бисквита, которые пишут даже
на GW-BASIC очень крутые проги, но они специалисты и их серьёзнейшим образом готовили.

Цитата Сообщение от sergaleksid Посмотреть сообщение
проблема в QBasic, если ошибся строками, написал не подряд
например 1350 за ней строку 1370, а потом 1360 так он их по-моему не расставляет
В GW-BASIC и его аналогах код исполняется по номерам строк от меньшего к большему.
В QBasic\QuickBasic - нумерация НЕ нужна и НЕжелательна. Вместо неё употребляют
читаемые слова с двоеточием в конце. При этом, чтобы отправить выполнение на соотв. метку
используют оператор GOTO. Частое использование GOTO НЕжелательно, т.к. код нужно
нормально структурировать с помощью условных операторов, операторов цикла, операторов
выбора значения, других операторов ветвления и приёмов (процедуры, рекурсия), а также
оптимизировать логику программы.

то смотрите на современные FreeBASIC
В FB опупеть сколько проблем с кодировками, и самая первая - нерусифицированный оператор PRINT.
Далее - редактор FBEdit, который с включённым плагином CP1251ToCP866.dll каверкает исходники.
Далее - имена файлов для OPEN и др., которые прописываются сугубо в ANSI 1251. Но удобнее то
писать на чём, на OEM866, т.к. всё аккуратно в кодировочке, есть псевдографика для красивой
разметки исходника. Итог - пусть лучше берёт PB и потом заплатит 80 евро, чем трахается со всей
этой байдой. Лет через 5 я, может быть, если не сдохну, напишу нормальный текстовый редактор с
переключением OEM\ANSI на лету для FB и соберу библу для операторов печати OEM866 для OpenGL
сразу из коробки. А пока эту кучу дерьма никто, как понимаю, разгребать не будет. Ну естественно
если это кому-то нужно будет к тому времени, т.к. от WinAPI и GDI, вероятно, скоро откажутся.
1
04.03.2015, 10:33

Не по теме:

Цитата Сообщение от Quiet Snow Посмотреть сообщение
напишу нормальный текстовый редактор с переключением OEM\ANSI
Может тогда сразу писать полностью юникодную IDE?
Не знаю как в FB, но в PB использование юникода решает проблему отображения кириллицы в консоли и перекодировать в CP866 не требуется.

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
04.03.2015, 10:33
Помогаю со студенческими работами здесь

Посмотреть исходный код программы
Здравие желаю дорогие форумчане!Делаю обстоит следующим образом: Нам задали проект в универе(1 курс),так вот я его выполнил(написал...

Как посмотреть трафик программы
Привет всем. Есть программа которая предположительно скачивает файлы из какого-то источника. Можно ли определить этот источник, либо же...

Можно ли посмотреть, что внутри программы ?
Скачал я программу типа тетрис через winrar. Распаковал в папку, а там только read me и иконка программы. Кликаешь на иконку, программа...

Как посмотреть результат выполненной программы
Привет! Чувствую себя идиоткой, но всё-же: Как сделать, чтобы в dev-C++ v.4.9.9.2 посмотреть результат выполненной программы? Написать-то...

ГУИ как посмотреть исполнение программы?
Здорова! Как сделать чтобы было удобно в mfc просматривать что выводится на экран так же как в консольном приложении? Например я каждый раз...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru