ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Оффтоп > Болталка
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

Qbasic для новичков
  #1  
Старый 08.06.2006, 16:14
Dracula4ever
Постоянный
Регистрация: 08.05.2006
Сообщений: 559
Провел на форуме:
1593567

Репутация: 354


Отправить сообщение для Dracula4ever с помощью ICQ Отправить сообщение для Dracula4ever с помощью AIM Отправить сообщение для Dracula4ever с помощью Yahoo
Post Qbasic для новичков

Привет всем античатникам!
Сегодня я сидел один дома и скучал.Тогда я решил что так как делать мне нечего я лучьше напишу полезную статью для античата. С начала я подумал написать статью про Reversing но потом решил что я отложу эту идею в сторонку и напишу чтото другое.
В конце я решил написать статью про язык Программирование QBASIC.
Ладно давайте начнем:

Basic (Beginners All-purpose Symbolic Instruction Code-Универсальная Символическая Инструкция Кода для Начинающих) был разработан в 1975 году Биллом Гейтсом.Буква Q означает что перед вами измененный в лучшую сторону язык Basic.
Теперь когда я обьяснил вам что такое QBASIC давайте посмотрим как мы пишем на нем программы.
Давайте рассмотрим пример программы котороя напишет на экране Dracula4ever love antichat.
Вот код:


Код:
PRINT "Dracula4ever love antichat"

Слово PRINT озночает что то что я напишу в кавычках будет написано на экране .

Ладно теперь давайте я вас познакомлю с новой коммандой котороя называется CLS.
CLS (CLear Screen) очищает все что написано на экране.Мы будем ставить теперь комманду CLS в начале программы.
Давайте посмотрим пример с этой новой коммандой:


Код:
CLS
PRINT "Welcome to Antichat"

Пока мы с вами делали программки которые только показывают пользывателю что вы хотите , но что если этот пользыватель хочет чтото этой программе "написать"?
Для этого мы используем комманду INPUT.Чтобы дать вам в примере интерестную программку я вас заодно и научу комманду переменны. В QBASIC любая переменная начинается с "$".
Вот вам пример:


Код:
Name$

Теперь давайте расмотрим пример программки в которой есть и переменны и INPUT.


Код:
CLS
INPUT "Enter your name: ", Name$
PRINT Name$

Ладно двайте я вам сначало обьясню что это за программа.
Это програма просит ввести имя и когда вы введёте своё имя она напишит ваше имя внизу.
Теперь когда вы знаете что эта программа делает я думаю вы поняли что каждое слово в этой программе значит, поэтому я не буду обьеснять каждую строчку.

Я закончу этот текст тем что обьясню вам про комманду IF...THEN .
IF...THEN это комманда котороя сообщает пользывателю что ему надо написать что-то.
Если он написал правильно тогда она пишит что-то одно.
Если нет тогда что-то другое.
Я думаю что лучьше всего это показать вам пример с программой а потом обьеснить все.
Вот вам пример:


Код:
CLS
INPUT "Enter your name:  ", Name$
IF Name$="Dracula4ever" THEN 
PRINT "Welcome!"
ELSE
PRINT "Hello, "; Name$; ".   Go away!?"
END IF

Ладно первая строчка говорит программе очистить все что написано на экране.
Вторая строчка говорит пользывателю вставить своё имя.
Третия строчка говори программе что если имя которое вставил пользователь оно Dracula4ever тогда....
Четвёртая строчка говорит что тогда пусть на экране будет написано Welcome.
Пятая строчка говорит что если нет, тогда ...
Шестая строчка говорит что тогда пусть будет написано Go away!
И последнея строчка говорит что конеч комманде IF.





Ладно, я надеюсь что вам понравилась моя статья.
Скоро я напишу ещё одну статью ,котороя будет для более продвинутых в этой области людей.
Бай!


Dracula4ever

Последний раз редактировалось dracula4ever; 08.06.2006 в 16:18..
 
Ответить с цитированием

  #2  
Старый 08.06.2006, 16:22
bul.666
Banned
Регистрация: 06.06.2006
Сообщений: 944
Провел на форуме:
3986705

Репутация: 1403


Отправить сообщение для bul.666 с помощью ICQ
По умолчанию

Наахрена Qbasic!??? ЛОЛ, Статья не очем! Без обид
 
Ответить с цитированием

  #3  
Старый 08.06.2006, 16:27
Dumkopff
Познающий
Регистрация: 05.04.2006
Сообщений: 76
Провел на форуме:
2310584

Репутация: 73
По умолчанию

...

Последний раз редактировалось Dumkopff; 24.03.2007 в 21:41..
 
Ответить с цитированием

  #4  
Старый 08.06.2006, 16:30
Dracula4ever
Постоянный
Регистрация: 08.05.2006
Сообщений: 559
Провел на форуме:
1593567

Репутация: 354


Отправить сообщение для Dracula4ever с помощью ICQ Отправить сообщение для Dracula4ever с помощью AIM Отправить сообщение для Dracula4ever с помощью Yahoo
По умолчанию

Как ты хочеш чтоь я тебя бил?
Ногами или руками?
 
Ответить с цитированием

  #5  
Старый 08.06.2006, 16:34
Dumkopff
Познающий
Регистрация: 05.04.2006
Сообщений: 76
Провел на форуме:
2310584

Репутация: 73
По умолчанию

...

Последний раз редактировалось Dumkopff; 24.03.2007 в 21:41..
 
Ответить с цитированием

  #6  
Старый 08.06.2006, 16:36
Dracula4ever
Постоянный
Регистрация: 08.05.2006
Сообщений: 559
Провел на форуме:
1593567

Репутация: 354


Отправить сообщение для Dracula4ever с помощью ICQ Отправить сообщение для Dracula4ever с помощью AIM Отправить сообщение для Dracula4ever с помощью Yahoo
По умолчанию

Нет
 
Ответить с цитированием

  #7  
Старый 08.06.2006, 16:46
w00d
Banned
Регистрация: 30.06.2005
Сообщений: 236
Провел на форуме:
333859

Репутация: 53
Отправить сообщение для w00d с помощью ICQ
По умолчанию

Чё за мегастёбы на форуме начались?
То статья о делфях, то уже о басике..
Надо конкурс организовать на самую нелепую статью месяца..
 
Ответить с цитированием

  #8  
Старый 08.06.2006, 17:02
Rebz
Super Moderator
Регистрация: 08.11.2004
Сообщений: 3,395
Провел на форуме:
13166814

Репутация: 3876


По умолчанию

а про Screen 7 чего не рассказал? А как можно звуки и цветные линии рисовать?
 
Ответить с цитированием

  #9  
Старый 08.06.2006, 17:07
Dracula4ever
Постоянный
Регистрация: 08.05.2006
Сообщений: 559
Провел на форуме:
1593567

Репутация: 354


Отправить сообщение для Dracula4ever с помощью ICQ Отправить сообщение для Dracula4ever с помощью AIM Отправить сообщение для Dracula4ever с помощью Yahoo
По умолчанию

Я про это буду рассказывать в моей следущей статье.
Я написал эту статью чтобы подготовить тех кого не знаят QBASIC к более сложным программам.
Вот пример программы которую смогут построить т кто прочитают мою следущию статью про QBASIC которую я напишу скоро.

Код:
CLS
RANDOMIZE TIMER
PRINT "Welcome to Number Guesser"
PRINT "I'm thinking of a number between 1 and 10."
Number = INT(RND * 10 + 1)
DO
INPUT "What is your guess? ", Guess
IF Guess = Number THEN
PRINT "Correct!"
EXIT DO
ELSE
PRINT "Try again"
END IF
LOOP
 
Ответить с цитированием

  #10  
Старый 08.06.2006, 18:29
bul.666
Banned
Регистрация: 06.06.2006
Сообщений: 944
Провел на форуме:
3986705

Репутация: 1403


Отправить сообщение для bul.666 с помощью ICQ
По умолчанию

Ответь мне че ты будешь делать с ЭТИМ Qbasicом?!! Его все в школе проходят...
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Софт для мобильных телефонов под *nix Grrl Сотовый фрикинг 2 02.03.2007 01:47
Xss для новичков Micr0b Уязвимости 0 04.06.2006 18:25
Брутофорсер на Delphi для новичков. TaNkist Авторские статьи 5 23.04.2006 19:37
какОй трой ИСпоЛЬзоваТЬ длЯ поЛНого УПРАвЛЕиЕ уд.КОМПОМ? UnKn0wN E-Mail 32 08.04.2006 04:20



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ