Thursday, December 17, 2020

Alternative gaming

 ++


https://www.howtogeek.com/696395/how-to-password-protect-applications-on-windows-10/


LINUX AS ROUTER WITH 2 NICs:

https://help.ubuntu.com/community/ShorewallBasics


https://superuser.com/questions/796609/simple-linux-router-with-two-nics


https://www.instructables.com/Multiple-network-cards/


Sirt dijeta - način ishrane

Ovo su neke od namirnica koje aktiviraju lučenje sirtuina. Od pića tu su: zeleni čaj, matcha zeleni čaj, nezaslađena crna kafa, crveno vino (posebno Pinot noir). Od voća i povrća preporučuju se citrusi, jabuka, borovnica, celer, kelj, crveni luk, rukola, crvena cikorija, od začina peršun i kurkuma. Ono što će obradovati sladokusce je da se preporučuje unos crne čokolade s minimum 75 odsto kakaa, a možete konzumirati i orahe, maslinovo ulje, heljdu, losos, gambore.

Dijeta se sprovodi po nedeljnom rasporedu i bazira se na restriktivnom unosu kalorija. Prva tri dana se unosi samo 1.000 kalorija dnevno i to konzumiranjem 3 smutija i jednog obroka napravljenog od namirnica sa spiska preporučene hrane. Od četvrtog do sedmog dana unosi se 1.500 kalorija dnevno i to uz dva smutija i dva obroka.

U blender ubacite 1 jabuku, par jagoda, šaku preporučenog zeleniša, dodajte malo đumbira i kurkume i sve to dobro izmiksate (dodati vode). Postoje i razne varijacije.

Kako dijeta deluje?

Ukoliko želite da dijeta radi, obavezno je i vežbanje. U drugoj fazi se radi o održavanju i to traje dve nedelje, kada unosite tri obroka i jedan smuti. Posle toga osoba koja je drži može da ponovi ceo proces (počevši od prve nedelje) ili se zadržati na drugoj fazi održavanja.

Nutricionisti su ipak istakli da je ova dijeta mač sa dve oštrice. Prvo inicijalni gubitak kilograma može biti rezultat gubitka tečnosti, a onda se kilaža vraća, pa se ljudi često vraćaju starim prehrambenim navikama. Drugo - svako ko želi da smrša neće efektivno i bezbedno to uraditi uz pomoć ovako velikog kalorijskog deficita.

Nezdravo je unositi manje od 1.200 kalorija dnevno, a kada ne unosite u organizam sve što vam treba da biste imali dovoljno energije, telo traži da nadoknadite. Zato se sva izgubljena kilaža brzo vraća, a često kao jo-jo efekat, bude čak i veća nego inicijalna.

Stručnjaci kažu da buduće mlade često pribegavaju ovakvim restriktivnim dijetama da bi smršale na brzinu i da su baš zbog toga razdražljive i nervozne pre venčanja.


++

Tuesday, December 15, 2020

WINDOWS 10 SOUND KEYBOARD

Vrh aplikacija koja zaista dodaje novu vrednost svakoj tastaturi i Vašem kompjuteru:

 WINDOWS 10 SOUND KEYBOARD (FREEWARE DOWNLOAD)

password = raspakuj

Unesite password dva puta, Please enter the password twice !


************************************
Drugari, ja svoje aplikacije pravim prvenstveno da bi bile dobre i korisne za mene i moje potrebe, ako se i Vama dopadaju, kontaktirajte me, otvoren sam za svaki predlog i saradnju.

Počnemo da radimo ono što želimo!

koja će Vam dati novu energiju i entuzijazam, ako koristite računar u svakodnevnom radu !

Stavite slušalice ili odvrnite zvučnike i počnite da kucate najkvalitetniji sadržaj ikada.

************************************

MORE WINDOWS TIPS:


Dobar mail klijent pisan u Delphi-ju:
http://www.koma-code.de/



MORE LINUX TIPS:


sudo apt-get install snapd

MORE ELECTRONICS TIPS:




MORE DELPHI TIPS:

procedure TForm1.ApplicationEvents1Minimize(Sender: TObject);
begin
  { Hide the window and set its state variable to wsMinimized. }
  Hide();
  WindowState := wsMinimized;

  { Show the animated tray icon and also a hint balloon. }
  TrayIcon1.Visible := True;
  TrayIcon1.Animate := True;
  TrayIcon1.ShowBalloonHint;
end;

procedure TForm1.FormCreate(Sender: TObject);
var
  MyIcon : TIcon;
begin
  { Load the tray icons. }
  TrayIcon1.Icons := TImageList.Create(Self);
  MyIcon := TIcon.Create;
  MyIcon.LoadFromFile('icons/earth1.ico');
  TrayIcon1.Icon.Assign(MyIcon);
  TrayIcon1.Icons.AddIcon(MyIcon);

  MyIcon.LoadFromFile('icons/earth2.ico');
  TrayIcon1.Icons.AddIcon(MyIcon);
  MyIcon.LoadFromFile('icons/earth3.ico');
  TrayIcon1.Icons.AddIcon(MyIcon);
  MyIcon.LoadFromFile('icons/earth4.ico');
  TrayIcon1.Icons.AddIcon(MyIcon);

  { Set up a hint message and the animation interval. }
  TrayIcon1.Hint := 'Hello World!';
  TrayIcon1.AnimateInterval := 200;

  { Set up a hint balloon. }
  TrayIcon1.BalloonTitle := 'Restoring the window.';
  TrayIcon1.BalloonHint :=
    'Double click the system tray icon to restore the window.';
  TrayIcon1.BalloonFlags := bfInfo;
end;

procedure TForm1.TrayIcon1DblClick(Sender: TObject);
begin
  
  { Hide the tray icon and show the window,
  setting its state property to wsNormal. }
  TrayIcon1.Visible := False;
  Show();
  WindowState := wsNormal;
  Application.BringToFront();
end;

Friday, December 11, 2020

XL programming language

 https://sourceforge.net/projects/xlr/


Technologies:

  • Golang/Python
  • Postgres (SQL)
  • Redis
  • gRPC/Protocol Buffers
  • Kubernetes/Docker

Expections:

  • Golang experience
  • Production experience writing in a high-level programming language (i.e.Java, Python, Ruby, etc)
  • Demonstrable knowledge building out CI/CD pipelines
  • Demonstrable knowledge of web architecture patterns (API design, data pipelines, efficient algorithms)
  • Degree in computer science or related experience

Nice to have:

  • Golang experience
  • Kubernetes experience
  • Protobuf/gRPC exposure
  • Google Cloud Platform/AWS experience


OTHER Extensible Languages:


CHERRY ON THE CAKE:



DXVK

A Vulkan-based translation layer for Direct3D 9/10/11 which allows running 3D applications on Linux using Wine.

For the current status of the project, please refer to the project wiki.

https://lutris.net/

https://www.playonlinux.com/en/

https://www.winehq.org/

https://store.steampowered.com/

Another way:

https://gamer-os.github.io/

Neverovatno dobar Linux:

https://antixlinux.com/

Drugari, kada instalirate Antix, sledeća stvar je da odmah instalirate GDEBI i Synaptic, kako bi posle što jednostavnije instalirali DEB fajlove i ostale instalacije aplikacija na sistem.

Instalirajte i Libre Office paket, zatim instalirajte PlayOnLinux i STEAM (za igranje 3D fps AAA igrica i startovanje Windows 10 aplikacija).

Možete instalirati i Skype tako što sa Skype sajta skinete odgovarajući Debian fajl i instalirate ga pomoću GDEBI aplikacije (desni klik miša na instalaciju Skype.deb, pa odaberete gdebi).

Na isti način instalirajte Zoom koji preuzmete sa zoom.us vebsajta u deb (debian) formatu.

Sada je Vaše dete spremno za daljinsku nastavu tokom Covid-19 perioda.

Poenta je da ANTIX radi mnogo brže i pouzdanije od Windows 10 operativnog sistema na kompjuterima iste snage.

Drugari, ako Vam se Windows 10 update-uje, štuca, trokira i često restartuje, pravo je vreme da ga zamenite stabilnim i brzim ANTIX-om.

ANTIX Vas neće nikada izneveriti, a daje sve što i Windows 10 i mnogo više.

Nemojte da gubite časove i školsko online gradivo zbog ćudljivog i nepouzdanog Windows 10 operativnog sistema.

Svako dobro !

I jedna poslovica za kraj:

"Samo budala ne menja mišljenje !"

Nadam se da će te Vi promeniti mišljenje što se tiče Windows 10. 

Thursday, December 10, 2020

VLC komande

 

Prečice na tastaturi koje će vam olakšati i ubrzati rad sa VLC Media Player-om

na Windows operativnom sistemu.

Reprodukcija

  • Space - Pauza ili nastavak reprodukcije
  • S - Stop
  • + - Brža reprodukcija
  • - - Sporija reprodukcija
  • = - Normalna brzina reprodukcije
  • Shift + leva strelica - Nazad 3 sekunde
  • Shift + desna strelica - Napred 3 sekunde
  • Alt + leva strelica - Nazad 10 sekundi
  • Alt + desna strelica - Napred 10 sekundi
  • Control + leva strelica - Nazad 1 minut
  • Control + desna strelica - Napred 1 minut
  • Control + Alt + leva strelica - Nazad 5 minuta
  • Control + Alt + desna strelica - Napred 5 minuta
  • N - Sledeće
  • P - Prethodno
  • T - Pozicija / vreme
  • L - Normalno / ponovi sve /ponovi jednu datoteku
  • E - Sledeći frejm
  • Shift + M - Meni DVD-a
  • Shift + O - Prethodni naslov
  • Shift + B - Sledeći naslov
  • Shift + P - Prošlo poglavlje
  • Shift + N - Sledeće poglavlje
  • Ctrl + Q - Izlaz

Zvuk

  • J - Smanjenje kašnjenja zvuka
  • B - Promena zvučne pozadine
  • Shift + A - Promena izvora
  • Ctrl + Strelica gore - Pojačavanje zvuka
  • Ctrl + Strelica dole - Stišavanje zvuka
  • M - Sasvim utišajte zvuk

Ekran

  • I - Prikaz kontrola na celom ekranu
  • Z - Zumiranje slike
  • Shift + Z - Resetovanje zuma
  • F - Aktiviranje ili deaktiviranje prikaza na celom ekranu
  • Escape - Izazak iz prikaza preko celog ekran / menija
  • Page Up - Smanjenje prozora
  • Page Down - Proširivanje prozora

Liste reprodukcije

  • Ctrl + F1 - F10 - Postavljanje oznaku od 1 do 10
  • F1 - F10 - Reprodukcija od oznake 1 do 10
  • Ctrl + W - Čišćenje liste reprodukcije
  • Ctrl + Y - Snimanje liste reprodukcije

Titlovi

  • Ctrl + 0 - Resetovanje veličinu titlova
  • Ctrl + točkić miša na gore - Povećavanje veličine titlova
  • Ctrl + točkić miša na dolje - Smanjenje veličine titlova
  • G - Smanjenje kašnjenja titlova
  • H - Povećanje kašnjenja titlova
  • Shift + H - Sinhronizovanje titlova
  • V - Menjanje titlova
  • Shift + V - Aktiviranje / deaktiviranje prikaza titlova

Meni i podešavanja

  • Ctrl + B - Oznake
  • Ctrl + C - Otvaranje uređaja za snimanje
  • Ctrl + D - Otvaranje diska
  • Ctrl + E - Prošireni meni
  • Ctrl + F - Otvaranje mape
  • Ctrl + H - Prikaz / sakrivanje menija
  • Ctrl + I - Informacija o medijima
  • Ctrl + J - Informacija o kodecima
  • Ctrl + L - Prikaz / sakrivanje spiska za reprodukciju
  • Ctrl + M - Poruke
  • Ctrl + N - Otvaranje strima na mreži
  • Ctrl + O - Otvaranje datoteke
  • Ctrl + P - Meni
  • Ctrl + R - Konvertovanje
  • Ctrl + S - Striming
  • Ctrl + T - Pomeranje na neko vreme reprodukcije
  • Ctrl + V - Obeležavanje lokacije
  • Ctrl + Shift + W - VLM konfigurator
  • Alt + A - Audio meni
  • Alt + H - Meni za pomoć
  • Alt + L - Meni za reprodukciju
  • Alt + M - Meni za medije
  • Alt + S - Meni za alate
  • Alt + T - Meni za titlove
  • Shift + S - Izrada skirnšota
  • Shift + R - Snimanje




uses
  PNGImage;

procedure TForm1.Button1Click(Sender: TObject);
var
  PNGImage: TPNGImage;
  BlobStream: TMemoryStream;
begin
  // create the PNG image instance
  PNGImage := TPNGImage.Create;
  try
    // assuming you have in the BlobStream variable the image from a DB loaded
    PNGImage.LoadFromStream(BlobStream);
    // setup the text background to be transparent
    PNGImage.Canvas.Brush.Style := bsClear;
    // optionally configure the font
    PNGImage.Canvas.Font.Size := 11;
    PNGImage.Canvas.Font.Color := clRed;
    PNGImage.Canvas.Font.Style := [fsBold];
    // and render it to the image's canvas
    PNGImage.Canvas.TextOut(5, 5, 'SomeText');
    // save this modified image to the file
    PNGImage.SaveToFile('c:\picture.png');
  finally
    // and finally free the PNG image instance
    PNGImage.Free;
  end;
end;


//------------------

uses
  GraphUtil, PNGImage;

procedure CreateCard(const AFileFile: string; AImage: TPNGImage;
  const AName, ASurname: string);
begin
  with TPNGImage.CreateBlank(COLOR_RGB, 8, 330, 160) do
  try
    GradientFillCanvas(Canvas, clWhite, $000080FF,
      Canvas.ClipRect, gdVertical);
    Canvas.StretchDraw(Rect(18, 18, 108, 108), AImage);
    Canvas.Pen.Width := 2;
    Canvas.Brush.Style := bsClear;
    Canvas.Rectangle(5, 5, Width - 4, Height - 4);
    Canvas.Font.Size := 12;
    Canvas.Font.Style := [fsBold];
    Canvas.TextOut(110, 30, 'Form:  ' + AName + '  :.');
    Canvas.TextOut(125, 60, 'Genus:  ' + ASurname + '  :.');
    SaveToFile(AFileFile);
  finally
    Free;
  end;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  PNGImage: TPNGImage;
begin
  PNGImage := TPNGImage.Create;
  try
    // here you will load the image blob (by using LoadFromStream)
    // instead of LoadFromFile
    PNGImage.LoadFromFile('d:\llamas.png');
    CreateCard('d:\visit-card.png', PNGImage, 'Alpaca', 'Lama');
  finally
    PNGImage.Free;
  end;
end;

//-----------------------------------
//  Second
//-----------------------------------

procedure TForm1.Button1Click(Sender: TObject);
begin
  with 
Image1.Picture.Bitmap.Canvas do
  begin
    
Font.Color  := clBlue;
    Brush.Style := bsclear;
    Font.Size   := 13;
    TextOut(10, 10, 'Transparent Text!!');
  end;
end;

{**** Or / Oder ****}

procedure TForm1.Button1Click(Sender: TObject);
var
  
OldBkMode: integer;
begin
  with 
Image1.Picture.Bitmap do
  begin
    
Canvas.Font.Color := clBlue;
    OldBkMode         := SetBkMode(Canvas.Handle, Ord(TRANSPARENT));
    Canvas.Font.Size  := 13;
    Canvas.TextOut(10, 10, 'Transparent Text!!');
    SetBkMode(Canvas.Handle, OldBkMode);
  end;
end;


Android on PC

 https://primeos.in/download/


PRC made:

http://www.phoenixos.com/en_US/phoenixos












++

++++++++++++++++++++++++