i have vista so it includes .vbs and .txt and .bat but dont put that in the name of it.
Hello,alot of people dont believe but you can make stuff in notepad,if anyone knows .bat (batch) or .vbs (visual basic script) please tell me.I am working on a runescape client and its still not that good.
It has:
*Reminder
*Calculator
*Username Remember
*Status box
*Auto typer
*Reminder
*time
*date
*day
I was wondering if anyone knew it if they could put all my stuff together right now i have a .batch file and 2 .vbs files.
here are all the codes for my rs client.
1. first .batch file
Code:
title Runescape Helper Remake V0.1
cls
@EcHo off
:RSC
echo. >> Notes.txt
echo. >> UsernameSaver.txt
cls
color 0A
SetLocal EnableDelayedExpansion
set content=
for /F "delims=" %%i in (Notes.txt) do set content=!content! %%i
echo.
echo 1)Use Calculator Runescape Client Remake
echo 2)Edit Notes Batch Edition V0.1
echo 3)Use Username Saver By Lucasheer
echo.
echo --------Runescape Helper Remake V0.1 ----------
echo --------Current time is %time%. ----------
echo --------Current date is %date%. -------
echo --------Upgrades Are not Avalible. -------------
echo.
echo Notes: %content%
set /p rc=
if %rc%==1 goto cal
if %rc%==2 goto note
if %rc%==3 goto note1
:invalid
cls
echo.
echo Something Was Invalid Sorry.
echo.
echo Continue Y\N
set /p ans=
if %ans%==Y goto RSC
if %ans%==y goto RSC
if %ans%==N goto invalid
if %ans%==n goto invalid
:cal
cls
ECHO * = MULTIPLY
ECHO + = ADD
ECHO - = SUBTRACT
ECHO / = DIVIDE
:loop
echo.
SET /p UDefine=
SET /a UDefine=%UDefine%
ECHO =
ECHO %UDefine%
ECHO.
ECHO Keep Useing Calculator?
ECHO Y\N
set /p number=
if %number%==Y goto cal
if %number%==y goto cal
if %number%==N goto RSC
if %number%==n goto RSC
:note
cls
echo.
echo ---------Notes----------
echo.
SetLocal EnableDelayedExpansion
set content=
for /F "delims=" %%i in (Notes.txt) do set content=!content! %%i
echo %content%
echo.
echo 1)Reset Notes
echo 2)Go Back
set /p va=
if %va%==1 goto ch1
if %va%==2 goto RSC
:invalid2
cls
echo.
echo Something Was Invalid Sorry.
echo.
echo Continue Y\N
set /p ans1=
if %ans1%==N goto RSC
if %ans1%==n goto RSC
if %ans1%==Y goto invalid2
if %ans1%==y goto invalid2
:note1
cls
echo -------------Username Saver-------------
echo.
SetLocal EnableDelayedExpansion
set content=
for /F "delims=" %%i in (UsernameSaver.txt) do set content=!content! %%i
echo %content%
echo.
echo Return to Start?
echo Continue Y\N
set /p ans2=
if %ans2%==N goto RSC
if %ans2%==n goto RSC
if %ans2%==Y goto note1
if %ans2%==y goto note1
:invalid3
cls
echo.
echo Something was invalid....
pause
goto RSC
:ch1
cls
echo. >> Notes.txt
echo.
echo Notes Reseted....
echo.
echo Continue Y\N
set /p ans2=
if %ans2%==N goto RSC
if %ans2%==n goto RSC
if %ans2%==Y goto ch1
if %ans2%==y goto ch1
*
Code
First .vbs file :
set shell = createobject ("wscript.shell")
strtext = inputbox ("Write down your message you like to spam")
strtimes = inputbox ("How many times do you like to spam?")
strspeed = inputbox ("How many seconds till it will spam again (1000 = 1 second)")
strtimeneed = inputbox ("How many seconds do you need till spam starts?")
If not isnumeric (strtimes & strspeed & strtimeneed) then
msgbox "You entered something else then a number on Times, Speed and/or Time need. shutting down"
wscript.quit
End If
strtimeneed2 = strtimeneed * 1000
do
msgbox "You have " & strtimeneed & " seconds to get to your input area where you are going to spam."
wscript.sleep strtimeneed2
shell.sendkeys ("Spambot activated" & "{enter}")
for i=0 to strtimes
shell.sendkeys (strtext & "{enter}")
wscript.sleep strspeed
Next
shell.sendkeys ("Spambot deactivated" & "{enter}")
wscript.sleep strspeed * strtimes / 10
returnvalue=MsgBox ("Want to spam again with the same info?",36)
If returnvalue=6 Then
Msgbox "Ok Spambot will activate again"
End If
If returnvalue=7 Then
msgbox "Shutting down"
wscript.quit
End IF
loop
*
Code:
Second .vbs File's code:
set shell = createobject ("wscript.shell")
strtimeneed = inputbox ("How many seconds do you need till remind?")
If not isnumeric (strtimes & strspeed & strtimeneed) then
msgbox "You entered something else then a number on Times, Speed and/or Time need. shutting down"
wscript.quit
End If
strtimeneed2 = strtimeneed * 1000
do
msgbox "You have " & strtimeneed & " seconds till reminder..."
wscript.sleep strtimeneed2
shell.sendkeys ("reminder activated" & "{enter}")
for i=0 to strtimes
shell.sendkeys (strtext & "{enter}")
wscript.sleep strspeed
Next
shell.sendkeys ("reminder deactivated" & "{enter}")
wscript.sleep strspeed * strtimes / 10
returnvalue=MsgBox ("You Told me to Remind you about something,want me to do it again?",36)
If returnvalue=6 Then
Msgbox "i will remind you again.."
End If
If returnvalue=7 Then
msgbox "why master!!!,why do u hate me?NOOOOOOO dont do it,beeeeeeeeeep"
wscript.quit
End IF
loop
*
Then make a .txt file and name it Notes.txt (make sure the name is exactly like that)
Make another txt file and name it UsernameSaver.txt (Make sure the name is exactly like that)
Thanks,the current verson is 0.1 and if u wanna claim it as if you made it,im fine with that.thanks
i have vista so it includes .vbs and .txt and .bat but dont put that in the name of it.
U had *Reminder twice in the first post.
This belongs in the Programming section i guess...