if anyone has junk code generator throw me some junk code here please

[fwsefwsgrgwhergr]

if anyone has junk code generator throw me some junk code here please

[Hitokiri~]

1.) Loops
2.) Random math garbage
3.) Variable name randomization
4.) Control flow shuffling
5.) Pseudo-if statements
6.) API Imports
7.) Random API calls

etc.
It really isn't that hard to think up this crap if you know the language.

[steveroseik]

I'll be more helpfull here:

this it the Function code:

  Public Function GetRandomString(ByRef lenStr As Integer, Optional ByVal upper As Boolean = False) As String
Dim p As String = Path.GetRandomFileName()
        p = p.Replace(".", "")
        Return p
    End Function

This is for generating random string (Alphanumeric):

Dim value As String = GetRandomString(8)
'Or
Textbox1.text = GetRandomString(8)

Note: The (8) in the code is the number of Digits.

I think that's all u need.

[signal101]

Public Sub nicememem8_YCa24pd()

Dim WPWCl8SUncA8a5TBC As Decimal = 1559985140
Try
Catch S86fn6 As Exception
Dim UCccE8h As Boolean = 1
End Try
If 0.7055475 = 0.533424
If 0.5795186 = 0.2895625 Then Dim C2IJMPtGZ63oBI5AfA8 = 0.301948
Dim B051VNg6qiEUsDJ0hTyxx2EBx4pr1c As String = "D0ED0d7I7sUQS6xpo7F09vHwj43AE4q0y14S42haWC90t8mcIHk9E4zt7PpSS23I8CEt2VHkAQYpMWsR3o5pn1gzKSRZL5OFI80roQM0B15fON0tlHPB3sn7ub0l7f93OVS47HS65Xk27n9ZauWsCC2F9d06z5fxf1B"
Try
Catch Cvf As Exception
Dim SdyeIZG9wh6BWjNKte As Integer = -474553596
If 0.7747401 < 0.01401764 Then Dim O01E = 0.7607236
Dim Z9Vk7fPUm71Y4tCJVhns6UCMejgW86QW03 As Integer = 1746327783
End Try
End If
While 0.81449 > 0.7090379
Dim F48bY As Double = -1352903557
Try
Catch RsxdjF As Exception
If 0.04535276 > 0.4140327 Then Dim R5mD1CFjDV = 0.8626193
Dim KMzw5n7q9K33m29XJ0mN3M6nsi748 As Long = 0.79048
If 0.3735362 < 0.9619532 Then Dim Xoi5 = 0.8714458
Dim L6mF9Dbs3m As Decimal = 1325138831
End Try
End While
For RJEA0yj = 0.05623686 To 0.9495566
If 0.3640187 = 0.5248684 Then Dim NZ1at03O = 0.7671117
Dim VtTN0qpNWVqAG2fL9P5OQW0ue1LFk9 As Boolean = 1
Try
Catch Z8m5nm As Exception
Dim IA23YI8534u8ZTn As Double = 1082731713
End Try
If 0.05350453 > 0.5924582
If 0.4687001 < 0.2981654 Then Dim Fb2QrsOWFmw9T3 = 0.6226967
Dim JajFJ51h0yr0V7q9r1OSyrBgMAS1m As Boolean = 1
End If
While 0.6478212 = 0.2637929
Dim K9IeZ6aVEn4677uC1HEy2B As String = "JG5c8LBq5ssz5Rqk14m2z381H"
Try
Catch RVzIN5D5 As Exception
If 0.2793421 < 0.8298016 Then Dim BQC7CN5L7jle7lfI8G = 0.8246021
Dim CfR0Q As Double = -999724083
If 0.589163 < 0.9860932 Then Dim T5a3fV7dAwJRk1ET1d7 = 0.9109643
Dim AE9dN4Gj5hFRHI7nOkzhJJT As Long = 0.226866
If 0.6951155 = 0.9800032 Then Dim Uo4542I = 0.2439314
End Try
End While
Next
End Sub

Public Sub nicememem8_LP082R7()

Dim HBNy85AK016cXwJ4Be As Boolean = 0
Try
Catch Qj8s73yu As Exception
Dim A2Sk5zar1fRROMJpRTv993STR8Pg1Odo As Long = 0.5338731
Dim T2LiW4gGs5cATI6JyzJigK6iW8DU8JG As Double = -1421058697
Dim VYDevfe06dVghARuRM969 As Boolean = 1
End Try
If 0.1063697 = 0.9994146
Dim NSDr2M9z19 As Boolean = 0
Try
Catch YtJ As Exception
If 0.6761759 = 0.01570392 Then Dim U0y5u = 0.5751838
Dim JXg4A As Boolean = 0
Dim FUkIo7Y As Long = 0.1000522
End Try
End If
While 0.1030226 > 0.7988844
Dim F7DkXc8Y2 As Boolean = 0
Try
Catch R792 As Exception
Dim ZEL3BZf41cQOxcHTGj6r6 As Integer = -1503188159
End Try
End While
For M2VD9628Y516axKoeB = 0.2844803 To 0.04564917
If 0.2957729 > 0.3820107 Then Dim Ialf41D = 0.3009705
Dim JsczgIEQXo58lKCYL23iG31LGV7g As String = "CBVCF484Nowif8fzwFG429AjJfR7wb39986W94MO5ye8Lk7jxHP5Sc319I7R02TYl1Ud09vR47frmC4lokp9esKEEqIf2vimiBPCsH9fdP8GLfZe9RYK43F"
Try
Catch PJh6aA0Zg As Exception
If 0.9485711 = 0.9798294 Then Dim T1dqx1956X3r9K4c = 0.4013743
Dim Sdc2eSXSKAEmHO28wDq78UWb5Nj8E33klE As Boolean = 0
End Try
If 0.27828 = 0.1604415
If 0.1628216 = 0.6465871 Then Dim H7hd2Ee = 0.4100732
Dim KE64xP4tNYR367eH0H28v9xe0OPGsa03 As Double = -49966890
End If
While 0.4127668 < 0.7127305
If 0.3262062 > 0.6331789 Then Dim OJW80ad1z7S9xkf9gA2 = 0.2075611
Dim Kv9ae8rIgf3npOhSCPLZmip237t As String = "ALW6CRLcFqVA68NIs5A18gxvF51NAkZo8Nc0O4UxA87iidnUZo1ZUFPFtaT0X2uubIdX7zkA"
Try
Catch UcNei As Exception
Dim ZmL2x2mMVu9 As Integer = -468140409
End Try
End While
Next
Dim N1Us3VS6MbuGsyVNTR As Double = 1535849029
Try
Catch UeZc As Exception
If 0.1860135 < 0.583359 Then Dim SzRo3LzO2dN18wJK05 = 0.08071464
Dim D5Z4SlP As Decimal = -625613494
If 0.4579715 = 0.9057298 Then Dim IFQ = 0.2613683
Dim LWjOow1f1x5W04tMPl As Decimal = -720956967
If 0.7852122 = 0.3789026 Then Dim R898x = 0.289665
Dim K9HMpSdjd54flYAqf86ATtlOPr As Long = 0.9193771
Dim Vo1JyiJ603X7 As Long = 0.6317424
End Try
If 0.627642 = 0.4284564
Dim RShaBXJU11zqL3Xpk779 As Long = 0.09797382
End If
While 0.5610401 = 0.6944853
Dim ZW07kNJddEqsk2xRk0VzWDIoOt4 As Double = -217973745
End While
For INlRYp7aOf = 0.9137176 To 0.8348172
Dim ZE5y84mVm0e As String = "MqSz41wn41RIHMPGNRXfxA"
If 0.0226292 = 0.5433606
Dim G8rKiI48Hc6hCnPP3FTp035s07GFq4MV As Decimal = 1517354472
End If
While 0.916164 < 0.4302611
Dim I0T3nu1lrBn0m9GZbR0IGG30UT As Decimal = 293481400
Try
Catch Rp9Dp As Exception
If 0.6779477 > 0.5024539 Then Dim Yky3SC8333ChnhD2Z = 0.5137375
Dim HWHq6n0VA9 As Boolean = 1
If 0.46298 > 0.3534727 Then Dim MhW = 0.4048342
Dim B6aEae87aA4HsYU37l478xP33MC45R2 As Long = 0.2697316
If 0.05559349 < 0.2438452 Then Dim YM9MA1W78 = 0.9790779
Dim KT1lF781YMcoYtj1C76C29hDxx As Double = -995113136
If 0.06091624 > 0.3902915 Then Dim Vu8ut0P0jL74P9v = 0.3649954
Dim H03eXu4JaN9O9EjKR6f4iK13Z7991Y As Decimal = 654677969
End Try
End While
Next
End Sub

Public Sub nicememem8_MMai9v6()

Dim R4ki9f7Het865cGCr6GkdN7oqQY13v5P52 As Boolean = 1
If 0.4898947 = 0.1556631
Dim FosC5gvt87k As Long = 0.4744592
End If
While 0.2572677 > 0.6287519
Dim AT6yTpqtZ3tL7QU As Decimal = -1520101441
End While
For E1un7fhxZ3 = 0.5420702 To 0.1563022
If 0.9385452 = 0.6544994 Then Dim U2z2r7E0c85UtDg = 0.5060874
Dim MtajPoTqEHxle98722N801KIU1 As Integer = -515304178
If 0.3904715 > 0.1073753
Dim GJi891Nc As Double = 1052166923
Try
Catch G4aP As Exception
Dim QKKqNgOnMRQWu47gGi7 As Long = 0.7839953
End Try
End If
While 0.4596408 > 0.7536881
If 0.5960945 < 0.8327302 Then Dim KX44w64AoUayFUnSiMX = 0.01875836
Dim Y23qwun7 As Boolean = 1
Try
Catch UjDS As Exception
If 0.2103686 < 0.07395333 Then Dim F8lWB5sHcv5 = 0.1054527
Dim L0o16N6908xST As Decimal = 1864281029
If 0.3316944 = 0.1282499 Then Dim Y355EIy = 0.00024122
Dim OrNYJe8xauA42E37KQxpI589Ec As Boolean = 1
Dim B1XSq37qyyEck67733MkE24Lz8Trq8 As Long = 0.5367941
If 0.657055 > 0.544014 Then Dim Dn2yc9GAn7Bz15 = 0.8274118
Dim OpCv5kta5gskg6s8xAd1hUOH52oC As Integer = 118129244
If 0.08189356 > 0.1919225 Then Dim B65iv3f = 0.6789134
Dim Sa504W05X6E4r3Dh8i As Boolean = 1
Dim Hid5u As Boolean = 1
Dim G9h55Y9q117 As Long = 0.4542078
Dim XAlt6o5xl3e08xgkY3 As Double = 1169979732
End Try
End While
Next
If 0.3570231 < 0.1499811 Then Dim IBQGHHhDN7sYvgXO3M7 = 0.7043958
Dim YcEWsMYQ2DgB2ODRN9I9ov7cIyVO As Long = 0.928786
If 0.5302125 < 0.08964139
Dim TipUJkdc2F2ZeieRXW0Kv91eA6xSp4Z As String = "H1bc0s3bUAmfvk"
Try
Catch UNud As Exception
If 0.7577293 > 0.4018421 Then Dim S8uGd = 0.4618744
Dim Mc9vu6Rfen9CIq4PG7Bn As Decimal = -1686200338
End Try
End If
While 0.4921656 > 0.2076273
Dim FKZ8oOQyEfz8MvYbN2k As Integer = 423701323
Try
Catch Ip9G3r5lu As Exception
If 0.3297359 < 0.09542906 Then Dim LCO2pLiLLs0 = 0.5897925
Dim Aoi9J64LKW As Double = 367330743
End Try
End While
For PzXRLDt = 0.1698735 To 0.9276165
Dim J5p6h1O3QK87DKFUkm6 As Boolean = 1
Try
Catch U31JGjan3 As Exception
Dim KkAt4j6ZDlBF5ec0F As Integer = -2042246250
End Try
If 0.09792984 = 0.4438625
If 0.2729468 < 0.8725469 Then Dim E653Mm5iL = 0.7506877
Dim Oj4C5J6IwOY8pps6y7amT1R7p As Long = 0.2729424
End If
While 0.6736467 < 0.2566289
Dim T6F704726pJQr8 As Decimal = 1649709929
Try
Catch Wb9Dp As Exception
If 0.08989656 > 0.03095061 Then Dim T0126ydIc = 0.3227177
Dim ZLAUTj6fV805Srw65Ays1 As Boolean = 0
Dim Sm2oMRKml9mihF8V6VY6Fo92 As Decimal = -833893605
End Try
End While
Next
If 0.7901289 > 0.297258 Then Dim EG6 = 0.2352822
Dim FiG4S As String = "NScKm9d5Q70RPI1XzXAcWdFFr8ymNuS3Cp9cV9f8u0lot5vHA94lP5Q98H67yDZ14***n8xT75smETFD6820020SmNEc3b"
Try
Catch ZI91x As Exception
Dim Q520QSQ7R56kP9DdnqzSmUGR24j34iT9ZN As Integer = -434083651
End Try
If 0.4804747 = 0.2546019
If 0.3406066 > 0.04493386 Then Dim Q13A2O = 0.4824281
Dim NR445TD599j6 As Integer = -535718679
End If
While 0.2060172 > 0.8645345
Dim R495qtQ As Double = -267885586
End While
For SXfW5swbk8TffQ = 0.5886286 To 0.7549083
If 0.9278831 < 0.3310169 Then Dim ZdGfR = 0.5429412
Dim BK67CDCxBE4pp As String = "OPDOMG2iZSSexR4bfgM0NK8YepwUZJ57172QAsaOeQ05RDOO4s5H9iKC68D7j0AnB0pc9zjRaq1RtQ1YaffcQ4yBZbs82rYU6mBFkeW"
Try
Catch MN5K3k As Exception
If 0.08069134 = 0.6343719 Then Dim UKS50TrDm0FLhherPpu = 0.4100367
Dim Db2cMS0ct6UN As Long = 0.9604228
If 0.1146233 = 0.9234452 Then Dim VO7U9v2DVnY774W = 0.6202096
End Try
Next
End Sub

Public Sub nicememem8_B0gRB6()

Dim E75MG18r078c88vSonB9J79k As Boolean = 0
Try
Catch A56 As Exception
Dim YcI2gawW47YNJ2652ZXP5I6f1C9xd7 As Double = -1540873286
If 0.3477264 > 0.1492457 Then Dim KdvJ7z = 0.4799783
Dim M5Mx83C4C3Ayui4RRl0bjJ As Double = -683309371
End Try
If 0.2194091 > 0.9937313
Dim V350N140Qn0861F As Long = 0.1304204
Try
Catch EG99tW As Exception
If 0.02888578 < 0.3453916 Then Dim RpE3JYgv7 = 0.5476685
Dim UunE6ZV5HsUFSXnQ2JpAb As String = "GIG9gU5q4SHz4Y9i49J6o34uZpIZ0v9J725irTbK56yQyB96P1hRh4Gt13P"
Dim F7lq4ty6cC8eLRJrzji As Decimal = 57109034
End Try
End If
While 0.9229546 = 0.5382463
Dim XaG0x66xvoUJMD2PqjBvjSAt4999 As Boolean = 0
End While
For B3QHHXM0meZinVwp3 = 0.4064213 To 0.8472455
Dim TEB3tkb0j45xhvWx93iDq517u2V1 As String = "N79glcmA9Q0lfxTH9vkqiRRI2wo"
Try
Catch Ad4 As Exception
Dim WGP3io As Decimal = -1132764234
If 0.8262255 > 0.6724276 Then Dim FZg2k = 0.7218951
Dim EXQJclK0xZEFhaacPiMrLbs7G94Q1 As String = "BVqI8c5s7P37Gdl31p6KKW13tX4nNcD29WA1uKY1d8AlymAE899JDYDH3zvYTCgQd4XN496L07g89g27PbvUDZ1QupgHv0X501EW0gU5981vD6FhPYZi530O2IY6b1l5h4aUkJBH181I6GF323SXM73P5K9kPx9kubTGV4jnRPKujMDB3C2Ey"
End Try
If 0.9967714 > 0.3398061
If 0.4952113 < 0.4129678 Then Dim VBbbfVxsZudK0eCS3kb = 0.6952818
Dim Cu994r3HvsN42LCebovI As String = "G5g4uuu387t8i986Gh9by332eyp1aEu5WjsyqOJ1omvRH72qFC37pvKEZxIFwC7IRvVH77kwO8svCyT8c62G2Ok2g4G3Q9jX0Iu9lKupGz32mJd3HjMrz6H5F10RB1nhuFZuuwcD7GueYCnWsIPg9dfF7th7z23Csq7CwnI0wWLe41bJ"
End If
While 0.1790893 = 0.4229183
Dim U2TiuLI6GBFUv4oU726114z84Cj As String = "O7v96pK7hJ22xT2JjsXh1TJkR8Ah6L1RdXY5yvBFR2fM131qIWSb3HoRyCuK6934z935RbXJI8LIT65Nr411O7gbp6yz41i7vjPyt4m7vClR"
Try
Catch Sfr7Cu001 As Exception
Dim Agc5TE7D1 As Boolean = 1
End Try
End While
Next
If 0.543177 > 0.8146639 Then Dim JzuA3NOyXK97 = 0.5409136
Dim W01RG As Boolean = 1
Try
Catch I23 As Exception
Dim G5ea75q59QPy50hGbU3ue3 As Double = 479552951
End Try
If 0.4275333 < 0.5090681
Dim Jr099psn4eoGY1nI7UzCZsy99A9KKuOi0 As Boolean = 1
Try
Catch X0dbuG4f As Exception
If 0.2277816 = 0.6191876 Then Dim O7LamXf50xwipoCD61 = 0.4898304
Dim C4ke7yKj10OPY3zTvUxE As Decimal = 871710289
If 0.6808194 = 0.8866001 Then Dim TrN7Y0rg = 0.3705153
Dim ZqkvY65Pod7r602rzlP8rkg529K As String = "H77W5Z9357CBrI5qQ1wEU8gQW3RXUFzEP2PYo4KjnX1otO8c78vl9766Ra2vF4mS64t7VSpxMdPlBhW3033L88UquaAiIMPi732SxI4MzjyVlOQEN4137f2tQ129a3MtdFvmGrAJ3o1Aa8lIWnKGJ72m3t9M9l6T2mqLFkNjmZ5G1f8kG41FBuqKfKc41iZi0Y8fv8"
Dim F2o01hrrGh4kt88ajkvcuYnwtnq As Double = -570347167
End Try
End If
While 0.3024976 = 0.2928668
Dim WY31EK31O1vEWx11QS3F1mf04Dmbw98 As String = "M1DK4kE5EaCp2B"
End While
For Ev5RM8G9E9S219 = 0.1503113 To 0.5298212
If 0.2232618 = 0.5845293 Then Dim Z5GOq86dW6bDyh6brz5 = 0.3634587
Dim L52M1 As Double = -1593899569
Try
Catch Q98 As Exception
Dim X60mDg8xJXEQT As String = "S6Asw7O4BcR6s9QKOunFC0O3SO6I3OOxnq1N216z53r5j0tRyr1xt49h042y1OaAE8TTY6245IQ2m89puQQEYtvQv874Lu22eB1FzCE6fbR98wFUDH024xvAus7TcD225153esVzjL53P75mbX0CBRhqfi5gpH0ywGpOEtI8EOFaxgXzgNE9ZVS1fN03etXh4BM9E"
End Try
If 0.8759747 < 0.4780142
If 0.1906334 = 0.6840623 Then Dim W1u8MRYf1wQx1dsxTU = 0.7474158
End If
Next
End Sub

Public Sub nicememem8_AUyu5uzhfhaMQj4j7()

Dim Y3I1u6jID37548F15i8z86zA1G3 As Double = -2125262978
Try
Catch Qw167 As Exception
Dim KOQ8Z31Z4ze46980g6R7dEit1FuStk0F As Integer = 1924731101
If 0.6139349 = 0.7821387 Then Dim B6MO6CR7oCIH6VPteZ = 0.1617437
Dim Xqc9R3jkepL6hjMcwOM As String = "OCX411RyE2rt0zd3Sb3u81HK8JGGIfS6RPO60n2k2Q4Vh62a05TG5h6X9zh83Vj4mwwZ937X095qa84o12La4Qi9D6t9Zi4NEr85tHvBYpz0xB2HNJ3JGVkf4Z63MZvf0AsT2j1baO0nyIB39LK1NOMc1p0Qoozvz8E0ZmXEbye647Ee2J7QkRuq"
End Try
If 0.8077798 < 0.2026183
If 0.9567624 = 0.06585103 Then Dim SHCNZDgt8r8 = 0.06152225
Dim D092wA17RnldKW54qDfF As Double = 2120529322
Try
Catch Km0 As Exception
Dim BlT7tL0kX35xwZ817KFJlln1a As Double = -1264289513
Dim RbN906XH As Boolean = 1
End Try
End If
While 0.7931976 > 0.3796047
If 0.463584 > 0.119544 Then Dim G1K3FXTd8539gt8ye2 = 0.1154701
Dim BjJ6f3668Oy As Double = -1779223436
Try
Catch H2v28no As Exception
If 0.1737734 < 0.04811889 Then Dim KdA7PF2qa7 = 0.7148163
Dim E0j0GmMetPaVuqTK6Hi6XwSI3T1xZp1 As Boolean = 0
End Try
End While
For RiOAil = 0.5330223 To 0.5610093
If 0.2167335 > 0.4680057 Then Dim TW5LgFyVEQAzuSv42vg = 0.7463548
Dim W6GZ25Hq9FDp7VkhWf32580rEnl6 As Decimal = -664384228
Try
Catch Fn5j130ST As Exception
Dim EsW789q29cPU2OeJp1Nr85FrUs6g89 As Double = -889576318
Dim J7yR3w68g6k11tapY As Boolean = 1
Dim WBI3DCDwAsImQ97XPwNOI321I6w As Long = 0.7523109
End Try
If 0.3989323 = 0.9030988
Dim Qb4D4rm8sc9733kdm5DnPmk44gHU As Long = 0.7460069
End If
While 0.08855951 < 0.6345711
If 0.713028 = 0.0156824 Then Dim PveSrc9NFnnAcL59 = 0.4311444
Dim XzQF7v1J238Hk As String = "Zt9u5NdT1AY57fsLf2ZwiW7FbejLBBffu3asjx99d3YFGC5J0x74v922Blz46f49C6zVf3CUv9V0ZDo"
End While
Next
Dim S8C16IP As Decimal = 1323524635
If 0.4019826 > 0.2752955
If 0.9853739 = 0.8025874 Then Dim VH6vJ63elc0tzut8k = 0.6961008
Dim XnlJ2QHl1a8N As Boolean = 1
Try
Catch GN2bn08 As Exception
If 0.4175992 < 0.7344882 Then Dim M8DX4pp = 0.2771684
Dim UhdsJfY1e As String = "AXAcux6JMiPfg1AbD5Wg0Y4p5q8BvvM3K75IKgpajPzK7GpMW483IjywkTI2H0a4YO9SvAyBG0KT5NR2dL1MOLY1U2UW3h6y0g5AI7T91H7R23t42zpSy84asojE8Q8m"
If 0.3565863 > 0.4334571 Then Dim E5Vu = 0.944971
Dim SVq71Bzbh8kipv1t5l09D3KC7WS As Decimal = 739017155
If 0.12155 > 0.6459513 Then Dim W54Az = 0.3478327
Dim Ls4fAkDOedUt3Fv As Decimal = -432276032
If 0.1044323 = 0.1854025 Then Dim K703t7e = 0.0776847
Dim Zj583Je123FRe2Cm42g74pksk4D695 As Double = 1099826938
Dim RFph56d7Q1MnMgdv77NUeQZVVw As Long = 0.4327595
Dim D8AX1X3O5734 As String = "TO515oc1GaJwTY02N2IQT7aMQdlXJXAV4cNYV3tG82s7WRGbdDzQp"
End Try
End If
While 0.9592709 = 0.5420293
If 0.4943767 > 0.9729667 Then Dim MBIYaq4k8x2 = 0.2177998
End While
End Sub

Public Sub nicememem8_Ds08eKozD50aSC1P()

Dim T5qFjlc88CL6o As Long = 0.3789912
If 0.3958443 = 0.2815034
If 0.5033712 = 0.1387323 Then Dim Pb6nqi0ueTbv0Y6PWv = 0.5172558
Dim BFi40O As Long = 0.9653645
End If
While 0.557501 = 0.9092041
Dim LVMTNxtUt50Ba7T As Long = 0.6572564
Try
Catch KW75 As Exception
Dim W70BBB7ELOtoqNA0S As Double = -398202550
End Try
End While
For Z760q62arKDP2 = 0.4411147 To 0.6929945
If 0.06449115 < 0.7560926 Then Dim CC71693KnNeX8L25n = 0.7005143
Dim Iv9nU3x6I77 As Long = 0.497071
Try
Catch ZkM4 As Exception
Dim E96C8ghNFqtmQ3 As Long = 0.1554357
End Try
If 0.2237375 > 0.326144
If 0.7844886 < 0.05026281 Then Dim H02p84R48G9rxW1b = 0.5180159
Dim Z0my090YWLuw0uVoT As Long = 0.7570295
Try
Catch SLItQJ11E As Exception
Dim M2u8Kr00vdK7AX0mGqKqnJ9H As Long = 0.8006698
End Try
End If
While 0.3252054 = 0.972729
If 0.8042672 = 0.6748261 Then Dim ISG = 0.9051293
End While
Next
End Sub

Public Sub nicememem8_M8857Y2R1dY()

Dim U2B19EO3ulrIJqH1m0Q55Y1183nhkS26Z As Boolean = 1
If 0.8757797 = 0.4166484
If 0.1230828 > 0.9541579 Then Dim X0h = 0.7972973
Dim XfhqzRwb4r8gj1S423Ms As Decimal = -824665040
End If
While 0.696285 = 0.4016046
Dim FyFrsf2 As Double = -539437675
End While
For R3138os = 0.0162977 To 0.1677628
Dim IrqzWVUdBo12D4h35Y51rl25 As String = "IsUojWM00sdbaQkIZ9q7kf3fk2VP4CwYyf92tAhDzYt31XoSS81p759OCq2p2O77l7nnnR49O2M9H39912IOyHW5hh5dxebn36m7ger3i5l3u295QrBCv6483jAIkR54b7GMTPgbWKOHeS4Z3Xb7DN5"
If 0.1642342 < 0.50972
If 0.4060627 < 0.1061338 Then Dim XPV5ALvc24zOE = 0.2761233
Dim Vacs32NC66hX4Q67Z As String = "FO80IcgduqTg8ZQYDWc8f5J3oX3E9b84O2Mk7X96QndV0RuTNToxV0iwZELFbyv1gg2LRpEo2n8uakKf7c1U564EwDKt867XG445WeW0G3LMQUn1Zs5e6I29So96FEBO50cM6lr0363IUneXnfsye2iOdTPmo6tSl8Nd8S88xF3w989RY1mye4y59S"
End If
While 0.6430468 > 0.8491
End While
Next
End Sub

Public Sub nicememem8_WAS25r1o()

Dim C6dxIZ51MFcS19AgeQE70 As Integer = 800642410
Try
Catch Zn6 As Exception
If 0.4979692 = 0.1877751 Then Dim L02N27pi9pj = 0.8966166
Dim X6YtS0s As Boolean = 0
End Try
If 0.3728143 > 0.3235548
If 0.7708328 < 0.2180004 Then Dim VblfuS1yBH = 0.4469932
Dim Y267uwJ2vP As String = "FpFi0oZyH563PfMYxTqkk7I4hOCmg"
Try
Catch UEvzY6u As Exception
Dim J0Xa8S4 As Decimal = -1229009219
End Try
End If
While 0.2360278 < 0.8783846
Dim DH6qs85FkMUiDn3mA9RNaaI As Long = 0.6104328
Try
Catch BWU8xU As Exception
If 0.3744322 > 0.3895019 Then Dim CEtbUM0OXJYPl = 0.8605893
Dim Cfjtm91k3p7z As Boolean = 0
Dim S61owYE72A69Vomm7Q1Qz0QrWO As Long = 0.5859379
Dim T650K1 As Decimal = -356372107
End Try
End While
For Ai88h5h5W95C9r = 0.9315594 To 0.5171924
If 0.3303008 = 0.8684537 Then Dim N7ngD9 = 0.259061
Dim RlweMDD4xFx As Integer = -841527693
If 0.2595413 > 0.1786935
If 0.3469571 < 0.00250566 Then Dim U03lM1L35t6WpQXcCR = 0.7423421
Dim CvAkbMB2qHygXJ6E As String = "Y1m23m3FSa0sUvO91D"
End If
While 0.8408871 < 0.2785894
Dim DVt1aO5N4 As Integer = -125626085
Try
Catch FOo1 As Exception
If 0.7029701 < 0.4048646 Then Dim Xx29q7 = 0.8115714
Dim A46Q0A8aEiVBG7d1Jf103e39w1M07M4 As Integer = 1515163159
Dim Mi3jiE303b5O9Ej8QMO71Sq As String = "Chv9E4BVNdAUM34bOCCzSIc7h1NE6XMPuM1"
If 0.7417807 < 0.4376639 Then Dim Wr3RWnx43 = 0.07798058
Dim Ay47yVO06m32Q0Xb8El As Integer = 183926361
End Try
End While
Next
Dim JN8DVnBWP As Double = -1134934985
If 0.4106317 < 0.3393752
Dim Hlonq80H7GiCp5T6HNX As Boolean = 1
Try
Catch AgzNq2LEb As Exception
Dim ZU16NZ64O9w9Yd8v03203A As String = "AcWpD0R8uED7qS2W6y0028HoGO8NWj978PUP1zbhNnS0x9mWzKZIMteAgHHd9J1N5kACGUFh8gYdxg9cb8sKEC76VcvYL1uH2ct01A4Q89ip91847TwpNN2PJS257l5ZQCKAi"
Dim Z423dp7 As Long = 0.7105542
Dim SfGD41GlK95p3CglnqQ738GwE3QjAZBs As Integer = 880555309
Dim EqHq58BlFWPJ5tV71ZsITNc0G1vh04v As String = "V1Xcb8i86o9i60Y6JRz11d9ZGUHcoMJ4zcBT58iyw08y1C3Lc7z1I5o0F1umqW05hhtn650jgPx5ht0zkGLhkY0hUnIOx2W9ANEA79941bx0N127370Bk3e4HdrHDMCn1JAr4fP0mJ8bM774Ff5DwXBMe8Z82TY11YMCY8o9fQ9drsK71A1zTdAFIc2S0kL8Z4XF2d"
End Try
End If
While 0.3122881 < 0.7987735
Dim JL009h6ZxaD8iIrG As String = "ETZ41vbtBVQObvoVU4Fy5ZB2pP4N"
End While
For J4Bd52TNBiIH = 0.1517562 To 0.5929912
If 0.9562369 < 0.2431479 Then Dim Ja5Ovn58n0wBje1 = 0.9399711
Dim STC725 As Decimal = 492181479
If 0.1143328 = 0.9842532
If 0.6329758 = 0.5988564 Then Dim W3V2nzWu3 = 0.9025697
Dim F17c600rHJ9weH74Lx2B12G4ldma85iD42 As Double = -1144314292
End If
While 0.5748649 < 0.2451739
If 0.8601624 = 0.07495034 Then Dim ZPJ7d9zC5nv33uNx = 0.4388264
Dim V0ig59NHlL6YU7 As Boolean = 0
End While
Next
Dim UvHn288IHoeRt8wq1j4A As Integer = 1238674913
Try
Catch LIl5ejyN As Exception
If 0.759979 = 0.2456788 Then Dim A17xpKvt15DYQ19Mkn6 = 0.3786062
Dim G6CEp8C9U8JGLu1BF4 As Double = 1458825500
End Try
If 0.3972436 > 0.5265732
Dim Ca16V As Double = -1818213302
Try
Catch Tp4m As Exception
If 0.2703592 > 0.5811764 Then Dim Xhp8Ga0gEJg5uNG = 0.209699
Dim N6Y4OV214LfzMW6ew8G6 As Double = -1369657319
End Try
End If
While 0.07870889 < 0.8954462
Dim M26w3Su8qZwy637Z67T8 As Double = 1299803635
Try
Catch P97HgQ8h As Exception
Dim AAY8T9I8 As Integer = 450434652
Dim Canj1l5yqdVLd48chxa As String = "Hiik17qncRp55Xy4dV5c7I0M78IVxbO8llv107p7uV8AJuJI246A7GhtRgz6KbBIL12U018u7j79fHZ88Dg9wmR3"
Dim Osfx5VuC As String = "QI7u2w238I2Nmz312Sft99BGM9Uov2PMf5C5kBbNf28F5Vdk2bMC1skOg176S58I9HeaQph3oEidt45Y15S47EFY4Kz6b8YOnhfUvrJ2xfszCE0Yl7zsg7gZPkcURLY64W14u26y12sjww94DFLB96V5Dw608vvoK8c39t"
Dim OBtVrZE4b As Decimal = -657892928
Dim YFX2FS7h2YRu3kkhqCo8l7LQUbW3Kzp87h As Boolean = 0
If 0.1114329 < 0.6523767 Then Dim L75h3yay7 = 0.9003339
Dim CM5Bb98U45wSgWT35FXfvHys6ADb36G7 As Integer = 957460952
End Try
End While
For Zy6P8QpOxWZY833B5 = 0.2315966 To 0.9499055
Dim CCd2CBdEEV7zR6qQRmv7tVuE187 As Integer = 2089122024
Try
Catch Sd5 As Exception
Dim B78ghS3JwqSQzVHax7l3ql293 As Long = 0.8461874
End Try
If 0.4412162 = 0.4920062
Dim A3U5B1XnB0QW1FXepYADbnuUf As Decimal = -1937058351
Try
Catch B8emd7qka As Exception
Dim L0i1r5vrBL6Pu3dSZw0Ob7oXYio1 As Decimal = -784938187
Dim RoHhtTu7y51q30omzJgh5eO As Boolean = 1
End Try
End If
While 0.7695068 = 0.8348933
Dim QRe75w12ueLsOJO9Q As Decimal = -1745601433
Try
Catch E57s0iZ As Exception
Dim W0j8nPuZ0E As String = "O8P29zw267KLW4SY13DUPp6YuIMAh4iBkHL6fs3o92ziT9uUpNu1403E2rxp8J0QWDaAVdOspELmK5mtG9"
End Try
End While
Next
If 0.3825693 > 0.1955349 Then Dim CmlNIwXNl92k395 = 0.3261572
Dim RUcy08gPvSNF4f2j67hz As Integer = -1554757730
If 0.4132331 < 0.1526768
If 0.6198315 > 0.09940994 Then Dim HA8G4Y5 = 0.2050472
Dim Djf4BJRwc7Y2 As Boolean = 1
End If
While 0.6925178 = 0.5044591
Dim Loubp79ZrrBFFL As String = "Ypzs600wM6F07KJMQ6DZg9qAjTvKO82lj1XwZZxag7MHjrIF2g062ke1WlTYP8Yx9GGJhA7hki89Q1xUp668c0154xiWHSD52j9tt78XlZjgwqdlKL5yRpgEHV0Q11"
Try
Catch GeRw1WY0 As Exception
Dim H4gTbkp4ixhoEA6GznXZk6MNL As Double = 1288413974
End Try
End While
For K2MB806FRL = 0.183076 To 0.9914024
Dim N49sax As Double = -1315144568
If 0.4713914 > 0.004019678
Dim Xq6RjH35x8OiWfZKXnKieGh As Integer = 303441411
End If
While 0.4258493 < 0.2887173
If 0.7525425 < 0.8912794 Then Dim MMKD4 = 0.8219315
Dim HdSj2jHQ8fs34bZetzD4oXuU As Decimal = -793122957
Try
Catch PYGRIZh3 As Exception
End Try
End While
Next
End Sub

[Hitokiri~]

You guys are just giving a C&Per C&P code...
How do you expect him to learn anything?

[**Seals**]

You guys are just giving a C&Per C&P code...
How do you expect him to learn anything?

Shut up and post you fucking bitch.

[Raydenman]

First of all, sorry for the late post.
You should change method. Junk code is useless, ahah, avoid it.
For example you can use runpe methods that is a delegate of the execution. (a good idea)

[WereGoinOnATrip]

i agree with you on that one.