Saturday, December 12, 2020

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 3D fps AAA 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.


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












++

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

Thursday, December 3, 2020

Keyboard keystroke sounds on your Windows 10 & 11 * Please Sound Up your keyboard with this incredible application for Windows.

FREE DOWNLOAD  -

 FREEWARE FOR WINDOWS XP, 7, 8, 10, 11:

https://drive.google.com/file/d/1Un37vS7phL3LDId4b8h8KXkzFdKTStKT/view?usp=sharing

Please Sound your keyboard with this incredible application for Windows - FREEWARE DOWNLAD:

Keystroke sounds 88 for Windows 10, 11, ◄ ♫ click here for free download now ! ♫



My old dear friend (1987-1994) !
This nice peace of hardware has sound keyboard idea first, or it was Spectrum ?

Dva puta raspakujte ZIP sa lozinkom : raspakuj

Two time UnZip with password : raspakuj

Even more freeware for you...:




More tips from Tech:

https://www.instructables.com/555-Capacitor-Tester/?utm_source=newsletter&utm_medium=email







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

Wednesday, December 2, 2020

I will find you !

 https://tools.keycdn.com/geo

IP Location Finder API#

Get the IP geolocation data through the simple REST API. All the responses are JSON encoded. We are rate limiting requests (3r/s) to avoid overload of the system.

https://tools.keycdn.com/geo.json?host=93.82.84.24

What is my IP ?

https://www.infosniper.net/




MORE TIPS:




wmic memorychip list full

wmic diskdrive list full

wmic baseboard list full

wmic cdrom list full

pause




uses MMSystem;

procedure TForm1.Button1Click(Sender: TObject);
begin
  sndPlaySound('C:\Windows\Media\Tada.wav',
    SND_NODEFAULT Or SND_ASYNC Or SND_LOOP);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  sndPlaySound(nil, 0); // Stops the sound
end;

Tuesday, December 1, 2020

Play MIDI from memory stream

{
Create a new text file, and write: MIDI RCDATA 1.mid, save text file as MID.rc Then create a new text file, and write: brcc32 mid.rc, save it as "brcc.bat"
run the brcc.bat, to convert *.rc file to *.res Move MediaPlayer to your form (the media player is on the "System"tab). Now copy this code to Your project:
}

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, MPlayer;

type

TForm1 = class(TForm)

mplayer: TMediaPlayer;

procedure FormCreate(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

{$R *.dfm}

{$R mid.res}

procedure TForm1.FormCreate(Sender: TObject);

var

stream:tresourcestream;

tmp:string;

begin

try

stream:=tresourcestream.Create(hinstance,'MIDI',RT_RCDATA);

try

setlength(tmp,300);

setlength(tmp,GetTempPath(300,pchar(tmp)));

tmp:=tmp+inttostr(hinstance)+'.mid';

stream.SaveToFile(tmp);

finally

stream.free;

end;

mplayer.FileName:=tmp;

mplayer.Open;

mplayer.Play;

except

end;

end;


end.

{
this is the easiest example. So, keygens use a special sound format - *.XM, the file is read into memory from a resource and played using libraries like FMOD (read more in internet)
}



OBS


The best way to save your Zoom session in mp4 on Windows and Linux.