Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @echo off
- :start
- if not "%minimized%"=="" goto :minimized
- set minimized=true
- start /min cmd /C "%~dpnx0"
- goto :EOF
- :minimized
- :Process_NotFound
- echo YourProgram is not running
- IF "%Out%"=="" Siri.vbs
- goto start
- PATH=C:\Users\xWheatleyy\Desktop
- Siri.vbs >nul
- if ERRORLEVEL 1 goto Process_NotFound
- :Process_Found
- echo YourProgram is running
- goto start
- SET Out=1
- taskkill /F /IM cmd.exe
- taskkill /F /IM wscript.exe
- taskkill /F /IM notepad.exe
- Save that file as program.bat, and switch "xWheatleyy" with your username for your computer
- VBS file
- Dim RA
- RA = InputBox("Hello, how can I help you?")
- A1 = "Hi there"
- B1 = "What's the time?"
- C1 = "Maths"
- C2 = "+"
- C3 = "-"
- C4 = "/"
- C5 = "*"
- If RA = A1 Then
- MsgBox "Hello to you too"
- Else
- If RA = B1 Then
- MsgBox Now
- Else
- If RA = C1 Then
- x = InputBox("Enter first value")
- f = InputBox("Input function")
- y = InputBox("Enter second value")
- a = x * 1
- B = y * 1
- If f = C2 Then
- c = a + b
- MsgBox c, , "The answer is"
- Else
- If f = C3 Then
- c = a - b
- MsgBox c, , "The answer is"
- Else
- If f = C4 Then
- c = a / b
- MsgBox c, , "The answer is"
- Else
- If f = C5 Then
- c = a * b
- MsgBox c, , "The answer is"
- End If
- End If
- End If
- End If
- End If
- End If
- End If
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement