![]() |
|
Модераторы: Akina |
![]()
|
|
| Xeni@ |
|
|||
|
Unregistered |
Мне срочно нужна какая-нибудь анимация, которая работает с quick basic..Я пробовала сделать , но не получалось..Кто нибудь может дать граф-программу..желательно не очень сложную?
|
|||
|
||||
| Akina |
|
|||
|
Советчик ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 20581 Регистрация: 8.4.2004 Где: Зеленоград Репутация: 34 Всего: 454 |
а чем демка не устраивает?
-------------------- О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума. |
|||
|
||||
| Guest |
|
|||
|
Unregistered |
Что?..извини я плохо врубаюсь в эту программу...
|
|||
|
||||
| Staruha |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 1292 Регистрация: 1.2.2004 Где: Казань Репутация: 2 Всего: 27 |
Михаил Фролов.Логические и компьютерые сказки.Вот про блоху:
SCREEN 1 CLS PSET (15, 25) END SCREEN 1 CLS FOR I=0 TO 320 PSET (1, 100) FOR K=0 TO 5000 NEXT I END и т.д. -------------------- Возмездие настигнет |
|||
|
||||
| Guest |
|
|||
|
Unregistered |
Старуха
спасибо большое |
|||
|
||||
| Staruha |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 1292 Регистрация: 1.2.2004 Где: Казань Репутация: 2 Всего: 27 |
Неначем
-------------------- Возмездие настигнет |
|||
|
||||
| Guest |
|
|||
|
Unregistered |
что-то у меня ничего
не вышло..точнее не вышло анимации |
|||
|
||||
| Guest |
|
|||
|
Unregistered |
Эта программа обучаящая.На самом деле это просто точка ,меняющая координаты.Проверь коды
|
|||
|
||||
| Staruha |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 1292 Регистрация: 1.2.2004 Где: Казань Репутация: 2 Всего: 27 |
И ещё - это работает только в q-basic
-------------------- Возмездие настигнет |
|||
|
||||
| Akina |
|
|||
|
Советчик ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 20581 Регистрация: 8.4.2004 Где: Зеленоград Репутация: 34 Всего: 454 |
Вот например - из демок Microsoft QuickBASIC 4.50... комментированная даже...
-------------------- О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума. |
|||
|
||||
| Program |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 9 Регистрация: 29.4.2004 Репутация: нет Всего: нет |
0! я тоже когдато занимался QBASIC'oм ваща прикольно!!! я в нем могу сделать все, что угодно!!! когдато даж делел жалкое подобие Paint'а, но не до конца сделал... Хотите, могу файл на мыло скинуть.
Я вобще много прог на нем написал...я в нем знаю ВСЕ!!! можете спрашивать, если что... я даже малек знаю BlitzBasic, DarkBasic(на нем я написал кубик Рубика); VBA, VB 6.0 кароче, по бейсику я могу помочь... Вот вы мне бы помогли с VC++, PHP... |
|||
|
||||
| Guest |
|
|||
|
Unregistered |
Akina
|
|||
|
||||
| Jey_k |
|
|||
![]() WEB-командир ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 4149 Регистрация: 16.11.2003 Где: Москва Репутация: нет Всего: 61 |
Самый простенький пример. Квадратик двигается.
|
|||
|
||||
| Enflout |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 260 Регистрация: 22.5.2004 Репутация: нет Всего: 6 |
[code]
CLS SCREEN 12 LINE (120, 350)-(150, 380), 1, BF DIM a(8000) i = 99 GET (99, 240)-(391, 400), a 1 : PUT (i, 240), a, PSET i = i + 1 IF i = 340 THEN 2 GOTO 1 2 : PUT (i, 240), a, PSET i = i - 1 IF i = 40 THEN 1 GOTO 2 END Упростил до невозможности |
|||
|
||||
| Jey_k |
|
|||
![]() WEB-командир ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 4149 Регистрация: 16.11.2003 Где: Москва Репутация: нет Всего: 61 |
Templar$
Прикольно |
|||
|
||||
![]()
|
| Правила форума "VB6" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | VB6 | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |