Article View: pl.comp.lang.delphi
Article #345801Re: hasło płatnika
From: konsul41
Date: Thu, 11 May 2017 07:06
Date: Thu, 11 May 2017 07:06
33 lines
1829 bytes
1829 bytes
W dniu 09-05-2017 o 10:16, konsul41@wp.pl pisze:
> Czy ktoś już dekodował hasło płatnika w delphi?
>
> https://platnik.fork.pl//index.php
> tutaj jest skrypt w perlu ale Ja z perla noga.
> Może ktoś ma i chciałby się podzielić.
>
>
> ---
> Ta wiadomość została sprawdzona na obecność wirusów przez oprogramowanie
> antywirusowe Avast.
> https://www.avast.com/antivirus
>
Jak to przepisać na Delphi
JavaScript
function swap(keys,index,a)
{
var arr,i,s,tmp;
arr=keys[index].split('');
for (s=0;s<16;s+=a<<1)
for (i=s+a;i-->s;)
{
tmp=arr[i];
arr[i]=arr[i+a];
arr[i+a]=tmp;
}
keys[index]=arr.join('');
}
---
Ta wiadomość została sprawdzona na obecność wirusów przez oprogramowanie antywirusowe Avast.
https://www.avast.com/antivirus
Technical Details
Message-ID:
<of12gp$9vq$1@portraits.wsisiz.edu.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!wsisiz.edu.pl!.POSTED.jue163.internetdsl.tpnet.pl!not-for-mailReferences:
<oertsp$1rt$1@portraits.wsisiz.edu.pl>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!wsisiz.edu.pl!.POSTED.jue163.internetdsl.tpnet.pl!not-for-mail From: "konsul41@wp.pl" <konsul41@wp.pl> Newsgroups: pl.comp.lang.delphi Subject: Re: hasło płatnika Date: Thu, 11 May 2017 09:06:03 +0200 Organization: http://www.wit.edu.pl Message-ID: <of12gp$9vq$1@portraits.wsisiz.edu.pl> References: <oertsp$1rt$1@portraits.wsisiz.edu.pl> Mime-Version: 1.0 Injection-Date: Thu, 11 May 2017 07:06:01 -0000 (UTC) Injection-Info: portraits.wsisiz.edu.pl; posting-host="jue163.internetdsl.tpnet.pl:95.48.160.163"; logging-data="10234"; mail-complaints-to="abuse@wsisiz.edu.pl" User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:45.0) Gecko/20100101 Thunderbird/45.8.0 In-Reply-To: <oertsp$1rt$1@portraits.wsisiz.edu.pl> X-Antivirus: Avast (VPS 170510-2, 2017-05-10), Outbound message X-Antivirus-Status: Clean Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit