Dear Milis Mau tanya apakah temen2 ada yang punya aplikasi program kriptografi (Enkripsi-Dekripsi) dengan algoritma Asimetri. Algoritma seperti halnya algortima RSA. Yang dibangkitakan dari 2 bilangan prima yang sedomain, kemudian dicari nilai e,n, dan d nya yg merupakan kunci pribadi dan kunci publiknya. Tx informasi sblmnya. Salam Hartono

Saya Punya Contohnya Pak, tp Algoritma Asimetri : program Crypt; {$APPTYPE CONSOLE} uses Windows; var key, text, longkey, hasil : string; i : integer; toto, c : char; F : TextFile; begin writeln('Masukkan kunci enkripsi:'); readln(key); writeln('Masukkan plaintext:'); readln(text); for i := 0 to (length(text) div length(key)) do longkey := longkey + key; for i := 1 to length(text) do begin toto := chr((ord(text[i]) XOR ord(longkey[i]))); // XOR algorithm hasil := hasil + toto; end; writeln('Hasil enkripsi dalam bentuk chipertext adalah :'); writeln(hasil); write('Hasil enkripsi akan disimpan dalam file *.txt [Y/N]? '); read(c); if c in ['Y','y'] then begin AssignFile(F,'Hasil.txt'); Rewrite(F); Writeln(F,Hasil); CloseFile(F); end; end.

Ada komponen yang isinya kumpulan enkripsi-dekripsi, kalo gak salah namanya Delphi Encryption Compendium Part I-III buatan Hagen Reddmann, mungkin bisa dijadikan pertimbangan, berikut cuplikan file readme-nya: [code:1:6e0be83179] Copyright: Hagen Reddmann mailto:HaReddmann@AOL.COM Author: Hagen Reddmann Remarks: freeware, shareware Description: Delphi Encryption Compendium Part I-III D2-D5, BCB3-4 DEC Part I ----------------------------------------------- Status: Freeware, Version 3.0 Description: Includes variuos basicly Algorithm: 5 Checksum: CRC32, XOR32bit, XOR16bit, CRC16-CCITT, CRC16-Standard 23 Hash: MD4, MD5, SHA (other Name SHS), SHA1, RipeMD128, RipeMD160, RipeMD256, RipeMD320, Haval (128, 160, 192, 224, 256) with Rounds, Snefru, Square, Tiger Sapphire II (128, 160, 192, 224, 256, 288, 320) 40 Cipher: Gost, Cast128, Cast256, Blowfish, IDEA Mars, Misty 1, RC2, RC4, RC5, RC6, FROG, Rijndael, SAFER, SAFER-K40, SAFER-SK40,SAFER-K64, SAFER-SK64, SAFER-K128, SAFER-SK128, TEA, TEAN, Skipjack, SCOP, Q128, 3Way, Twofish, Shark, Square, Single DES, Double DES, Triple DES, Double DES16, Triple DES16, TripleDES24, DESX, NewDES, Diamond II, Diamond II Lite, Sapphire II 2 RNG: Standard Random Generator, Linear Feedback Shift Register RNG with variable Period from 2^64-1 to 2^2032-1. 6 Text Formats: Hexadecimal, MIME Base 64, Plain, RFC1760 Six Word, UU Coding, XX Coding others: Low Level API to access outside from Delphi and BCB Fast implementation (i.E. THash_MD4 > 27Mb/sec, TCipher_Blowfish > 8.0 Mb/sec) Stringformat Management, includes: HEX, MIME Base 64, RFC1760 Six Word, UU and XX Coding String converting and Samples Designtime Manager Components for Hash's and Cipher's Full and easy objectorientated RNG's can be cryptographicaly secure Standard Cipher Modes: CBC - Cipher Block Chaining CTS - Cipher Text Stealing CFB - Cipher Feedback OFB - Output Feedback ECB - Electronic Code Book CBCMAC - CBC Message Authentication Code CTSMAC - CTS Message Authentication Code CFBMAC - CFB Message Authentication Code High optimized Assembler Core Progress Gauge Support in all Cipher's, Hash's, CheckSums's Self Test Support for all Cipher's, Hash's, CheckSums's to test of any illegal or incorrect Modification's Detailed and full DEMO variable HMAC's - Hash Message Authentication Code Support for all THash_XXX Classes, supports RFC2104 Standard HMAC's automatically Compression Support Chaining from all THash_XXX, TRandom_XXX, TCipher_XXXX and TCompress_XXX Classes En/Decryption/Scrambling/Wipe with all TProtection Classes, this includes all Hash's, Cipher's, Random's and Compress's Classes Internet RFC2289/RFC1760/RFC2444 One Time Password Routines as Component many more... Installation: install \DEC\Source\DECReg.pas in Your Palette DEC Part II ------incomming, not included----------------------------------------- Status: Shareware, Version Beta Description: Asymmetric (Public Key) Encryption, Digital Signatures Blum Blum Shub RNG, mathematical Big Number Library, Steganography DEC Part III -----incomming, not included----------------------------------------- Status: Shareware, Version Beta Description: Variuos Objects and Classes to use Part I and II TSecureRegINI Object, encapsulate the TINIFile and TRegINIFile class to en/decode defined Entries * TOneTimePassword, Component for a secure One Time Password ------------------------------------------------------------------------------------------- [/code:1:6e0be83179]

dapetinnya di mana tuh komponen?? gratis gak?

kaloyang DEC Part I free, tapi yang Part II dan Part III, itu shareware...

Ikut melengkapi ... ;) TurboPower LockBox ---------------------------- Komponen dan juga contoh programnya ada banyak, RSA nya juga lengkap, Dokumtasi PDF dan Help nya juga bagus... sayang kalo gak dicoba ... :) http://sourceforge.net/projects/tplockbox/

Dear deLogic Komponen Delphi Encryption Compendium Part I-III buatan Hagen Reddmann aksesnya dari situs apa? Tak search kok gak ketemu Tx. Sebelumnya

wah gw juga udah lupa, kalo gak salah dulu dapat dari torry kali ya.....

Dear DeLogic Detail site Torri apa ya?

http://torry.net