Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.19;
Скачать: CL | DM;

Вниз

Посмотрите что я творил ;)   Найти похожие ветки 

 
DillerXX ©   (2006-02-26 00:38) [0]

.. на Qbasic"e. Это графические программы, рисующие на экране разные замысловатые (а порой даже очень) фигуры, траектории, и хрен знает что ещё. Некоторые как мне кажется достойны почёта ;) по крайней мере мне многие так говорили. Случайно вспомнил только что, и решил выложить.. писал я это когда мне было.. хм, не знаю сколько, но что такой синус-косинус-экспонента я явно не знал, но я их использовал :) что из этого вышло можете сами понаблюдать. Архив с сорцами и компилятором кувасика: http://dillerxx.newmail.ru/qbasic.rar


 
DillerXX ©   (2006-02-26 00:40) [1]

Забывал добавить - программы серии ROCKET* и SIN_EXP* как мне кажется могли составить лишь профессора МГУ по глубокой укурке :) попробуйте объясните мне как они работают :))


 
Real ©   (2006-02-26 01:08) [2]

нихрена что-то не грузится... хостер видать модный :)


 
Real ©   (2006-02-26 01:19) [3]

прошло 10 минут - ни ошибок, ни таймаутов.... просто что-то грузится, но результат нулевой... смени хост. Кстати, на ньюмэйле (это же кажись из серии хотбокс, писем нет и т.д.) - хостинг просто отвратительный. Мой сайт вообще закрыли, когда траффик по загрузке начал расти в их понятии видать сильно


 
TUser ©   (2006-02-26 09:17) [4]

Да не - грузится все.


 
Vlad Oshin ©   (2006-02-26 10:58) [5]

ф-ла эллипсоподобных фигур
x=sin(бла_бла)
y=cos(ля_ля)
вот и вся фишка


 
DillerXX ©   (2006-02-26 13:20) [6]


> ф-ла эллипсоподобных фигур
> x=sin(бла_бла)
> y=cos(ля_ля)
> вот и вся фишка

это де?


 
Vlad Oshin ©   (2006-02-26 13:49) [7]

q = ((a - s) * SIN(f)) + COS(-t) * 150
e = ((a - s) * COS(f)) + SIN(-t) * 150
PSET (f * (q / f) * 1.5 + 350, e * 1.5 + 240), w

q = (COS(t * (f / 2)) * SIN(w)) * 150
e = (SIN(t * (f / 2)) * COS(w)) * 150
PSET (w * (q / f) * 1.5 + 350, e * 1.5 + 240), w

q = (SIN(t * (f / 2)) / COS(-t)) * 40
e = (COS(t * (f / 2)) / SIN(-t)) * 40
PSET (f * (q / f) * 1.5 + 350, e * 1.5 + 240), w

w = INT(RND(1) * 14 + 1)
q = (SIN(t * (f / 2)) / COS(-t)) * 40
e = (COS(t * (f / 2)) * SIN(-t)) * 40
PSET (f * (q / f) * 1.5 + 350, e * 1.5 + 240), w

IF a MOD s = a / s THEN q = e
w = INT(RND(1) * 14 + 1)
q = (SIN(t * (a + s)) * COS(-t)) * 150
e = (COS(t * (a - s)) * SIN(-t)) * 150
PSET (f * (q / f) * 1.5 + 350, e * 1.5 + 240), w

w = INT(RND(1) * 14 + 1)
q = (SIN(t * (f / 2)) + COS(-t) / SIN(-w) * EXP(t)) * 40
e = (COS(t * (f / 2)) - SIN(-t) / COS(-w) * EXP(t)) * 40
PSET (f * (q / f) * 1.5 + 350, e * 1.5 + 240), w

вот наообум из того архива
ну и т.д.


 
Думкин ©   (2006-02-26 14:09) [8]

Ну если после укурки и под столом и у них ноги двигались - согласен.


 
DillerXX ©   (2006-02-26 16:52) [9]

Не ну мне кажется ROCKET.bas просто шедевр :) Его надо распечатать и на стенку повесить ;)


 
panov ©   (2006-02-26 17:06) [10]

Удалено модератором


 
Pazitron_Brain ©   (2006-02-26 18:40) [11]

Могу выделить немного места на своем сайте... Все равно простаивает...


 
Real ©   (2006-02-26 23:58) [12]


> Pazitron_Brain ©   (26.02.06 18:40) [11]
> Могу выделить немного места на своем сайте... Все равно
> простаивает...


Так твой сайт на народе.ру Во-первых, проще там самому зарегестрировать, чем создавать лишнее звено в публикации материала, а во-вторых - народ.ру - хостер, не намного лучше чем ньюмэйл


 
Defunct ©   (2006-02-27 00:47) [13]

panov ©   (26.02.06 17:06) [10]
Удалено модератором


:)


 
Kerk ©   (2006-02-27 00:52) [14]

Real ©   (26.02.06 23:58) [12]

У Пазитроныча хороший платный хостинг.


 
имя   (2006-02-27 01:02) [15]

Удалено модератором



Страницы: 1 вся ветка

Текущий архив: 2006.03.19;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.043 c
2-1141291904
KitsumVI
2006-03-02 12:31
2006.03.19
как скопировать таблицу базы данных


15-1141022634
Fenerik76
2006-02-27 09:43
2006.03.19
MP3 плеер Sony MPEG4 DivX + FM + диктофон купить


2-1141559590
Der Nechk@ssoff
2006-03-05 14:53
2006.03.19
подобно Memo


3-1138286835
VitV
2006-01-26 17:47
2006.03.19
Access+Delphi


2-1141301434
azl
2006-03-02 15:10
2006.03.19
Нажатие неактивной кнопки в чужом приложении