13 Jun 11, 05:29AM
[SELECT ALL] Code:
// This file gets executed every time you start AssaultCube.
// This is where you should put any scripts you may have created for AC.
bind q [say "BOOM HEADSHOT!!! :D"]
exec config\tools.cfg
exec config\achievements.cfg
exec config\servershare.cfg
autoreloadpistol = [ if (|| (= (curweapon) 1) (= (curweapon) 9)) [ autoreload 1 ] [ autoreload 0 ] ]
weapons2autoreload = "3 5"
check_weaps = [
loop cwl (listlen $weapons2autoreload) [
if (= (curweapon) (at $weapons2autoreload $cwl)) [
if (! (magcontent (curweapon))) [
reload
]
]
]
]
add2conloop check_weaps
// Smooth Zoom script, 1.1.0.4 redux by V-Man; previous work by kirin and Gibstick.
// Requires tools.cfg -- http://www.akimbo.in/files/index.php?act=view&id=723
// Bind "smoothzoom" to the key you wish to use for this purpose.
loop chk 6 [
checkinit (at [dfov zoominrate zoomoutrate zoomfov zoomcrosshair zoomsensscale] $chk) (at [$fov 250 125 75 15 1] $chk)
]
alias zoomingin 0
alias zoomingout 0
alias smoothzoom [
if (= (curweapon) 5) [altaction_5] [
getfov = $fov
getsens = $sensitivity
cchs = $crosshairsize
gethudgun = $hudgun
alias zoominstarttime (millis)
alias zoomingin 1
sensitivity (*f $zoomsensscale (*f $getsens (divf $fov $getfov)))
crosshairsize $zoomcrosshair
hudgun 0
onrelease [
alias zoomoutstarttime (millis)
alias zoomingout 1
sensitivity $getsens
crosshairsize $cchs
hudgun $gethudgun]] []]
add2conloop [
if $zoomingin [
alias newfov (-f $fov (*f (-f $getfov $zoomfov) (divf (-f (millis) $zoominstarttime) $zoominrate)))
if (>=f $newfov $zoomfov) [fov $newfov] [fov $zoomfov; alias zoomingin 0]] []]
add2conloop [
if $zoomingout [
alias newfov (+f $fov (*f (-f $getfov $zoomfov) (divf (-f (millis) $zoomoutstarttime) $zoomoutrate)))
if (<=f $newfov $getfov) [fov $newfov] [fov $getfov; alias zoomingout 0]] []]
newmenu "Smooth Zoom"
menuitemtextinput [Zoomed FOV (extent to which FOV zooms): ] [result $zoomfov] [alias zoomfov $arg1] 3
menuitemtextinput [Zoom-in rate (higher is slower): ] [result $zoominrate] [alias zoominrate $arg1] 6
menuitemtextinput [Zoom-out rate (higher is slower): ] [result $zoomoutrate] [alias zoomoutrate $arg1] 6
menuitemtextinput [Zoom crosshair size: ] [result $zoomcrosshair] [alias zoomcrosshair $arg1] 1
menuitemtextinput [Zoom sensitivity scale (1.0 is linear): ] [result $zoomsensscale] [alias zoomsensscale $arg1] 3
menuitem [ Apply Now! ] [closemenu]
add2menu "HUD" [menuitem "Smooth Zoom Menu" [closemenu "HUD"; showmenu "Smooth Zoom"]]
bind "P" [showmenu "Private Servers"]
//Private servers menu
newmenu "Private Servers"
menuitem [Do you wish to use the SpamConnect feature?] -1
menuitem [] -1
menuitemvar [concatword (c 3) "Yes"] [showmenu "Private Connects (SpamConnect)"]
menuitemvar [concatword (c 1) "No"] [showmenu "Private Connects"]
//Private Connects w/ SpamConnect
newmenu "Private Connects (SpamConnect)"
menuitemvar [concatword (c 3) "B}"] [showmenu "B} (SpamConnect)"]
menuitemvar [concatword (c 9) "BC"] [showmenu "BC (SpamConnect)"]
menuitemvar [concatword (c 2) "BCFH"] [sleep 500 [say "/connect helvete.bcfh.eu 3040 war"]; sleep 1000 [say "/connect helvete.bcfh.eu 3040 war"]; sleep 2000 [connect helvete.bcfh.eu 3040 war]]
menuitemvar [concatword (c 2) "eQ"] [sleep 500 [say "/connect eq-match.no-ip.org 5555 match"]; sleep 1000 [say "/connect eq-match.no-ip.org 5555 match"]; sleep 2000 [connect eq-match.no-ip.org 5555 match]]
menuitemvar [concatword (c 3) "legacy " (c 5) "(hitreg bug fixed)"] [sleep 500 [say "/connect legacysrv.tk 9999 match"]; sleep 1000 [say "/connect legacysrv.tk 9999 match"]; sleep 2000 [connect legacysrv.tk 9999 match]]
menuitemvar [concatword (c 1) "Mewtwo"] [showmenu "Mewtwo (SpamConnect)"]
menuitemvar [concatword (c 7) "MyS"] [showmenu "MyS (SpamConnect)"]
menuitemvar [concatword (c 0) "oNe"] [sleep 500 [say "/connect one.asrv.tk 8010"]; sleep 1000 [say "/connect one.asrv.tk 8010"]; sleep 2000 [connect one.asrv.tk 8010]]
menuitemvar [concatword (c 2) "Server Of Justice"] [sleep 500 [say "/connect ac-jamz.com 20000 match"]; sleep 1000 [say "/connect ac-jamz.com 20000 match"]; sleep 2000 [connect ac-jamz.com 20000 match]]
menuitemvar [concatword (c 3) "TyD"] [sleep 500 [say "/connect tearyoudown.com 21000 match"]; sleep 1000 [say "/connect tearyoudown.com 21000 match"]; sleep 2000 [connect tearyoudown.com 21000 match]]
menuitemvar [concatword (c 1) "w00p"][showmenu "w00p (SpamConnect)"]
//BC
newmenu "BC (SpamConnect)"
menuitemvar [concatword (c 3) BC (c 5) " Match Server #1 " (c 3) UK] [sleep 500 [say "/connect bcuk.pwnz.org 10004 match"]; sleep 1000 [say "/connect bcuk.pwnz.org 10004 match"]; sleep 2000 [connect bcuk.pwnz.org 10004 match]]
menuitemvar [concatword (c 3) BC (c 5) " Match Server #2 " (c 3) UK] [sleep 500 [say "/connect bcuk.pwnz.org 10006 match"]; sleep 1000 [say "/connect bcuk.pwnz.org 10006 match"]; sleep 2000 [connect bcuk.pwnz.org 10006 match]]
//Mewtwo
newmenu "Mewtwo (SpamConnect)"
menuitemvar [concatword (c 3) "Mewtwo " (c 5) 8888] [sleep 500 [say "/connect mewtwo.tk 8888 match"]; sleep 1000 [say "/connect mewtwo.tk 8888 match"]; sleep 2000 [connect mewtwo.tk 8888 match]]
menuitemvar [concatword (c 3) "Mewtwo " (c 5) 7777] [sleep 500 [say "/connect mewtwo.tk 7777 match"]; sleep 1000 [say "/connect mewtwo.tk 7777 match"]; sleep 2000 [connect mewtwo.tk 7777 match]]
//MyS
newmenu "MyS (SpamConnect)"
menuitemvar [concatword (c 3) MyS (c 5) " Match #1 " (c 3) GER] [sleep 500 [say "/connect mys.aa.am 21111 match"]; sleep 1000 [say "/connect mys.aa.am 21111 match"]; sleep 2000 [connect mys.aa.am 21111 match]]
menuitemvar [concatword (c 3) MyS (c 5) " Match #2 " (c 3) GER] [sleep 500 [say "/connect mys.aa.am 22222 match"]; sleep 1000 [say "/connect mys.aa.am 22222 match"]; sleep 2000 [connect mys.aa.am 22222 match]]
menuitemvar [concatword (c 3) MyS (c 5) " Match #3 " (c 3) GER] [sleep 500 [say "/connect mys.aa.am 23333 match"]; sleep 1000 [say "/connect mys.aa.am 23333 match"]; sleep 2000 [connect mys.aa.am 23333 match]]
menuitemvar [concatword (c 3) MyS (c 5) " 3333 |Match| " (c 3) GER] [sleep 500 [say "/connect mys.aa.am 33333 match"]; sleep 1000 [say "/connect mys.aa.am 33333 match"]; sleep 2000 [connect mys.aa.am 33333 match]]
menuitemvar [concatword (c 3) MyS (c 5) " 4444 |Match| " (c 3) GER] [sleep 500 [say "/connect mys.aa.am 44444 match"]; sleep 1000 [say "/connect mys.aa.am 44444 match"]; sleep 2000 [connect mys.aa.am 44444 match]]
menuitemvar [concatword (c 3) MyS (c 5) " 5555 |Match| " (c 3) GER] [sleep 500 [say "/connect mys.aa.am 55555 match"]; sleep 1000 [say "/connect mys.aa.am 55555 match"]; sleep 2000 [connect mys.aa.am 55555 match]]
//w00p
newmenu "w00p (SpamConnect)"
menuitemvar [concatword (c 3) "hlin " (c 5) 9999] [sleep 500 [say "/connect hlin.woop.us 9999 match "]; sleep 1000 [say "/connect hlin.woop.us 9999 match"]; sleep 2000 [connect hlin.woop.us 9999 match]]
menuitemvar [concatword (c 3) "hlin " (c 5) 8999] [sleep 500 [say "/connect hlin.woop.us 8999 match "]; sleep 1000 [say "/connect hlin.woop.us 8999 match"]; sleep 2000 [connect hlin.woop.us 8999 match]]
menuitemvar [concatword (c 3) "hlin " (c 5) 7999] [sleep 500 [say "/connect hlin.woop.us 7999 match "]; sleep 1000 [say "/connect hlin.woop.us 7999 match"]; sleep 2000 [connect hlin.woop.us 7999 match]]
menuitemvar [concatword (c 3) "dula " (c 5) 9999] [sleep 500 [say "/connect dula.woop.us 9999 match "]; sleep 1000 [say "/connect dula.woop.us 9999 match"]; sleep 2000 [connect dula.woop.us 9999 match]]
//B}
newmenu "B} (SpamConnect)"
menuitemvar [concatword (c 3)"B} " (c 5) Bold] [sleep 500 [say "/connect bcubed.pbclan.tk 1492"]; sleep 1000 [say "/connect bcubed.pbclan.tk 1492"]; sleep 2000 [connect bcubed.pbclan.tk 1492]]
menuitemvar [concatword (c 3)"B} " (c 5) Dauntless] [sleep 500 [say "/connect bcubed.pbclan.tk 1927"]; sleep 1000 [say "/connect bcubed.pbclan.tk 1927"]; sleep 2000 [connect bcubed.pbclan.tk 1927]]
//Private Connects w/o SpamConnects
newmenu "Private Connects"
menuitemvar [concatword (c 3) "B}"] [showmenu "B}"]
menuitemvar [concatword (c 9) "BC"] [showmenu "BC"]
menuitemvar [concatword (c 2) "BCFH"] [connect helvete.bcfh.eu 3040 war]
menuitemvar [concatword (c 2) "eQ"] [connect eq-match.no-ip.org 5555 match]
menuitemvar [concatword (c 3) "legacy " (c 5) "(hitreg bug fixed)"] [connect legacysrv.tk 9999 match]
menuitemvar [concatword (c 1) "Mewtwo"] [showmenu "Mewtwo"]
menuitemvar [concatword (c 7) "MyS"] [showmenu "MyS"]
menuitemvar [concatword (c 0) "oNe"] [connect one.asrv.tk 8010]
menuitemvar [concatword (c 2) "Server Of Justice"] [connect ac-jamz.com 20000 match]
menuitemvar [concatword (c 3) "TyD"] [connect tearyoudown.com 21000 match]
menuitemvar [concatword (c 1) "w00p"][showmenu "w00p"]
//BC
newmenu "BC"
menuitemvar [concatword (c 3) BC (c 5) " Match Server #1 " (c 3) UK] [connect bcuk.pwnz.org 10004 match]
menuitemvar [concatword (c 3) BC (c 5) " Match Server #2 " (c 3) UK] [connect bcuk.pwnz.org 10006 match]
//Mewtwo
newmenu "Mewtwo"
menuitemvar [concatword (c 3) "Mewtwo " (c 5) 8888] [connect mewtwo.tk 8888 match]
menuitemvar [concatword (c 3) "Mewtwo " (c 5) 7777] [connect mewtwo.tk 7777 match]
//MyS
newmenu "MyS"
menuitemvar [concatword (c 3) MyS (c 5) " Match #1 " (c 3) GER] [connect mys.aa.am 21111 match]
menuitemvar [concatword (c 3) MyS (c 5) " Match #2 " (c 3) GER] [connect mys.aa.am 22222 match]
menuitemvar [concatword (c 3) MyS (c 5) " Match #3 " (c 3) GER] [connect mys.aa.am 23333 match]
menuitemvar [concatword (c 3) MyS (c 5) " 3333 |Match| " (c 3) GER] [connect mys.aa.am 33333 match]
menuitemvar [concatword (c 3) MyS (c 5) " 4444 |Match| " (c 3) GER] [connect mys.aa.am 44444 match]
menuitemvar [concatword (c 3) MyS (c 5) " 5555 |Match| " (c 3) GER] [connect mys.aa.am 55555 match]
//w00p
newmenu "w00p"
menuitemvar [concatword (c 3) "hlin " (c 5) 9999] [connect hlin.woop.us 9999 match]
menuitemvar [concatword (c 3) "hlin " (c 5) 8999] [connect hlin.woop.us 8999 match]
menuitemvar [concatword (c 3) "hlin " (c 5) 7999] [connect hlin.woop.us 7999 match]
menuitemvar [concatword (c 3) "dula " (c 5) 9999] [connect dula.woop.us 9999 match]
//B}
newmenu "B}"
menuitemvar [concatword (c 3)"B} " (c 5) Bold] [connect bcubed.pbclan.tk 1492]
menuitemvar [concatword (c 3)"B} " (c 5) Dauntless] [connect bcubed.pbclan.tk 1927]
//Original idea by Draul. Made by Castiel, later modified by |BC|Wolf