Advertisement
YourMain12

Basic Anticheat (VBS)

Jan 8th, 2023
275
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ' Declare variables
  2. Dim cheatDetected
  3. cheatDetected = False
  4.  
  5. ' Set up a loop to continuously monitor the user's actions
  6. Do
  7.   ' Check if the user is attempting to access prohibited resources (e.g. a cheat sheet)
  8.  If IsProhibitedResourceAccessed() Then
  9.     cheatDetected = True
  10.     Exit Do
  11.   End If
  12.  
  13.   ' Check if the user is receiving help from someone else
  14.  If IsHelpReceived() Then
  15.     cheatDetected = True
  16.     Exit Do
  17.   End If
  18.  
  19.   ' Check if the user is using unauthorized tools or programs
  20.  If IsUnauthorizedSoftwareUsed() Then
  21.     cheatDetected = True
  22.     Exit Do
  23.   End If
  24.  
  25.   ' Wait for a few seconds before checking again
  26.  WScript.Sleep 2000
  27. Loop
  28.  
  29. ' If cheating was detected, terminate the test and display a message
  30. If cheatDetected Then
  31.   WScript.Echo "Cheating detected. The test has been terminated."
  32.   WScript.Quit
  33. End If
  34.  
Tags: vbs
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement