Skip to content
MPGHThe Dark Arts
/
RegisterLog in
Forum
Community
What's NewLatest posts across the boardTrendingHottest threads right nowSubscribedThreads you follow
Discussion
GeneralIntroductionsEntertainmentDebate FortFlaming & Rage
Board
News & AnnouncementsMPGH TimesSuggestions & HelpGiveaways
More Sections
Art & Graphic DesignProgrammingHackingCryptocurrency
Hacks & Cheats
Games
ValorantCS2 / CS:GOCall of Duty / WarzoneFortniteApex LegendsEscape From Tarkov
+14 moreLeague of LegendsGTA VMinecraftRustROTMGBattlefieldTroveBattleOnCombat ArmsCrossFireBlackshotRuneScapeDayZDead by Daylight
Resources
Game Hacking TutorialsReverse EngineeringGeneral Game HackingAnti-CheatConsole Game Hacking
Tools
Game Hacking ToolsTrainers & CheatsHack/Release NewsNew
Submit a release →Share your cheat, tool, or config with the community.
AINEW
AI Tools
General & DiscussionPrompt EngineeringLLM JailbreaksHotAI Agents & AutomationLocal / Open Models
AI × Gaming
AI Aimbots & VisionML Anti-CheatGame Bots & Automation
Create
AI Coding / Vibe CodingAI Art & MediaAI Voice & TTS
The AI frontier →Where game hacking meets modern machine learning. Jump in.
Marketplace
Buy & Sell
SellingBuyingTradingUser Services
Trust & Safety
Middleman LoungeMarketplace TalkVouch Copy Profiles
Money
Cryptocurrency TalkCurrency ExchangeWork & Job Offers
Start selling →List accounts, services, and goods. Use the middleman to trade safe.
MPGH The Dark Arts

A community for offensive security research, reverse engineering, and AI.

Community

ForumMarketplaceSearch

Account

RegisterLog in

Legal

Privacy PolicyForum RulesHelp & FAQ
© 2026 MPGH · All rights reserved.Built by the community, for the community. For educational purposes onlyContent is shared for security research and education — we don't condone illegal use. You're responsible for complying with applicable laws. Use at your own risk.
Home › Forum › Programming › Visual Basic Programming › if anyone has junk code generator throw me some junk code here please

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

Posts 1–8 of 8 · Page 1 of 1
FW
fwsefwsgrgwhergr
if anyone has junk code generator throw me some junk code here please
if anyone has junk code generator throw me some junk code here please
#1 · 11y ago
Hitokiri~
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.
#2 · 11y ago
steveroseik
steveroseik
I'll be more helpfull here:

this it the Function code:
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):
Code:
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.
#3 · 11y ago
signal101
signal101
Code:
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
#4 · 11y ago
Hitokiri~
Hitokiri~
You guys are just giving a C&Per C&P code...
How do you expect him to learn anything?
#5 · 11y ago
**Seals**
**Seals**
Quote Originally Posted by Hitokiri~ View Post
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.
#6 · 11y ago
RA
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)
#7 · edited 11y ago · 11y ago
WE
WereGoinOnATrip
i agree with you on that one.
#8 · 11y ago
Posts 1–8 of 8 · Page 1 of 1

Post a Reply

Similar Threads

  • League Of Legends Tournament Code Generator And Decoder [Not Promo Codes]By halearn in League of Legends Hacks & Cheats
    102Last post 10y ago
  • Anyone Have A Steam Code GeneratorBy KobAbry in Payday 2 Hacks & Cheats
    2Last post 11y ago
  • If anyone has a nexus emu code...By Sitting in WarZ Discussion
    2Last post 13y ago
  • Warrock Retail Code GeneratorBy Dave84311 in Hack/Release News
    572Last post 16y ago

Tags for this Thread

None