# here ya go, brand spanking new addons/bx for all you addon freaks
# check out the new and improved code, have fun spamming your /sv's

@ addons.list = addons.list
@ addons.orig = addons.orig

if (!addons()) {
	alias addons return 3.0
	@ addons.orig = format_version
}{^addcls}

alias randa return $mid($rand(25) 1 abcdefghijklmnopqrstuvwxyz)

@ setitem(addons 0 \(c\)rotchrot/bX \[$rand(9).$rand(9).$rand(9)\])
@ setitem(addons 1 RovahX$rand(9).$rand(9)á)
@ setitem(addons 2 revolver%%\($rand(99)x$rand(9)\))
@ setitem(addons 3 \[m\]onkey \[b\]allz/\[$rand(9).$rand(9).$rand(9)\])
@ setitem(addons 4 peeinsnapple/v$rand(9).$rand(9)$randa())
@ setitem(addons 5 \[fag/bx!$rand(9).$rand(9)$randa()\])
@ setitem(addons 6 \[unconstipate!$rand(9).$rand(9)\])
@ setitem(addons 7 funnelvision/$rand(99))
@ setitem(addons 8 \(g\)oat\(s\)hmak $rand(9).$rand(9)á)
@ setitem(addons 9 sHiTN\[$rand(99)/$rand(99)/$rand(99)\])
@ setitem(addons 10 \[Genital\($rand(9).$rand(99)$randa()\) by BlackJac\])
@ setitem(addons 11 ùcl\(i\)tz\[v$rand(9).$rand(9)$randa()\]ù)
@ setitem(addons 12 dIK/bX \[$rand(9).$rand(9)á\])
@ setitem(addons 13 \[n\(o\)tmuch v$rand(9).$rand(999) gamma\])
@ setitem(addons 14 stratosbeer\($rand(9)$randa()\))
@ setitem(addons 15 ScrotumXx\(v$rand(9).$rand(9).$rand(9)\))
@ setitem(addons 16 hardons/bX v$rand(9).$rand(9))
@ setitem(addons 17 boar/bX%%$rand(9).$rand(99)\(slut\))
@ setitem(addons 18 .x%%\(Breast v$rand(9).$rand(9)FiNaL\)%%x.)
@ setitem(addons 19 hive $rand(9).$rand(9)\(after.fuck\))
@ setitem(addons 20 ladies+vid\[v$rand(9).$rand(99)\])
@ setitem(addons 21 defecation/vibrator \[$rand(9).$rand(9)$randa()\])
@ setitem(addons 22 SrfRoG's WiFe v$rand(9).$rand(9).$rand(9))
@ setitem(addons 23 desecrate/$rand(9)$randa())
@ setitem(addons 24 calfdink/$rand(9).$rand(9))
@ setitem(addons 25 \[inyerface/$rand(9)\] :big.shit)
@ setitem(addons 26 whoreizon v4.5.3)
@ setitem(addons 27 \[lickalottapuss\] v\($rand(9).$rand(9).$rand(9)\|b$rand(9)\))

alias addons if (pattern(-% $0)) {
	switch ($pattern(-% $0)) {
		(-c) {
			@ addons.list = []
			^fset format_version $addons.orig
		}
		(-a) {
			fe ($getmatches(addons *)) item {^addons -v $item}
		}
		(-l) {
			fe ($getmatches(addons *)) item {
				xecho -s -b [$[-2]item] $getitem(addons $item))
			}
		}
		(-n) {
			if (strlen($1-)) {
				@ setitem(addons $numitems(addons) $1-)
				xecho -s -b version ${numitems(addons) - 1} added
			}
		}
		(-s) {
			@ unlink(~/.ircrc.addons)
			@ file = open(~/.ircrc.addons W)
			fe ($getmatches(addons *)) item {
				@ write($file @ setitem\(addons $item $getitem(addons $item)\))
			}
			@ close($file)
			xecho -s -b addons versions saved to ~/.ircrc.addons
		}
		(-v) {
			if (([$1] > -1) && ([$1] < numitems(addons))) {
				if (!match($1 $addons.list)) {
					@ push(addons.list $1)
					xecho -s -b version $1 loaded
					^fset format_version $format_version + $getitem(addons $1)
				}{
					xecho -s -b version $1 is already loaded
				}
			}{
				@ temp = rand($numitems(addons))
				if (!match($temp $addons.list)) {
					@ push(addons.list $temp)
					xecho -s -b version $temp loaded
					^fset format_version $format_version + $getitem(addons $temp)
				}
			}
		}
	}
}{
	xecho -s -b usage: /addons <-c|-a|-l|-n|-s|-v> [arguments]
}

^load ~/.ircrc.addons
do xecho -b usage: /addons <-c|-a|-l|-n|-s|-v> [arguments]