Требуется помощь реальным пацанам

Все, что вы хотели знать о программизме, но боялись спросить.
Ответить
Аватара пользователя
Гусар в отставке
Графоман
Сообщения: 5472
Зарегистрирован: 12 мар 2008, 19:09
Откуда: RU -> UA -> BC -> OK -> BC -> RU

Требуется помощь реальным пацанам

Сообщение Гусар в отставке »

YoptaScript -- это первый в мире скриптовый язык программирования для гопников и реальных пацанов, транслируемый в чистый JavaScript.

Изображение

Язык находится в процессе глубокой разработки. Рады любой помощи в поиске багов и всем, кто готов помочь нам продолжить начатое!

https://github.com/samgozman/YoptaScript/issues
Аватара пользователя
mikei
Графоман
Сообщения: 46488
Зарегистрирован: 27 мар 2010, 23:37
Откуда: Burnaby, BC

Re: Требуется помощь реальным пацанам

Сообщение mikei »

Лучше расскажите, как сделать чтобы Андроид 12 выглядел, как 11. Этих что теперь тоже как виндоус год ждать пока они всё поправят?
Аватара пользователя
Гусар в отставке
Графоман
Сообщения: 5472
Зарегистрирован: 12 мар 2008, 19:09
Откуда: RU -> UA -> BC -> OK -> BC -> RU

Re: Требуется помощь реальным пацанам

Сообщение Гусар в отставке »

mikei писал(а): 29 окт 2021, 19:17 Лучше расскажите, как сделать чтобы Андроид 12 выглядел, как 11. Этих что теперь тоже как виндоус год ждать пока они всё поправят?
Нормальные пацаны с таким вопросом обращаются прямо в Гугл. Следуйте их примеру.
Аватара пользователя
mikei
Графоман
Сообщения: 46488
Зарегистрирован: 27 мар 2010, 23:37
Откуда: Burnaby, BC

Re: Требуется помощь реальным пацанам

Сообщение mikei »

Вы конечно думаете, что самый умный, и что я в гугл не ходил.
How do I undo the horrible, ugly mess that is Android 12? This doesn't feel like my phone! Yecchh!!!

I don't care what they did under the hood, I just can't stand to look at what they've done to the interface. The look and feel of Android 12 is horrible! Isn't there some way to roll back the look and feel aspects of the latest update?

Also agree with OP, I can't understand how Google make design decisions on the GUI. The new interface looks hideous, I'm utterly disappointed with the upgrade, there are so many design flaws. It looks and feels like a design for young children or elderly (for larger accessibility). Don't get me started on the mile long list of interface design elements that I strongly dislike (overly bulky, too much use of white colour, terrible notification drop-down and shortcuts etc etc. It's definitely Google going in the wrong direction with design, the mind boggles how this version got released.

https://support.google.com/pixelphone/t ... h?hl=en-GB
Аватара пользователя
genebest
Житель
Сообщения: 533
Зарегистрирован: 28 фев 2012, 22:48

Re: Требуется помощь реальным пацанам

Сообщение genebest »

Гусар, хотите Yoptaстепень получить? :D
Аватара пользователя
alpax
Графоман
Сообщения: 10034
Зарегистрирован: 04 мар 2003, 17:39
Откуда: Richmond, BC

Re: Требуется помощь реальным пацанам

Сообщение alpax »

Гусар в отставке писал(а): 29 окт 2021, 18:39 YoptaScript -- это первый в мире скриптовый язык программирования для гопников и реальных пацанов, транслируемый в чистый JavaScript.
Напомнило:

Код: Выделить всё

{***********************************************************

 Program :  OH TOPMO3
 Version :  1.1
 Released:  25 May 1993
 Author  :  Kirill Shirokov
              The Future Hackers Co.
 CoAuthor:  Dmitry Moskovich

  This program illustrates visual effect, when english
  combinations of characters looks like russian text.
  Original idea was researched by Viacheslav Slavinsky
  (Some years ago he wrote genius line: KACEKOB - TOPMO3).

  Copyright by The Future Hackers Co., 1993
  All rights reserved.

************************************************************}

program OH_TOPMO3;

uses
  CRT;

const
  MHOrO_TEKCTOB         = 15;
  nPOPEXA               = nil;

type
  A_KTO_EBO_3HAET       = (HO_KTO_TO_BEgb_3HAET, BCE_ETO_BECbMA_CTPAHHO);

  HyMEP                 = Byte;

  CTPOKA                = String[15];

  TEKCTuK               = record
                            OHA: CTPOKA;
                            TOPMO3: HyMEP;
                          end;

  TAM_ABTOMAT           = ^ABTOMAT;

  ABTOMAT               = object
                            MOE_X, MOE_Y: HyMEP;
                            TEKCTOB_BCEBO: HyMEP;
                            TEKCTbl: array[1..MHOrO_TEKCTOB] of TEKCTuK;
                            KAKOE: HyMEP;
                            TOPMO3uM: HyMEP;
                            XPEH_EMy: TAM_ABTOMAT;

                            constructor BOT_EBOHOE_MECTO(X, Y: HyMEP);
                            procedure BOH_ETOT_XPEH(KOMy_XPEH: TAM_ABTOMAT);
                            procedure ETO_CTPOKA(OHA_CAMA: CTPOKA;
                                                 EE_TOPMO3: HyMEP);
                            procedure BblBOg;
                          end;

  XMblPb                = object
                            HE_KACEKOB: A_KTO_EBO_3HAET;
                            KTO_TAM_CAMOE_TAKOE: TAM_ABTOMAT;

                            constructor Hy_HuKAK_MHE_EBO_HE_HA3BATb;
                            procedure B_nyTb;
                            procedure u_EBO_TO3E
(uMEHHO_ETO_MOXHATOE_OHO_CAMOE:
TAM_ABTOMAT);
                        end;


procedure BAM_TEMHO;
begin
  ClrScr;
end;


procedure TOPMO3HyTb(CKOKO: HyMEP);
begin
  Delay(CKOKO);
end;


procedure rge_EMy_KBACuTb(EBO_X, EBO_Y: HyMEP);
begin
  GoToXY(EBO_X, EBO_Y);
end;


function WyXEP: Boolean;
begin
  WyXEP := KeyPressed;
end;


constructor ABTOMAT.BOT_EBOHOE_MECTO(X, Y: HyMEP);
begin
  MOE_X           := X;
  MOE_Y           := Y;
  TEKCTOB_BCEBO   := 0;
  KAKOE           := 0;
  TOPMO3uM        := 0;
end;


procedure ABTOMAT.BOH_ETOT_XPEH(KOMy_XPEH: TAM_ABTOMAT);
begin
  XPEH_EMy := KOMy_XPEH;
end;


procedure ABTOMAT.ETO_CTPOKA(OHA_CAMA: CTPOKA; EE_TOPMO3: HyMEP);
begin
  if TEKCTOB_BCEBO < MHOrO_TEKCTOB then begin
    Inc(TEKCTOB_BCEBO);
    with TEKCTbl[TEKCTOB_BCEBO] do begin
      OHA    := OHA_CAMA;
      TOPMO3 := EE_TOPMO3;
    end;
  end;
end;


procedure ABTOMAT.BblBOg;
begin
  if TEKCTOB_BCEBO > 0 then begin
    if TOPMO3uM = 0 then begin
      Inc(KAKOE);
      if KAKOE > TEKCTOB_BCEBO then KAKOE := 1;
      rge_EMy_KBACuTb(MOE_X, MOE_Y);
      with TEKCTbl do begin
         Write(OHA);
         TOPMO3uM := TOPMO3;
      end;
    end;
    Dec(TOPMO3uM);
  end;
end;


constructor XMblPb.Hy_HuKAK_MHE_EBO_HE_HA3BATb;
begin
  KTO_TAM_CAMOE_TAKOE := nPOPEXA;
  HE_KACEKOB := BCE_ETO_BECbMA_CTPAHHO;
end;


procedure XMblPb.u_EBO_TO3E(uMEHHO_ETO_MOXHATOE_OHO_CAMOE: TAM_ABTOMAT);
begin
  if KTO_TAM_CAMOE_TAKOE = nPOPEXA then begin
    KTO_TAM_CAMOE_TAKOE := uMEHHO_ETO_MOXHATOE_OHO_CAMOE;
    uMEHHO_ETO_MOXHATOE_OHO_CAMOE^.XPEH_EMy :=
uMEHHO_ETO_MOXHATOE_OHO_CAMOE;
  end
  else begin
    uMEHHO_ETO_MOXHATOE_OHO_CAMOE^.XPEH_EMy :=
KTO_TAM_CAMOE_TAKOE^.XPEH_EMy;
    KTO_TAM_CAMOE_TAKOE^.XPEH_EMy := uMEHHO_ETO_MOXHATOE_OHO_CAMOE;
  end;
end;


procedure XMblPb.B_nyTb;
var
  ETOT_PAXuT: TAM_ABTOMAT;

begin
  ETOT_PAXuT := KTO_TAM_CAMOE_TAKOE;

  while not WyXEP do
    with ETOT_PAXuT^ do begin
      BblBOg;
      ETOT_PAXuT := XPEH_EMy;
      rge_EMy_KBACuTb(1, 10);
      TOPMO3HyTb(10);
    end;
end;


procedure BAM_XOPOWO;
begin
  BAM_TEMHO;
  WriteLN(''OH TOPMO3 v1.0  Copyright The Future Hackers, 1993'');
  WriteLN('' . Written by Kirill Shirokov and Dmitry Moskovich, May 93'');
  WriteLN;
end;


var
  EBO_3EHKu,
  EBO_HOC,
  EBO_POT,
  EBO_XBOCT      : ABTOMAT;

  KACEKOB       : XMblPb;


begin
  with KACEKOB do begin
    Hy_HuKAK_MHE_EBO_HE_HA3BATb;
    with EBO_3EHKu do begin
      BOT_EBOHOE_MECTO(1, 1);
      ETO_CTPOKA(''-  -'', 20);
      ETO_CTPOKA(''o  o'', 3);
      ETO_CTPOKA(''O  O'', 16);
      ETO_CTPOKA(''0  0'', 23);
      ETO_CTPOKA(''O  O'', 14);
      ETO_CTPOKA(''o  o'', 5);
    end;
    u_EBO_TO3E(@EBO_3EHKu);

    with EBO_HOC do begin
      BOT_EBOHOE_MECTO(1, 2);
      ETO_CTPOKA('' .. '', 21);
      ETO_CTPOKA('' oo '', 16);
    end;
    u_EBO_TO3E(@EBO_HOC);

    with EBO_POT do begin
      BOT_EBOHOE_MECTO(1, 3);
      ETO_CTPOKA('' -- '', 22);
      ETO_CTPOKA('' == '', 4);
      ETO_CTPOKA(''-==-'', 6);
      ETO_CTPOKA(''/--'', 19);
      ETO_CTPOKA(''----'', 16);
      ETO_CTPOKA(''==/'', 21);
      ETO_CTPOKA(''----'', 3);
    end;
    u_EBO_TO3E(@EBO_POT);

    BAM_TEMHO;
    B_nyTb;
    BAM_XOPOWO;
  end;
end.

{***********************************************************} 
Ответить