Перейти к содержимому

User №848

Пользователи
  • Публикации

    362
  • Зарегистрирован

  • Посещение

Сообщения, опубликованные пользователем User №848


  1. С сарая :).

     

    Очень полезная программа, да.  Добавлено мно-ого разных фич, однако некоторые из них лишние(тот же хоуминг).

    Если до тебя много раз говорили, что Хоуминг не нужен, не спеши повторять. Чаще всего эту фразу употребляли в ответ на "запили хоуминг в S1HS".

    На самом же деле, многим очень даже нужен, раз уж его раньше все так клянчили.

    В моём первом хаке был недохоминг, сделанный по полноценному гайду Ourico Doido. (Недохоминг только потому, что я его не правильно добавил.)

    Было это аж в 2012 году. И, что странно, и после этого нередко наблюдал, как его запрашивали начинающие хакеры(видимо, гугл изобрели гораздо позже). Им отказывали, чаще всего потому, что выдача гайда породила бы туеву хучу недохаков с хоумингом, а сами хацкеры так ничему бы не научились.

    Сегодня я могу попытаться без каких-либо гайдов добавить хоуминг, и у меня, скорее всего, получится. Мог конечно бы списать всё на то, что я по жизни исключение... Но я думаю, что с хоумингом или без, все люди имеют одинаковые возможности и шансы. Только те, кто пробовал написать сам или хотя бы проанализировать готовый код, получали жизненный урок, новые знания и навыки. Те же, кто просто выполнил пошаговые действия, съэкономили немного времени и не стали забивать голову лишним, а пошли деалать графон-хак...

    Сулька же сразу получил хоуминг, но не был доволен результатом(накосячил где-то при добавлении по гайду, вот тебе и ошибки). В результате получил весомый толчок в представлении о программировании...

    Но как был нубом, так и остался, да...

    Хоть я и лучший в группе...

    0

  2. >Что-то графическое

    >на Паскале

    *грохнулся в обморок*

    Филя, модуль Graph у меня не работает.

    Поэтому всё делается с помощью обычных текстовых символов (пробела, точнее), GotoXy и смены цвета заливки фона текста.

    >Что-то графическое

    >на Паскале

    *грохнулся в обморок*

    Я написал, а потом нашел это:

    http://old.ignatiev.su/blog/posts/pascal-snake

    Таких игр достаточно много, оказывается (игр в текстовом режиме).

    Интересно очень их создавать, я вот планирую тетрис ещё сделать.

    0

  3. "Змейка" на Pascal Turbo с использованием модуля CRT в текстовом режиме.

    Управление не очень, конечно. Работает в редакторе паскаля на DOS BOX. (на Abc.net Pascal, например, не работает)

    uses crt;
    var a,vx,vy,va,vb:integer;
        x,y,vlen,vspeed,exitgame:byte;
        pkey,vkey:char;
        Mas: Array[0..40,0..40] of integer;
    
    Procedure Crash;
    begin
    TextBackGround(Black);
    clrscr;
    WriteLn('U ve crashed! 2 - Restart, 1 - exit game...');
    read(exitgame)
    end;
    
    Procedure RDK; {What Key Pressed?}
    begin
    vkey := readkey;
    case vkey of
    #75: begin vx:=-1; vy:=0; end;   {left}
    #72: begin vx:=0; vy:=-1; end;  {up}
    #77: begin vx:=1; vy:=0;  end; {right}
    #80: begin vx:=0; vy:=1;  end; {down}
    #13: Crash;
    end;
    mem[0000:$041C]:=mem[0000:$041A]; {clear kbd buffer}
    end;
    
    Procedure MakeDot;
    begin
    Mas[0,40]:= 1+random(79);
    Mas[1,40]:= 1+random(24);
    GotoXy(Mas[0,40],Mas[1,40]);
    Write(' ');
    Inc(vlen);
    TextBackGround(Black);
    end;
    
    procedure CheckRange;
    begin
    If x > 80 then x:= x - 80;
    If x < 1 then x:= x + 80;
    If y > 25 then y:= y - 25;
    If y < 1 then y:= y + 25;
    for a:= 0 to vlen-1 do
    If (x = Mas[0,a]) and (y = Mas[1,a]) then Crash;
    If (x = Mas[0,40]) and (y = Mas[1,40]) then MakeDot;
    end;
    
    Procedure MasShift;
    begin
    For a:= 0 to vlen do begin
    Mas[0,a]:=Mas[0,a+1]; Mas[1,a]:=Mas[1,a+1]; end
    end;
    
    {started at 22 apr 2015 16:16:16 msk}
    begin
    randomize;
    Repeat
    clrscr;
    exitgame:= 0;
    x:= 20; y:=12;
    vx:=1; vy:=0;
    Repeat
    Write('Enter gamespeed value (1..3)', #10#13,'gamespeed = '); ReadLn(vspeed);{:=100;}
    Until vspeed in [1..3];
    vspeed:= (4-vspeed)*50;
    vlen:=10;
    Mas[0,0]:=0;
    Mas[1,0]:=0;
    clrscr;
    TextBackGround(White);
    MakeDot;
    Repeat
    If Keypressed Then RDK;
    MasShift;
    delay(2*vspeed);
    x:= x+vx;
    y:= y+vy;
    TextBackGround(White);
    CheckRange;
    Mas[0,vlen]:=x;
    Mas[1,vlen]:=y;
    GoToXY(x,y);
    write(' ');
    TextBackGround(Black);
    GotoXy(Mas[0,0],Mas[1,0]);
    write(' ');
    {GotoXy(1,1); {Otladka koordinat}
    {Write(vx:3,vy:3, x:3, y:3); {Otladka koordinat}
    Until exitgame In [1,2];
    Until exitgame = 1
    end.
    {end 22 apr 2015 21:12:12 msk} 

    0

  4. Синтез - хорошая вещь, но для него ещё нужно теорию звука подучивать местами. У меня делать пресеты с нуля получается только в несложных синтезаторах вроде Поливокса и YM2612, если же брать какого-нибудь гиганта вроде Absynth или FM8, то там проще и эффективнее допиливать уже имеющиеся пресеты, чем пилить новый с нуля. На новый пресет в них уходит очень много времени.

    Я насилую Massive, в основном. Достаточно гибкий и функциональный синтезатор.
    0

  5. Вечера, ребятки.

    Попробовал сотворить что-то более ритмичное: https://soundcloud.com/chronomantique/heavy-tune-2

    Dune: Battle for Arrakis напомнило.

    А у меня музыка уже месяца два не пишется. =

    Мб потому, что я больше в синтез в последнее время, чем в мелодию.

    0

  6. Всего 73 посмотрел только? ._.

    В первом сезоне 201, во втором 51, в третьем 13, на подходе четвертый

    Вот просто взял такой, раз взял, короче, ну взял, и отпугнул, да, отпугнул меня от просмотра.

    Онгоинг, слишком-многосерийный... Теперь думать, смотреть или не смотреть.

    Онгоинги для меня - боль, учитывая мои страстные чувства и жажду продолжения, если оно объявлено.

    Но хуже онгоинга переносится конец аниме.

    Чем ближе конец, тем больше я боюсь, что история закончится...

    0

  7. Первые две серии филлер и вообще ни о чем.

    Алсо, если не втянешься с первых серий - это норма, со мной так же было.

    Ну, остальные аниме, что в профиле, плюс ещё Атака титанов (Кроме КЛК, я почти весь сюжет знал до просмотра ещё. Но оказалось, что я ошибался даже больше, чем наполовину. Поэтому просмотр открыл много нового. Хотя конец меня всё же разочаровал.) затянули с первой серии...
    0

  8. Если хочешь, чтобы тебе что-то посоветовали, ты уж не ленись просматривать возможные варианты. А то в чем соль?

    Гинтама - шедевр с глубинным смыслом, скрывающимся за своеобразным юмором (:

    Я что-то помню, мне один человек первую серию показывал. Скорее всего анимация или музыка меня оттолкнули. Либо меня просто прервали, и я забыл. Посмотреть успел минуты две, но, ради тебя, попробую снова.

    Может правда годное что...

    0

  9. TTGL, Steins;Gate, какой-нибудь Fate, FMA:Brotherhood, Gintama, Hitsugi no Chaika, Slayers, To aru Majutsu no Index, Uchuu Senkan Yamato 2199. Первое, что в голову пришло.

    TTGL смотрел, Гинтама - говорил уже, Steins;Gate планировал, но по какой-то причине передумал. Остальные гуглить надо... Лень.

    0

×