UPDATE -
I have uploaded a new .zip file that now contains the source .txt files and the .ahk script, rather than an .exe . This is to ensure that there are no viruses.
WARNING: CONTAINS FOUL LANGUAGE!
RaNVingNVer is short for "Random Noun Verb(ing) Noun Verb(er)"
I created it with the intention of it being a random insult generator, but it can easily be modified to your liking by adding words to the source files.
If you accidentally lose the source files, just run the program to restore the defaults.
I hope you have as much fun using RaNVingNVer as I did making it.
And here is the source, as requested. I can promise you there are no viruses. I know that's what everyone says, but honestly, I do not condone them, nor would I ever post them. So yeah. Here ya go.
Code:
FileInstall, Noun.txt, Noun.txt
FileInstall, Verbing.txt, Verbing.txt
FileInstall, Verber.txt, Verber.txt
FileInstall, ReadMe.txt, ReadMe.txt
Loop, Read, Noun.txt
{
Noun%A_Index% = %A_LoopReadLine%
NounMax = %A_Index%
}
Loop, Read, Verbing.txt
{
Verbing%A_Index% = %A_LoopReadLine%
VerbingMax = %A_Index%
}
Loop, Read, Verber.txt
{
Verber%A_Index% = %A_LoopReadLine%
VerberMax = %A_Index%
}
Insult:
Random, RandN1, 1, %NounMax%
Random, RandVing, 1, %VerbingMax%
Random, RandN2, 1, %NounMax%
Random, RandVer, 1, %VerberMax%
RandNoun1 := Noun%RandN1%
RandVerbing := Verbing%RandVing%
RandNoun2 := Noun%RandN2%
RandVerber := Verber%RandVer%
Gui, Destroy
Gui, Add, Text,,%RandNoun1% %RandVerbing% %RandNoun2% %RandVerber%`n
Gui, Add, Button, Default gInsult, Generate`nNew
Gui, Show, Center AutoSize, RaNVingNVer
Return
GuiClose:
ExitApp
GuiEscape:
ExitApp
-->
Download<--
(updated link)
Login
Register
FAQ
Search
. I see where you guys are coming from though.
.