;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;ENIGMA V2 THE GREAT WAR TIME COMMUNICATION TOOL;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;CREATE INVISIBLE DOCUMENT WITH KEY;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;READ INVISIBLE DOCUMENT IN FEW CLICKS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;AMOVIBLE DRIVE EASY TRANSFERT BUTTON;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;MAIL CLIENT USING ENIGMA ALGORITHM;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;SEND INVISIBLE EMAIL UNREADABLE WITHOUT THE KEY;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;SHARE THE INVISIBLE MESSAGE DIRECT IN MAIL BODY OR IN ATTACHED FILE;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;SHARE OR NOT THE KEY FILE WITH THE MESSAGE;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;SOON :;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;MULTIPLE RECIPIENT;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;FILE RECIPIENT;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;AUTOMATIC SENDING WHEN BACK ONLINE;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;UAUTH 2.0 SERVER SUPPPORT;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;SCHEDULE SENDING;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;TABULATION;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;MINIMIZE BUTTON;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;DESKTOP SHORTCUT;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;WHAT IT LOOK LIKE :;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;DOCUMENT WITH MESSAGE AND KEY: https://i.ibb.co/7J7Czqf/document-key.png;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;WHAT THE SIMPLE SOFTWARE LOOK LIKE: https://i.ibb.co/HG9N0jR/enigmav2.png;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;EMAIL WITH DOCUMENT IN MAIL BODY: https://i.ibb.co/SP4nHht/Invisible-mail.png;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;SUPPORT ONLY ENGLISH CHARACTERS - NO RUSSIAN - CHINESE - ARAB - GREEK;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;INSTALLATION GUIDE :;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;THIS IS AN AWASOME IRC SCRIPT SO YOU'LL NEED TO INSTALL MIRC FIRST;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;IF YOU CAN'T AFFORD THE PRICE, REQUEST ME A SOLUTION : SOULIER668@OUTLOOK.COM;;;;;;;;;;;;;;;;;;;;;; ;;;https://www.mirc.com/get.html;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;AFTER INSTALLATION, YOU'LL NEED TO COPY THE SCRIPT AT THE GOOD LOCATION;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;ONCE MIRC LAUNCHED USE THE DOWN BAR AND TYPE THIS FOR OPEN APP DIR;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;//RUN $MIRCDIR;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;DOWNLOAD THE SCRIPT ARCHIVE WITH SCRIPT - BIN & IMGS FILES;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;https://ufile.io/fww4jvsl;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;PLACE THE ENIGMAV2 DOCUMENT IN $MIRCDIR FOLDER;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;NOW IT'S TIME THE LOAD THE SCRIPT - RETURN TO MIRC DOWN BAR AND TYPE:;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;//LOAD -rs ENIGMAV2\ENIGMAV2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;* Loaded script 'C:\Users\xxxxx\AppData\Roaming\mIRC\ENIGMAV2\ENIGMAV2';;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;NOW JUST LAUNCH THE APP WITH F11 KEY;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;IN THE APP THERE TWO EDITS BOX:;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;1) FOR THE DOCUMENT NAME \OR\ MAIL RECIPIENT;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;IF EMPTY OR CONTAIN A RECIPIENT, A GENERIC NAME WILL BE CREATED;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;2) THE BODY SECTION, WHERE YOU INSERT YOUR MESSAGE;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;EDIT AUTOMATICALY REPLACE SPACE WITH * CHARACTER. USE * OR USE YOUR OWN SEPARATOR;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;BUTTONS:;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;1) CREATE: CREATE INVISIBLE DOCUMENT WITH KEY [OFFLINE];;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;2) READ: READ INVISIBLE DOCUMENT ON THE FLY [OFFLINE];;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;3) SETTINGS: SAVE SOFTWARE AND SMTP SERVER INFORMATIONS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;4) USB: CREATE & TRANSFERT DIRECTLY ON AMOVIBLE DEVICE;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;5) SEND MAIL TO RECIPIENT(S) [ONLINE];;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;6) BODYCLIP: ATTACH THE DOCUMENT TO THE MAIL INSTEAD USING BODY;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;7) KEYCLIP: ATTACH THE KEY FILE TO THE MAIL TOO;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;SOFTWARE USE NOTEPAD AND SIMULATE KEY STROKES FOR READING INVISIBLE DOCUMENT;;;;;;;;;;;;;;;;;;;;;;; ;;;BE SURE YOU DIDN'T SCRATCH OR DELETED THIS PROGRAM;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;DOCUMENT AND KEY HAVE TO BE IN THE SAME DIRECTORY FOR DECRYPTING;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;YOU CAN USE OUTLOOK SMTP SERVER PRESENT BY DEFAULT BY ENTERING YOUR CURRENT LOGIN INFO;;;;;;;;;;;;; ;;;EVERY SENSIBLE INFORMATION YOU FILL THERE WILL BE CONVERT INTO INVISIBLE DOCUMENT TOO;;;;;;;;;;;;;; ;;;YOU'RE LOGIN INFORMATIONS WILL AUTOMATICALY BE DELETED FROM THE SETTINGS FILE AFTER SAVING IT;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;IF ONLY ONE AMOVIBLE DEVICE IS DETECTED, FILE WILL AUTOMATICALY BE TRANSFERED ON;;;;;;;;;;;;;;;;;;; ;;;IF THERE MULTIPLE DEVICES, YOU'LL HAVE TO CHOOSE WICH ONE YOU WANT TO USE;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;SOFTWARE DON'T GIVE A F*** WHEN:;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;YOU TRY TO CREATE A DOCUMENT WITH NO CONTENT IN BODY;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;YOU PRESS THE USB BUTTON WITHOUT AMOVIBLE DRIVE INSERTED;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;YOU PRESS THE SEND BUTTON WITHOUT A VALID SMTP SERVER CONFIGURATED;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;YOU PRESS THE SEND BUTTON WHILE YOU JUST OFFLINE;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;YOU PRESS THE SEND BUTTON WHILE YOU SET THE TLS ON AND DIDN'T CONFIGURATED LOGIN INFORMATIONS;;;;;; ;;;YOU PRESS THE SEND BUTTON WITHOUT ANY RECIPIENT;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;YOU DON'T NEED TO SPECIFY THE MAIL SUBJECT BUT YOU CAN SET ONE IN SETTINGS FILE;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;FOR APPLYING THE TRANSPARENCY, JUST RELOAD THE SOFTWARE;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;NEVER GO BELOW 100;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;THIS IS THE GREATEST WAR COMMUNICATION TOOL SINCE THE INVENTION OF THE FIRST ENIGMA MACHINE;;;;;;;; ;;;DOCUMENT OR MAIL WITHOUT KEY WILL NEVER BE BROKED, YOU CAN TRUST THIS SOFTWARE AS YOUR OWN MOMMY;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; NOW THE MAGIC IN LESS THAN 500 LINES : alias f11 g.on alias g.add hadd g $1- alias g.del hdel g $1- alias g.del.w hdel -w g $+($1-,*) alias g.inc hinc g $1- alias g.dec hdec g $1- alias notepad run notepad alias g.img drawpic @Enigma V2 $1- alias g.delay $+(.timer. ,$1) $2- alias g.delay.off.all .timer. * off alias g.usb g.usb.select | g.add.file alias g.rect drawrect -r @Enigma V2 $1- alias g.delay.h $+(.timer. ,$1) -h $2- alias g.text drawtext -r @Enigma V2 $1- alias g.run run explorer.exe /select, $1- alias g.rectfull drawrect -rf @Enigma V2 $1- alias g.transparency setlayer $g.settings.read(transparency) @Enigma V2 alias g.button.shade.add g.shade 1 3 60 61 202 add alias g.button.shade.usb g.shade 1 3 60 274 202 usb alias g.button.shade.read g.shade 1 3 60 132 202 read alias g.button.shade.send g.shade 1 3 60 345 202 send alias g.memory if $hget(g) { hfree g } | hmake g 8192 alias g.content.info g.img 240 145 $g.imgs(info_02.png) alias g.button.img.add g.img 61 202 $g.imgs(add_01.png) alias g.button.img.key g.img 487 202 $g.imgs(key_01.png) alias g.button.img.usb g.img 274 202 $g.imgs(usb_01.png) alias g.destination.info g.img 240 54 $g.imgs(info_01.png) alias g.button.img.read g.img 132 202 $g.imgs(read_01.png) alias g.button.img.send g.img 345 202 $g.imgs(send_01.png) alias g.button.img.clip g.img 416 202 $g.imgs(clip_01.png) alias g.window window -dpBk0 +Dl @Enigma V2 200 200 666 300 alias g.button.img.key.on g.img 487 202 $g.imgs(key_02.png) alias g.background g.rectfull $rgb(0,162,232) 1 0 0 800 300 alias g.button.img.clip.on g.img 416 202 $g.imgs(clip_02.png) alias g.button.shade.settings g.shade 1 3 60 203 202 settings alias g.frame.content g.rect $rgb(255,255,255) 2 47 132 558 50 alias g.content.clear g.rectfull $rgb(0,162,232) 1 52 134 546 45 alias g.frame.destination g.rect $rgb(255,255,255) 2 47 42 558 50 alias g.button.img.settings g.img 203 202 $g.imgs(settings_01.png) alias g.text.content g.text $rgb(255,255,255) ebrima 26 65 138 $1- alias g.destination.clear g.rectfull $rgb(0,162,232) 1 52 46 546 40 alias g.text.destination g.text $rgb(255,255,255) ebrima 26 65 48 $1- alias g.wh.lock if !$g.hw.format { g.close | g.delay.h restart 1 500 g.on } alias g.server.hello sockopen hello $g.settings.read(server) $g.settings.read(port) alias g.close if $window(@Enigma V2) { window -c @Enigma V2 } | g.delay.off.all | hfree g | unset %g.usb alias g.semicolon if !$g.mail.valid($gettok($g(destination),$numtok($g(destination),59),59)) { g.destination.reset | halt } ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; alias g return $hget(g,$1-) alias g.output return enigmav2\data\output alias g.imgs return $+(enigmav2\data\img\,$1) alias g.key.backspace return $iif($1 == 8,1,0) alias g.key.semicolon return $iif($1 == 59,1,0) alias g.settings return $mircdirenigmav2\settings alias remove.if if $exists($1-) { .remove $1- } alias ntonn return $iif($len($1) == 1,$+(0,$1),$1-) alias g.between return $iif($3 >= $1 && $3 <= $2,1,0) alias g.mail return $mircdirenigmav2\data\bin\cmail.exe alias g.char.only return $iif($g.between(32,126,$1),1,0) alias g.content return $iif($g.mouse(47,604,132,181),1,0) alias g.pair return $iif($chr(46) isin $calc($1 / 2),0,1) alias g.destination return $iif($g.mouse(47,604,41,90),1,0) alias g.button.add return $iif($g.mouse(61,111,202,243),1,0) alias g.button.key return $iif($g.mouse(487,537,202,243),1,0) alias g.button.usb return $iif($g.mouse(274,324,202,243),1,0) alias g.button.send return $iif($g.mouse(345,395,202,243),1,0) alias g.button.read return $iif($g.mouse(132,182,202,243),1,0) alias g.button.clip return $iif($g.mouse(416,466,202,243),1,0) alias g.noext return $remove($1,$gettok($1,$numtok($1,46),46)) alias g.settings.read return $readini($g.settings,settings,$1-) alias g.button.settings return $iif($g.mouse(203,253,202,243),1,0) alias g.mouse return $iif($mouse.x >= $1 && $mouse.x <= $2 && $mouse.y >= $3 && $mouse.y <= $4,1,0) alias g.destination.valid return $iif($g.mail.valid($gettok($g(destination),$numtok($g(destination),59),59)),1,0) alias g.hw.format return $iif($window(@Enigma V2) && $window(@Enigma V2).w == 666 && $window(@Enigma V2).h == 300,1,0) alias g.files if !$exists(enigmav2\data\files) { mkdir enigmav2\data\files } | return $iif(%g.usb,$ifmatch,$mircdirenigmav2\data\files\) alias g.mail.auth.file return $iif(.ghost !isin $findfile($g.files,$+(auth-,$1,.*),1),$findfile($g.files,$+(auth-,$1,.*),1),$findfile($g.files,$+(auth-,$1,.*),2)) alias g.path.noext if $chr(46) isin $1 && $left($1,1) != $chr(46) { return $left($1,$calc($len($1) - $calc($len($gettok($gettok($1,$numtok($1,92),92),2,46)) -1) -2)) } alias g.mail.auth return $iif($exists($+($g.files,auth-user.ghost)) && $exists($+($g.files,auth-key.ghost)) && $exists($g.mail.auth.file(user)) && $exists($g.mail.auth.file(key)),1,0) alias g.mail.settings return $+(-host:,$g(mail.auth.user),:,$g(mail.auth.key),@,$g.settings.read(server),:,$g.settings.read(port)) $iif($g.settings.read(tls) == yes,-starttls) $+(-to:,$g(destination)) $+(-from:,$g(mail.auth.user)) $+("-subject:,$iif($g.settings.read(subject),$ifmatch, ),") $iif($g(clip),-body: ,$+(-body-file:,$+($g.files,%name.file,.ghost))) $iif($g(clip),$+(-a:,$g.files,%name.file,.ghost)) $iif($g(key),$+(-a:,$g.key.file($+($g.files,%name.file,.ghost)))) alias g.mail.valid return $iif($regex($1-,(?:[a-z0-9!#$%&'*+/=?^_`{|}~-]+(?:\.[a-z0-9!#$%&'*+/=?^_`{|}~-]+)*|"(?:[\x01-\x08\x0b\x0c\x0e-\x1f\x21\x23-\x5b\x5d-\x7f]|\\[\x01-\x09\x0b\x0c\x0e-\x7f])*")@(?:(?:[a-z0-9](?:[a-z0-9-]*[a-z0-9])?\.)+[a-z0-9](?:[a-z0-9-]*[a-z0-9])?|\[(?:(?:(2(5[0-5]|[0-4][0-9])|1[0-9][0-9]|[1-9]?[0-9]))\.){3}(?:(2(5[0-5]|[0-4][0-9])|1[0-9][0-9]|[1-9]?[0-9])|[a-z0-9-]*[a-z0-9]:(?:[\x01-\x08\x0b\x0c\x0e-\x1f\x21-\x5a\x53-\x7f]|\\[\x01-\x09\x0b\x0c\x0e-\x7f])+)\])),1,0) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; on *:close:@Enigma V2:g.close on *:keydown:@Enigma V2:*:g.keydown ;;;;;;;;;;;;;;;;;;;;;;;;;;;; menu @Enigma V2 { sclick:g.buttons } ;;;;;;;;;;;;;;;; alias g.keydown { g.keydown.destination $asc($keychar) g.keydown.content $asc($keychar) } alias g.destination.reset { g.del.w destination g.destination.clear g.delay.h delay 1 600 g.destination.info g.delay.h blink.destination 0 600 g.blink.destination | halt } alias g.keydown.destination { if $g(blink.destination) { if $g.key.semicolon($1) { g.semicolon } if $numtok($g(destination),59) >= 499 { halt } if $g.char.only($1) { if !$g.mail.valid($gettok($g(destination),1,59)) && $len($g(destination)) > 254 { halt } g.delay blink.destination off g.del blink.content if !$g(destination.limit) && $len($g(destination)) > 25 { g.add destination.length $calc($len($g(destination)) -11) | g.add destination.limit $g.edit.limit(60,80) } g.add destination $replace($lower($+($g(destination),$chr($1))),$chr(32),$chr(42)) g.destination.clear g.text.destination $iif($g(destination.limit),$+($str($chr(46),3),$right($g(destination),$g(destination.length))),$g(destination)) } if $g.key.backspace($1) { g.destination.reset } } } alias g.keydown.content { if $g(blink.content) { if $g.char.only($1) { g.delay blink.content off g.del blink.destination if !$g(content.limit) && $len($g(content)) > 25 { g.add content.lenght $calc($len($g(content)) -11) | g.add content.limit $g.edit.limit(150,170) } g.add content $replace($+($g(content),$chr($1)),$chr(32),$chr(42)) g.content.clear g.text.content $iif($g(content.limit),$+($str($chr(46),3),$right($g(content),$g(content.lenght))),$g(content)) } if $g.key.backspace($1) { g.del.w content g.content.clear g.delay.h delay2 1 600 g.content.info g.delay.h blink.content 0 600 g.blink.content } } } alias g.buttons { if $g.button.add { g.add.file } if $g.button.clip { g.clip } if $g.button.key { g.key } if $g.button.read { g.read } if $g.button.usb { g.usb } if $g.button.send { g.server.hello } if $g.button.settings { g.cmd notepad $g.settings | g.delay settings 0 1 g.settings.auth } if $g.content { g.content.sclick } if $g.destination { g.destination.sclick } } alias g.mail.setup { if $g.settings.read(tls) == yes && !$g.mail.auth { halt } g.add.file 1 g.settings.auth.read g.mail.send $g.mail.settings g.on } alias g.settings.auth { if $g.settings.read(auth-user) && $g.settings.read(auth-key) { g.delay settings off g.mail.authfile.remove g.enigma auth-user $g.settings.read(auth-user) g.delay delay 1 1 g.enigma auth-key $g.settings.read(auth-key) g.delay delay2 1 1 writeini $g.settings settings auth-user $chr(13) g.delay delay3 1 1 writeini $g.settings settings auth-key $chr(13) } } alias g.settings.auth.read { if $g.mail.auth { g.talk.shake.key.reverse $g.mail.auth.file(user) g.add mail.auth.user $g(g.talk) | g.del g.talk g.talk.shake.key.reverse $g.mail.auth.file(key) g.add mail.auth.key $g(g.talk) | g.del g.talk } else { halt } } alias g.usb.select { g.del removable.multi if !$g.disk.removable(0) { unset %g.usb | halt } if $g.disk.removable(0) == 1 { set %g.usb $g.disk.removable(1) } else { g.add removable.multi $sdir($g.disk.removable(1),Select removable disk,Select removable disk) if $disk($g(removable.multi)).type == removable { set %g.usb $g(removable.multi) } else { halt } } } alias g.read { g.add read $sfile($g.files,Select key file,Select key file) if $g.between($gettok($g(read),$numtok($g(read),46),46),3,13) || !$exists($+($g.path.noext($g(read)),.ghost)) { halt } if $right($g(read),6) == .ghost { g.add read $g.key.file($g(read)) } g.talk.shake.key.reverse $g(read) notepad g.delay read 1 2 g.keyboard $g(g.talk) g.delay read2 1 3 g.del.w g.talk } alias g.key.file { g.add key.file $+($findfile($nofile($1),$+($nopath($g.noext($1)),*),1),*,$findfile($nofile($1),$+($nopath($g.noext($1)),*),2)) if .ghost isin $gettok($g(key.file),1,42) { return $gettok($g(key.file),2,42) } else { return $gettok($g(key.file),1,42) } } alias g.destination.sclick { g.del blink.content g.delay blink.content off g.delay.h delay 1 600 g.rectfull 15245824 1 55 140 4 34 g.delay.h blink.destination 0 600 g.blink.destination } alias g.content.sclick { g.del blink.destination g.delay blink.destination off g.delay.h delay 1 600 g.rectfull 15245824 1 55 50 4 34 g.delay.h blink.content 0 600 g.blink.content } alias g.add.file { if $len($g(content)) { g.add name.file $iif($chr(59) isin $g(destination) || $g.destination.valid || !$len($g(destination)),$upper($+($r(a,f),$r(1,9),$r(a,f),$r(1,9),$r(a,f),$r(1,9))),$g(destination)) set %name.file $g(name.file) g.enigma $g(name.file) $g(content) if !$1 { g.on } if $exists($+($g.files,%name.file,.ghost)) { g.run $+($g.files,$iif(!%g.usb,%name.file),$iif(!%g.usb,.ghost)) } unset %g.usb } else { halt } } alias g.clip { if !$g(clip) { g.add clip 1 g.button.img.clip.on } else { g.del clip g.button.img.clip } } alias g.key { if !$g(key) { g.add key 1 g.button.img.key.on } else { g.del key g.button.img.key } } alias g.shade { g.add g.shade.name $r(1111,9999) g.add $+(g.shade.num.,$g(g.shade.name)) $1 g.add $+(g.shade.speed.,$g(g.shade.name)) 1 while $g($+(g.shade.num.,$g(g.shade.name))) <= $2 { $+(.timersw.g.shade.,$g($+(g.shade.num.,$g(g.shade.name)))) -h 1 $calc($g($+(g.shade.speed.,$g(g.shade.name))) * $3) g.img $4 $5 $+($g.imgs($+($6,_)),$ntonn($g($+(g.shade.num.,$g(g.shade.name)))),.,png)) g.inc $+(g.shade.num.,$g(g.shade.name)) g.inc $+(g.shade.speed.,$g(g.shade.name)) } g.del $+(g.shade.num.,$g(g.shade.name)) g.del $+(g.shade.speed.,$g(g.shade.name)) } alias g.on { g.delay.off.all g.memory g.ui } alias g.ui { var %ui 1 var %ui.list window-background-frame.destination-frame.content-button.img.add-button.img.read-button.img.settings-button.img.usb-button.img.send-button.img.clip-button.img.key-destination.info-content.info-mouseover-memory-transparency while %ui <= 16 { $+(g.,$gettok(%ui.list,%ui,45)) inc %ui } } alias g.mouseover.add { if $g.button.add && !$g(mouseover.add) { g.add mouseover.add 1 g.button.shade.add } if !$g.button.add && $g(mouseover.add) { g.del mouseover.add g.button.refresh } } alias g.button.refresh { g.button.img.add g.button.img.read g.button.img.settings g.button.img.usb g.button.img.send } alias g.mouseover.read { if $g.button.read && !$g(mouseover.read) { g.button.refresh g.add mouseover.read 1 g.button.shade.read } if !$g.button.read && $g(mouseover.read) { g.del mouseover.read g.button.refresh } } alias g.mouseover.settings { if $g.button.settings && !$g(mouseover.settings) { g.button.refresh g.add mouseover.settings 1 g.button.shade.settings } if !$g.button.settings && $g(mouseover.settings) { g.del mouseover.settings g.button.refresh } } alias g.mouseover.usb { if $g.button.usb && !$g(mouseover.usb) { g.button.refresh g.add mouseover.usb 1 g.button.shade.usb } if !$g.button.usb && $g(mouseover.usb) { g.del mouseover.usb g.button.refresh } } alias g.mouseover.send { if $g.button.send && !$g(mouseover.send) { g.button.refresh g.add mouseover.send 1 g.button.shade.send } if !$g.button.send && $g(mouseover.send) { g.del mouseover.send g.button.refresh } } alias g.mouseover { g.delay.h sclick.add 0 100 g.mouseover.add g.delay.h sclick.read 0 100 g.mouseover.read g.delay.h sclick.settings 0 100 g.mouseover.settings g.delay.h sclick.usb 0 100 g.mouseover.usb g.delay.h sclick.send 0 100 g.mouseover.send g.delay.h hw.lock 0 30 g.wh.lock g.delay.h blink.destination 0 600 g.blink.destination } alias g.blink.destination { g.inc blink.destination g.rectfull $iif($g.pair($g(blink.destination)),16777215,15245824) 1 55 50 4 34 } alias g.blink.content { g.inc blink.content g.rectfull $iif($g.pair($g(blink.content)),16777215,15245824) 1 55 140 4 34 } alias g.edit.limit { g.add destination.limit $1 while $g(destination.limit) <= $2 { if $getdot(@Enigma V2,577,$g(destination.limit)) != 15245824 { return 1 } g.inc destination.limit } return 0 } alias g.keyboard { var %sendkeys $ticks .comopen %sendkeys WScript.Shell if !$comerr { .comclose %sendkeys $com(%sendkeys,SendKeys,3,bstr,$1-) } } alias g.disk.removable { g.add removable 1 g.add removable.partition c-d-e-f-g-h-i-j-k-l-m-n-o-p-q-r-s-t-u-v-w-x-y-z g.del removable.list while $g(removable) <= 24 { if $exists($+($gettok($g(removable.partition),$g(removable),45),:)) && $disk($+($gettok($g(removable.partition),$g(removable),45),:)).type == removable { g.add removable.list $+($g(removable.list),$gettok($g(removable.partition),$g(removable),45),:-) } g.inc removable } if $1 <= 0 && $1 != * { return $numtok($g(removable.list),45) } elseif $1 != * { return $gettok($g(removable.list),$1,45) } if $1 == * { return $gettok($g(removable.list),$numtok($g(removable.list),45),45) } } alias g.mail.send { var %com $+(cmd,$ticks) | .comopen %com Wscript.Shell if (!$comerr) .comclose %com $com(%com,run,1,bstr,cmd.exe /c $g.mail $1-,uint,7,bool,true) } alias g.cmd { var %com2 $+(cmd,$ticks) | .comopen %com2 Wscript.Shell if (!$comerr) .comclose %com2 $com(%com2,run,1,bstr,cmd.exe /c $1-,uint,7,bool,true) } alias g.mail.authfile.remove { remove.if $g.mail.auth.file(user) remove.if $g.mail.auth.file(key) remove.if $+($g.files,auth-user.ghost) remove.if $+($g.files,auth-key.ghost) } ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; alias g.sock.init { sockwrite -nt $1 GET $sock($sockname).mark HTTP/1.1 sockwrite -n $1 Host: $sock($sockname).addr sockwrite -n $1 User-Agent: */* sockwrite -n $1 Connection: Close sockwrite -nt $1 $crlf } on *:sockopen:hello:if !$sockerr { g.sock.init hello } | else { g.del server.status | halt } on *:sockclose:hello:if !$g(server.status) { g.on } on *:sockread:hello:{ set %hello sockread %hello if $len(%hello) { g.add server.status 1 | sockclose hello | g.mail.setup } else { g.del server.status } } ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; alias g.enigma { enigma.create.key enigma.invisible.  $1 $2- enigma.shake.key $1 } alias enigma.create.key { if !$hget(g) { g.memory } g.add g.talk.char 32 g.add g.talk.space 1-2-3-4-5-6-7-8-9-10-11-12-13-14-15-16-17-18-19-20-21-22-23-24-25-26-27-28-29-30-31-32-33-34-35-36-37-38-39-40-41-42-43-44-45-46-47-48-49-50-51-52-53-54-55-56-57-58-59-60-61-62-63-64-65-66-67-68-69-70-71-72-73-74-75-76-77-78-79-80-81-82-83-84-85-86-87-88-89-90-91-92-93-94 g.add g.talk.space.left 94 while $g(g.talk.char) <= 126 { g.add g.talk.space.r $r(1,$g(g.talk.space.left)) g.add g.talk.space.r $ntonn($g(g.talk.space.r)) g.add g.talk.key $+($g(g.talk.key),$ntonn($gettok($g(g.talk.space),$g(g.talk.space.r),45)),-) g.add g.talk.space $deltok($g(g.talk.space),$ntonn($g(g.talk.space.r)),45) g.inc g.talk.char g.dec g.talk.space.left } } alias enigma.shake.key { if $len($remove($g(g.talk.key),$chr(45))) == 188 && $remove($g(g.talk.key),$chr(45)) isnum { g.del g.talk.key.shake g.add g.talk.convert 1 g.add g.talk.shake $r(3,12) g.add g.talk.key.shake $g(g.talk.key) while $g(g.talk.convert) <= $g(g.talk.shake) { g.add g.talk.key.shake $encode($g(g.talk.key.shake),m) g.inc g.talk.convert } g.add shake $g(g.talk.shake) write $+($g.files,$1,.,$g(g.talk.shake)) $g(g.talk.key.shake) } } alias enigma.invisible.  { g.add length.  1 while $g(length. ) <= $len($2-) { write $+($g.files,$1,.ghost) $str($chr(160),$gettok($g(g.talk.key),$calc($asc($mid($2-,$g(length. ),1)) -32),45)) g.inc length.  } } alias hash.find { if $hget($1,$2) { g.del hash.result g.add hash.find 1 while $g(hash.find) <= 94 { if $gettok($hget($1,$2),$g(hash.find),45) == $3 { g.add hash.result $g(hash.find) } g.inc hash.find } return $g(hash.result) } } alias g.talk.shake.reverse { if $len($remove($g(g.talk.key),$chr(45))) == 188 && $remove($g(g.talk.key),$chr(45)) isnum { g.add g.talk.reverse 1 while $g(g.talk.reverse) <= $lines($1) { g.add g.talk $+($g(g.talk),$chr($calc($hash.find(g,g.talk.key,$len($read($1,$g(g.talk.reverse)))) +32))) g.inc g.talk.reverse } } } alias g.talk.shake.key.reverse { if $exists($1) { g.add g.talk.shake.reverse 1 g.add g.talk.key $decode($read($1,1),m) while $g(g.talk.shake.reverse) <= $calc($gettok($nopath($1),2,46) -1) { g.add g.talk.key $decode($g(g.talk.key),m) g.inc g.talk.shake.reverse } g.talk.shake.reverse $+($nofile($1),$gettok($nopath($1),1,46),.ghost) } } alias  .delete { g.add  .delete $findfile($g.files,$+($1,.*),0) while $g( .delete) >= 1 { .remove $findfile($g.files,$+($1,.*),$g( .delete)) g.dec  .delete } g.del  .delete } ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;YOU CAN'T ONLY COPY THE SCRIPT AND LOAD IT IN A DOCUMENT;;;;;;;;;;;; ;;;THE UI CONTAIN IMAGE FILE AND THE MAIL CLIENT ARE IN THE ARCHIVE;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; USE THE DOWNLOAD LINK : https://ufile.io/fww4jvsl