rendered paste body// Scrim Menu
// Created by aimscene-kobE
// #aimscene
dialog scrim {
title "Scrim Script"
size -1 -1 149 155
option dbu
tab "Find Scrim", 16, 3 2 142 135
button "Find Scrim", 13, 13 120 37 12, tab 16 ok
button "Stop Search", 14, 55 120 37 12, tab 16 ok
combo 1, 36 20 60 60, tab 16 size drop
combo 6, 36 95 60 50, tab 16 size drop
combo 4, 36 65 60 40, tab 16 size drop
combo 3, 36 80 60 100, tab 16 size vsbar drop
combo 2, 36 35 60 60, tab 16 size drop
combo 5, 36 50 60 50, tab 16 size drop
text "Game:", 7, 11 21 16 10, tab 16
text "Players:", 8, 11 36 25 8, tab 16
text "Server:", 9, 11 51 25 8, tab 16
text "Location:", 10, 11 67 25 8, tab 16
text "Map:", 11, 11 81 25 8, tab 16
text "League:", 12, 11 96 25 8, tab 16
tab "Players", 17
check "", 37, 7 27 9 10, tab 17
check "", 38, 7 47 8 10, tab 17
check "", 39, 7 67 9 10, tab 17
check "", 40, 8 87 9 10, tab 17
check "", 41, 8 107 8 10, tab 17
check "", 42, 65 27 9 10, tab 17
check "", 43, 65 47 9 10, tab 17
check "", 44, 65 67 9 10, tab 17
check "", 45, 65 87 8 10, tab 17
check "", 46, 65 107 8 10, tab 17
edit "", 47, 16 27 45 10, tab 17 autohs
edit "", 48, 16 47 45 10, tab 17 autohs
edit "", 49, 74 47 45 10, tab 17 autohs
edit "", 50, 16 67 45 10, tab 17 autohs
edit "", 51, 74 67 45 10, tab 17 autohs
edit "", 52, 16 87 45 10, tab 17 autohs
edit "", 53, 74 87 45 10, tab 17 autohs
edit "", 54, 16 107 45 10, tab 17 autohs
edit "", 55, 76 107 45 10, tab 17 autohs
edit "", 56, 74 27 45 10, tab 17 autohs
text "Type Player Names in the Boxes Below", 57, 27 18 100 8, tab 17
button "Save Players", 58, 102 121 37 12, tab 17
tab "Config", 18
text "Add Maps:", 19, 8 32 31 8, tab 18
edit "Type map name here", 20, 42 31 63 10, tab 18
text "Add Leagues:", 28, 8 54 40 12, tab 18
edit "Type league name here", 29, 42 53 63 10, tab 18
button "Add", 30, 109 54 32 9, tab 18
text "THESE FEATURES NOT YET AVAILABLE!!!!!", 33, 16 75 105 26, tab 18
button "Request Help", 27, 56 115 37 12, tab 18
button "Upgrade Version", 35, 97 115 44 12, tab 18
button "Add", 21, 109 32 32 9, tab 18
tab "About", 36
text "- More games to come", 22, 13 22 56 9, tab 36
text "- Themed messages", 23, 13 34 49 10, tab 36
text "- More maps", 31, 13 46 41 10, tab 36
text "- Custom window and graphics", 32, 13 59 80 12, tab 36
text "- Version Beta2", 34, 13 71 126 13, tab 36
text "If you want to request any features please pm aimscene-kobE in #aimscene", 26, 13 102 101 15, tab 36
text "Created by aimscene-kobE", 25, 13 124 68 9, tab 36
button "Close", 15, 102 141 37 12, cancel
text "Copyright 2006 © #aimscene", 24, 7 140 85 12
}
alias game {
Did -a scrim 1
Did -a scrim 1 CS
Did -a scrim 1 CZ
; Did -a scrim 1 CS:S
; Did -a scrim 1 DoD
; Did -a scrim 1 DoD:S
}
alias players {
Did -a scrim 2
Did -a scrim 2 5v5
Did -a scrim 2 4v4
Did -a scrim 2 3v3
Did -a scrim 2 2v2
Did -a scrim 2 1v1
}
alias whatserver {
Did -a scrim 5
Did -a scrim 5 Yours
Did -a scrim 5 Ours
Did -a scrim 5 Y/ours
}
alias location {
Did -a scrim 4
Did -a scrim 4 East
Did -a scrim 4 Cent
Did -a scrim 4 West
}
alias maps {
Did -a scrim 3
Did -a scrim 3 de_any
Did -a scrim 3 de_dust2
Did -a scrim 3 de_nuke
Did -a scrim 3 de_train
Did -a scrim 3 de_inferno
Did -a scrim 3 de_cpl_fire
Did -a scrim 3 de_cpl_mill
Did -a scrim 3 de_cpl_strike
Did -a scrim 3 de_aztec
Did -a scrim 3 de_cbble
Did -a scrim 3 de_forge
}
alias leagues {
Did -a scrim 6
Did -a scrim 6 Cal O/IM
Did -a Scrim 6 Cal IM/M
Did -a scrim 6 Cal M/P
Did -a scrim 6 Cal P/I
}
alias hide {
Did -h scrim 3
Did -h scrim 6
}
alias unhide {
Did -v scrim 3
Did -v scrim 6
}
alias configdialog {
game
leagues
whatserver
location
maps
players
}
alias findmaps {
var %x 1
while ($read(scrimmaps.txt,%x)) {
Did -a scrim 3 $v1
inc %x
}
}
alias findleagues {
var %x 1
while ($read(scrimleagues.txt,%x)) {
Did -a scrim 6 $v1
inc %x
}
}
alias clearmaps {
write -c scrimmaps.txt
}
alias clearleagues {
write -c scrimleagues.txt
}
alias saveplayers {
writeini scrimscript.ini Players player1 $did(47)
writeini scrimscript.ini Players player2 $did(48)
writeini scrimscript.ini Players player3 $did(49)
writeini scrimscript.ini Players player4 $did(50)
writeini scrimscript.ini Players player5 $did(51)
writeini scrimscript.ini Players player6 $did(52)
writeini scrimscript.ini Players player7 $did(53)
writeini scrimscript.ini Players player8 $did(54)
}
alias readplayers {
Did -a 47 $readini(scrimscript.ini, Players, player1)
Did -a 48 $readini(scrimscript.ini, Players, player2)
Did -a 49 $readini(scrimscript.ini, Players, player3)
Did -a 50 $readini(scrimscript.ini, Players, player4)
Did -a 51 $readini(scrimscript.ini, Players, player5)
Did -a 52 $readini(scrimscript.ini, Players, player6)
Did -a 53 $readini(scrimscript.ini, Players, player7)
Did -a 54 $readini(scrimscript.ini, Players, player8)
}
ON *:DIALOG:scrim:INIT:0: {
configdialog
hide
findmaps
findleagues
readplayers
}
on *:DIALOG:scrim:sclick:1: {
set %scrim.game $did(1)
unhide
if (%scrim.game == CZ) {
Did -o scrim 3 2 de_dust2_cz
Did -o scrim 3 3 de_nuke_cz
Did -o scrim 3 4 de_inferno_cz
Did -o scrim 3 9 de_aztec_cz
Did -o scrim 3 10 de_cbble_cz
Did -d scrim 3 11
Did -o scrim 6 2 Cal O
Did -o scrim 6 3 Cal M
Did -o scrim 6 4 Cal I
Did -d scrim 6 5
}
if (%scrim.game == $null) {
hide
}
}
on *:DIALOG:scrim:sclick:2: {
set %scrim.players $did(2)
}
on *:DIALOG:scrim:sclick:3: {
set %scrim.maps $did(3)
}
on *:DIALOG:scrim:sclick:4: {
set %scrim.location $did(4)
}
on *:DIALOG:scrim:sclick:5: {
set %scrim.server $did(5)
}
on *:DIALOG:scrim:sclick:6: {
set %scrim.leagues $did(6)
}
on *:DIALOG:scrim:sclick:20: {
if (%dialog.map == 1) {
Did -r scrim 20
unset %dialog.map
}
}
on *:DIALOG:scrim:sclick:21: {
write scrimmaps.txt $did(20).text
did -a scrim 3 $did(20)
}
on *:DIALOG:scrim:sclick:30: {
write scrimleagues.txt $did(29).text
did -a scrim 6 $did(29)
}
on *:DIALOG:scrim:sclick:27: {
join #ScrimScript
msg #ScrimScript .help
}
on *:DIALOG:scrim:sclick:35: {
join #ScrimScript
msg #ScrimScript .upgrade
}
on *:DIALOG:scrim:sclick:33: {
var %clearmaps $?!="Do you really want to delete all added maps?"
if (%deletemaps == $true) {
clearmaps
}
}
on *:DIALOG:scrim:sclick:47: {
var %clearleagues $?!="Do you really want to delete all added leagues?"
if (%deletemaps == $true) {
clearleagues
}
}
on *:DIALOG:scrim:sclick:13: {
if ((%scrim.game) && (%scrim.players) && (%scrim.server) && (%scrim.location) && (%scrim.maps) && (%scrim.leagues)) {
if (%scrim.game == CS) {
if (%scrim.players == 5v5) {
join #calscrim
msg #calscrim %scrim.players - %scrim.server - %scrim.location - %scrim.maps - %scrim.leagues
timer.scrim.cs 0 65 msg #calscrim %scrim.players - %scrim.server - %scrim.location - %scrim.maps - %scrim.leagues
set %scrim #calscrim
}
if (%scrim.players != 5v5) {
join #findscrim
msg #findscrim %scrim.players - %scrim.server - %scrim.location - %scrim.maps - %scrim.leagues
timer.scrim.cs 0 65 msg #findscrim %scrim.players - %scrim.server - %scrim.location - %scrim.maps - %scrim.leagues
set %scrim #findscrim
}
}
if (%scrim.game == CZ) {
join #calscrim-cz
msg #calscrim-cz %scrim.players - %scrim.server - %scrim.location - %scrim.maps - %scrim.leagues
timer.scrim.cz 0 35 msg #calscrim-cz %scrim.players - %scrim.server - %scrim.location - %scrim.maps - %scrim.leagues
set %scrim #calscrim-cz
}
}
}
on *:DIALOG:scrim:sclick:14: {
timer.scrim.cs off
timer.scrim.cz off
}
on *:DIALOG:scrim:sclick:58: {
saveplayers
}
on *:TEXT:*:?: {
if ($nick ison %scrim) {
timer.scrim off
unset %scrim
}
}
alias scrim {
/dialog -m scrim scrim
}
menu channel,status,query {
ScrimScript:/scrim
}
alias connectserver {
}