Полная версия: Наш Дневник
Страницы: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32
это получаеться аналог dual bios... хочеца и себе такой поставить, да вот тока боюсь мать запороть
замечательно встретил НГ...
даже несмотря на то, что кто-то настругал
мне в левый ботинок 
даже несмотря на то, что кто-то настругал
мне в левый ботинок
Утром пришёл со смены и целый день провозился с PAL-кодером (для Speccy и БК). Под вечер, в самый разгар испытаний, мне запретили доступ к цветному телевизору. Новый год не встречал... ещё?
Я хочу бокал шампанского в кругу друзей и ночной дискусии. Я приглашаю в гости. А мне говорят: "Праздник уже прошёл!". Мне желают любить людей, а не железки. Неужели так?
xds, люби то, что любится 
Есть кто, готовая, может быть, поспорить с тем, что я могу любить только что...
ну дык люби и её и железки 
Я был уникален 
Нажмите для просмотра прикрепленного файла
(Google)
Модель Altair ...
Нажмите для просмотра прикрепленного файла
Нажмите для просмотра прикрепленного файла
(Google)
Модель Altair ...
Нажмите для просмотра прикрепленного файла
вот программа
var
xt,yt,zt,xan,yan,zan,
cosxan, sinxan, cosyan, sinyan, coszan, sinzan :real;
sx,sy,sx1,sy1,p,zoom: integer;
cube: array[0..23] of real;
lindex: array[0..23] of integer ;
Procedure Draw3dobject(color:integer);
begin
for p:=0 to 11 do begin
sx:=trunc(zoom*cube[lindex[p*2]*3])+GetWidth div 2;
sy:=trunc(zoom*cube[lindex[p*2]*3+1])+GetHeight div 2;
sx1:=trunc(zoom*cube[lindex[p*2+1]*3])+GetWidth div 2;
sy1:=trunc(zoom*cube[lindex[p*2+1]*3+1])+GetHeight div 2;
setcolor(color,color,color);
drawline(SX,SY,sx1,sy1);
Repaint;
end;
end;
procedure calc;
begin
for p:=0 to 7 do begin
Yt := cube[p*3+1] * COSXan - cube[p*3+2] * SINXan;
Zt := cube[p*3+1] * SINXan + cube[p*3+2] * COSXan;
cube[p*3+1] := Yt;
cube[p*3+2] := Zt;
Xt := cube[p*3] * COSYan - cube[p*3+2] * SINYan;
Zt := cube[p*3] * SINYan + cube[p*3+2] * COSYan;
cube[p*3] := Xt;
cube[p*3+2] := Zt;
Xt := cube[p*3] * COSZan - cube[p*3+1] * SINZan;
Yt := cube[p*3] * SINZan + cube[p*3+1] * COSZan;
cube[p*3] := Xt;
cube[p*3+1] := Yt;
end;
end;
{ showWelcomeScreen - displays the game info screen }
procedure showWelcomeScreen;
var
textToDisplay : string;
textXPos : integer;
textYPos : integer;
begin
setColor(255, 255, 255);
fillRect(0, 0, getWidth, getHeight);
setColor(0, 0, 255);
setFont(FONT_FACE_PROPORTIONAL, FONT_STYLE_BOLD, FONT_SIZE_LARGE);
textToDisplay := 'INTRO 3dcube';
textXPos := (getWidth - getStringWidth(textToDisplay)) div 2;
textYPos := (getHeight - getStringHeight(textToDisplay)) / 2;
drawText(textToDisplay, textXPos, textYPos);
textYPos := textYPos + getStringHeight(textToDisplay);
setColor(0, 0, 0);
setFont(FONT_FACE_PROPORTIONAL, FONT_STYLE_PLAIN, FONT_SIZE_SMALL);
textToDisplay := 'pascalnet.ru mworld.ru';
textXPos := (getWidth - getStringWidth(textToDisplay)) div 2;
drawText(textToDisplay, textXPos, textYPos);
textYPos := textYPos + getStringHeight(textToDisplay);
end;
begin
if OpenPlayer('/Theme.mid', 'audio/midi') then begin end;
if SetPlayerCount(-1) then begin end;
if StartPlayer then begin end;
showWelcomeScreen;
repeat
until getKeyClicked <> KE_NONE;
cube[0]:=-1; cube[1]:=-1; cube[2]:=-1; cube[3]:=-1; cube[4]:=-1;
cube[5]:=1; cube[6]:=-1; cube[7]:=1; cube[8]:=-1; cube[9]:=-1;
cube[10]:=1; cube[11]:=1; cube[12]:=1; cube[13]:=-1; cube[14]:=-1;
cube[15]:=1; cube[16]:=-1; cube[17]:=1; cube[18]:=1; cube[19]:=1;
cube[20]:=-1; cube[21]:=1; cube[22]:=1; cube[23]:=1;
lindex[0]:=0; lindex[1]:=1; lindex[2]:=0; lindex[3]:=4;
lindex[4]:=0; lindex[5]:=2; lindex[6]:=1; lindex[7]:=3;
lindex[8]:=1; lindex[9]:=5; lindex[10]:=2; lindex[11]:=3;
lindex[12]:=2; lindex[13]:=6; lindex[14]:=3; lindex[15]:=7;
lindex[16]:=4; lindex[17]:=5; lindex[18]:=4; lindex[19]:=6;
lindex[20]:=5; lindex[21]:=7; lindex[22]:=6; lindex[23]:=7;
Zan := 0.1;
Yan := 0.02;
Xan := 0.02;
cosxan:=cos(xan); sinxan:=sin(xan);
cosyan:=cos(yan); sinyan:=sin(yan);
coszan:=cos(zan); sinzan:=sin(zan);
zoom:=30;
while GetKeyClicked = KE_NONE do begin
Draw3dobject(0);
repaint;
Draw3dobject(255);
repaint;
calc
end
end.
Это программа отсюда только для MEDlet Pascal...
Компилирую, запускаю на своем NOKIA 6681, кубик все время растет в размерах
На Sony Erricsson t630 все нормально..
я в ауте... переменные сами изменяются
Исходный код
var
xt,yt,zt,xan,yan,zan,
cosxan, sinxan, cosyan, sinyan, coszan, sinzan :real;
sx,sy,sx1,sy1,p,zoom: integer;
cube: array[0..23] of real;
lindex: array[0..23] of integer ;
Procedure Draw3dobject(color:integer);
begin
for p:=0 to 11 do begin
sx:=trunc(zoom*cube[lindex[p*2]*3])+GetWidth div 2;
sy:=trunc(zoom*cube[lindex[p*2]*3+1])+GetHeight div 2;
sx1:=trunc(zoom*cube[lindex[p*2+1]*3])+GetWidth div 2;
sy1:=trunc(zoom*cube[lindex[p*2+1]*3+1])+GetHeight div 2;
setcolor(color,color,color);
drawline(SX,SY,sx1,sy1);
Repaint;
end;
end;
procedure calc;
begin
for p:=0 to 7 do begin
Yt := cube[p*3+1] * COSXan - cube[p*3+2] * SINXan;
Zt := cube[p*3+1] * SINXan + cube[p*3+2] * COSXan;
cube[p*3+1] := Yt;
cube[p*3+2] := Zt;
Xt := cube[p*3] * COSYan - cube[p*3+2] * SINYan;
Zt := cube[p*3] * SINYan + cube[p*3+2] * COSYan;
cube[p*3] := Xt;
cube[p*3+2] := Zt;
Xt := cube[p*3] * COSZan - cube[p*3+1] * SINZan;
Yt := cube[p*3] * SINZan + cube[p*3+1] * COSZan;
cube[p*3] := Xt;
cube[p*3+1] := Yt;
end;
end;
{ showWelcomeScreen - displays the game info screen }
procedure showWelcomeScreen;
var
textToDisplay : string;
textXPos : integer;
textYPos : integer;
begin
setColor(255, 255, 255);
fillRect(0, 0, getWidth, getHeight);
setColor(0, 0, 255);
setFont(FONT_FACE_PROPORTIONAL, FONT_STYLE_BOLD, FONT_SIZE_LARGE);
textToDisplay := 'INTRO 3dcube';
textXPos := (getWidth - getStringWidth(textToDisplay)) div 2;
textYPos := (getHeight - getStringHeight(textToDisplay)) / 2;
drawText(textToDisplay, textXPos, textYPos);
textYPos := textYPos + getStringHeight(textToDisplay);
setColor(0, 0, 0);
setFont(FONT_FACE_PROPORTIONAL, FONT_STYLE_PLAIN, FONT_SIZE_SMALL);
textToDisplay := 'pascalnet.ru mworld.ru';
textXPos := (getWidth - getStringWidth(textToDisplay)) div 2;
drawText(textToDisplay, textXPos, textYPos);
textYPos := textYPos + getStringHeight(textToDisplay);
end;
begin
if OpenPlayer('/Theme.mid', 'audio/midi') then begin end;
if SetPlayerCount(-1) then begin end;
if StartPlayer then begin end;
showWelcomeScreen;
repeat
until getKeyClicked <> KE_NONE;
cube[0]:=-1; cube[1]:=-1; cube[2]:=-1; cube[3]:=-1; cube[4]:=-1;
cube[5]:=1; cube[6]:=-1; cube[7]:=1; cube[8]:=-1; cube[9]:=-1;
cube[10]:=1; cube[11]:=1; cube[12]:=1; cube[13]:=-1; cube[14]:=-1;
cube[15]:=1; cube[16]:=-1; cube[17]:=1; cube[18]:=1; cube[19]:=1;
cube[20]:=-1; cube[21]:=1; cube[22]:=1; cube[23]:=1;
lindex[0]:=0; lindex[1]:=1; lindex[2]:=0; lindex[3]:=4;
lindex[4]:=0; lindex[5]:=2; lindex[6]:=1; lindex[7]:=3;
lindex[8]:=1; lindex[9]:=5; lindex[10]:=2; lindex[11]:=3;
lindex[12]:=2; lindex[13]:=6; lindex[14]:=3; lindex[15]:=7;
lindex[16]:=4; lindex[17]:=5; lindex[18]:=4; lindex[19]:=6;
lindex[20]:=5; lindex[21]:=7; lindex[22]:=6; lindex[23]:=7;
Zan := 0.1;
Yan := 0.02;
Xan := 0.02;
cosxan:=cos(xan); sinxan:=sin(xan);
cosyan:=cos(yan); sinyan:=sin(yan);
coszan:=cos(zan); sinzan:=sin(zan);
zoom:=30;
while GetKeyClicked = KE_NONE do begin
Draw3dobject(0);
repaint;
Draw3dobject(255);
repaint;
calc
end
end.
Это программа отсюда только для MEDlet Pascal...
Компилирую, запускаю на своем NOKIA 6681, кубик все время растет в размерах
На Sony Erricsson t630 все нормально..
я в ауте... переменные сами изменяются
Пишу авторизацию для одного интерфейса, так вот, в IPB пароль юзера храниться в таком виде:
где
converge_pass_salt — это случайная строка текста длиной 5 символов, генерируемая специальным модулем, строка эта может включать любые символы, кроме обратного слэша \.
plain_text_password представляет собой введённый пользователем пароль в незашифрованном виде.
Как увидел это решил отложить доделывание авторизации до завтра. Я то думал пароль там md5 просто...
p.s. уже половина 3 ночи почти
Код
md5( md5( converge_pass_salt ) . md5( plain_text_password ) )
где
converge_pass_salt — это случайная строка текста длиной 5 символов, генерируемая специальным модулем, строка эта может включать любые символы, кроме обратного слэша \.
plain_text_password представляет собой введённый пользователем пароль в незашифрованном виде.
Как увидел это решил отложить доделывание авторизации до завтра. Я то думал пароль там md5 просто...
p.s. уже половина 3 ночи почти
1 января
Вчера (точнее, сегодня... или вчера? в общем, ночью!) сделала флексор Штеффена. Минут 10 не могла понять, куда это создание изгибается. Потом дошло. Гнется, зараза, ох как гнется! :-)
UtaH, а что это такое ? Google 3 ссылки всего выдал и все не то
поразительно, яндекс и рамблер тоже выдают по 3 ссылки в никуда
Второй раз сталкиваюсь с такой вещью
Первый раз было когда я искал про прибор Ван Эйка.
Все поисковики дают куча ссылок на книгу скопированную разными сайтами в тысычах экземплярах "Как стать хакером" и там почти ничего об этом приборе нет , а полезных ссылок было всего 2-3
Первый раз было когда я искал про прибор Ван Эйка.
Все поисковики дают куча ссылок на книгу скопированную разными сайтами в тысычах экземплярах "Как стать хакером" и там почти ничего об этом приборе нет , а полезных ссылок было всего 2-3
Цитата(UtaH (sms))
Это изгибающийся многогранник. Я могу выложить фотки и чертежи на форум.
сразу и поисковик все нашел
изгибаемые многогранные поверхности
Цитата
МНОГОГРАННАЯ ПОВЕРХНОСТЬ ШТЕФФЕНА
Цитата
1) Многогранная поверхность Штеффена имеет наименьшее число вершин среди всех замкнутых изгибаемых многогранных поверхностей без самопересечений. Другими словами, пример Штеффена нельзя улучшить: если замкнутая многогранная поверхность без самопересечений имеет менее девяти вершин, то она не является изгибаемой. В связи с этим любопытно отметить, что хотя в [2] и других работах есть ссылки на препринт К. Штеффена, якобы содержащий описание конструкции его многогранной поверхности, на самом деле этот препринт никогда не был опубликован. Сам Штеффен объясняет это тем, что он очень хотел доказать неулучшаемость своего примера, но не смог и поэтому не опубликовал ничего на эту тему.
Поставил J2SE 1.2.4 и J2ME WTK 2.2 - просто песня!
Установил QIP, и узнал дату своей регистрации в аське...
сума сойти... 9 лет быть не может ИМХО они глючат...
добавил позже
ха-ха-ха-ха-ха, дошло Это номер 609033 зареген в то время Надо посмотреть мой старый...
Цитата
Sun Mar 23 1997 13:27:00
сума сойти... 9 лет
быть не может ИМХО они глючат...добавил позже
ха-ха-ха-ха-ха, дошло
Это номер 609033 зареген в то время Надо посмотреть мой старый...
Наконец-то праздники закончились .. уфф 
Теперь только учеба 
Теперь только учеба
Цитата(klem)
Наконец-то праздники закончились
Устал бедный
Твою мать, зачем я это сделала?.. Разум говорит, что я поступила правильно, но почему тогда так болит душа?.. Хочется заснуть и проснуться, и чтобы ничего этого не было...
добавлено позже:
Это опять жалость... Чертова жалость, из-за которой я мучилась сама и мучила другого человека, хотя он совершенно этого не заслужил. Давить её, давить это паршивое чувство... Я смогу.
добавлено позже:
Это опять жалость... Чертова жалость, из-за которой я мучилась сама и мучила другого человека, хотя он совершенно этого не заслужил. Давить её, давить это паршивое чувство... Я смогу.
Цитата(UtaH @ 11.01.2006 10:15) 
Твою мать, зачем я это сделала?.. Разум говорит, что я поступила правильно, но почему тогда так болит душа?.. Хочется заснуть и проснуться, и чтобы ничего этого не было...
Эй!.. ты чего?? что с тобой? ты ок?
если что надо - скажи
И скажи все же, где можно почитать про поверхность Штеффена
Цитата(lapp @ 11.01.2006 17:21)
Эй!.. ты чего?? что с тобой? ты ок?
если что надо - скажи
И скажи все же, где можно почитать про поверхность Штеффена
Да я нормально...
Про Штеффена по-моему ссылку выложили... Если надо, я могу выложить чертежи сюда или сбросить тебе на ПМ.
Цитата(UtaH @ 11.01.2006 10:22)
Да я нормально...
Нормально так не бывает. Точно не нужно выговориться? могу, если хочешь, по мозгам настучать. Или, наоборот - подбодрить. Мне кажется, ты того заслуживаешь.
Цитата(UtaH @ 11.01.2006 10:22)
Про Штеффена по-моему ссылку выложили... Если надо, я могу выложить чертежи сюда или сбросить тебе на ПМ.
Давай. Только я еще не знаю, что есть ПМ
Цитата
Давай. Только я еще не знаю, что есть ПМ
personal mail
ну или личные сообщения если по русски Utah, а ты пожалуй на форум выложи, наверняка кому-нибудь еще будет интересно.
мне интересно
Тем более "информация должна быть октрыта" (С)...
Тем более "информация должна быть октрыта" (С)...
lapp скорее по мозгам (или что у меня там в голове, сама не знаю) настучать...
Пожалуйста, про флексор. Вот чертеж:Нажмите для просмотра прикрепленного файла
А вот как это создание собирать.Нажмите для просмотра прикрепленного файла
Пожалуйста, про флексор. Вот чертеж:Нажмите для просмотра прикрепленного файла
А вот как это создание собирать.Нажмите для просмотра прикрепленного файла
Цитата(UtaH @ 11.01.2006 14:18)
скорее по мозгам (или что у меня там в голове, сама не знаю) настучать...
У тебя в голове - мозги. Заявляю с ответственностью, как эксперт
. Стучать по ним надо с осторожностью! но иногда надо, да.. Ну, как ты - уже успокоилась? Знаешь, когда-то, когда я был маленьким (совсем маленьким - лет 12), я сказал себе: не буду делать ничего такого, за что потом будет стыдно. И знаешь - помогало! иногда. Но не всегда.. Спасибо за чертежик!
Ой!
так ребята, не драться
Utah ,мы для тебя хором споем ,отлько не плакай.
Цитата(virt @ 11.01.2006 23:56)
Utah ,мы для тебя хором споем ,отлько не плакай.
Ну какие же вы все хорошие...
xds, где "ой!"?
UtaH,
ну разве ж мы можем тебе не помочь?
ну разве ж мы можем тебе не помочь?
Цитата(lapp @ 11.01.2006 21:53)
Ура, ура, уррррраааа!
Как приятно слышать слова в защиту всеми ныне забытого и забитого Великого и Могучего! Ну так :-) Зря что ли в гуманитарном классе штаны просиживаю
(ответила сюда, потому что и так уже в математике нафлудили по самые помидоры...)
Не поверхности штеффена.. она одна.
я ссылу давал на предыдущей странице.
http://www.pereplet.ru/obrazovanie/stsoros/331.html
я ссылу давал на предыдущей странице.
http://www.pereplet.ru/obrazovanie/stsoros/331.html
Цитата
ПРИМЕНЕНИЯ
Следует признать, что масштабные проникновения фундаментальных математических идей в индустрию и технологию - явления довольно редкие. Так что при изложении этого предмета лучше заранее настроиться на здоровый пессимизм.
Следует признать, что масштабные проникновения фундаментальных математических идей в индустрию и технологию - явления довольно редкие. Так что при изложении этого предмета лучше заранее настроиться на здоровый пессимизм.
Я вот подумал, человек как программа (шучу конечно),
бывает с виду ничего а в исходниках такое гов**
бывает с виду ничего а в исходниках такое гов**
не, мысли не пессимистичные я же написал "шучу конечно".
там и смайлик можно подрисовать ":)"..
я это написал не в связи с тем что нарвался на такого, нет, просто подумал о сходстве человека и программы во время разговора с одним другом по ICQ
там и смайлик можно подрисовать ":)"..
я это написал не в связи с тем что нарвался на такого, нет, просто подумал о сходстве человека и программы во время разговора с одним другом по ICQ
Цитата
Это я так о своём... rolleyes.gif
Цитата
. Это ещё не все мысли, кот. посещают тех, кто изучает химию
думаю ты мне подробнее расскажешь
Какие еще
Цитата
Когда ты держишь колбочку с дымящей азоткой, из неё валит бурый газ, откуда-то справа тянет H2S (запах "тухлых" яиц), откуда-то слева - хлором... Т
У нас на химии в школе максимум что видел - изменение цвета или выпадение осадка
а я в обычной
+ в вечерней физ мат школе
+ в вечерней физ мат школе
Цитата
Уж лучше бы математики больше и физики, и химии (это по умолчанию)!!! smile.gif
а что в другую школу не перешла ?
ну и ладно.
Цитата
Это ты сам с собой общаешься?
ну выходит что даЦитата
Да, программисты сходят с ума раньше...
ну я не пригиаюсь под несуществующими проводами
Цитата(Hrompik-cat @ 14.01.2006 1:10)
Ну-ну!
А мне с глюками веселее! 
Все хорошо в меру
Уезжаю до 31 числа на краевые олимпиады. Не поминайте лохом! :-)
Возвращайся скорее!
Будем тебя ждать!
Дневник пиши...
Будем тебя ждать!
Дневник пиши...
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.