All pastes #255366 Raw Edit

Stuff

public text v1 · immutable
#255366 ·published 2006-11-22 22:08 UTC
rendered paste body
// Scrim Menu
// Created by aimscene-kobE
// #aimscene

dialog scrim {
  title "Find Scrim"
  size -1 -1 149 155
  option dbu
  tab "Find Scrim", 16, 3 3 142 135
  button "Find Scrim", 13, 13 121 37 12, tab 16 ok
  button "Stop Search", 14, 55 121 37 12, tab 16 ok
  combo 1, 36 21 60 60, tab 16 size drop
  combo 6, 36 96 60 50, tab 16 size drop
  combo 4, 36 66 60 40, tab 16 size drop
  combo 3, 36 81 60 100, tab 16 size vsbar drop
  combo 2, 36 36 60 60, tab 16 size drop
  combo 5, 36 51 60 50, tab 16 size drop
  text "Game:", 7, 11 22 16 10, tab 16
  text "Players:", 8, 11 37 25 8, tab 16
  text "Server:", 9, 11 52 25 8, tab 16
  text "Location:", 10, 11 68 25 8, tab 16
  text "Map:", 11, 11 82 25 8, tab 16
  text "League:", 12, 11 97 25 8, tab 16
  tab "Config", 17
  text "Add Maps:", 19, 8 33 31 8, tab 17
  edit "Type map name here", 20, 42 32 63 10, tab 17
  button "Add", 21, 109 33 32 9, tab 17
  button "Request Help", 27, 56 116 37 12, tab 17
  text "Add Leagues:", 28, 8 55 40 12, tab 17
  edit "Type league name here", 29, 42 54 63 10, tab 17
  button "Add", 30, 109 55 32 9, tab 17
  text "THESE FEATURES NOT YET AVAILABLE!!!!!", 33, 16 76 105 26, tab 17
  button "Upgrade Version", 35, 97 116 44 12, tab 17
  tab "About", 18
  text "- More games to come", 22, 13 23 56 9, tab 18
  text "- Themed messages", 23, 13 35 49 10, tab 18
  text "Created by aimscene-kobE", 25, 13 125 68 9, tab 18
  text "If you want to request any features please pm aimscene-kobE in #aimscene", 26, 13 103 101 15, tab 18
  text "- More maps", 31, 13 47 41 10, tab 18
  text "- Custom window and graphics", 32, 13 60 80 12, tab 18
  text "- Version Beta2", 34, 13 72 126 13, tab 18
  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
}

ON *:DIALOG:scrim:INIT:0: {
  configdialog
  hide
}

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: {
  MAPS

}

on *:DIALOG:scrim:sclick:27: {
  join #ScrimScript
  msg #ScrimScript .help
}

on *:DIALOG:scrim:sclick:35: {
  join #ScrimScript
  msg #ScrimScript .upgrade
}

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,#findscrim      
        msg #calscrim,#findscrim %scrim.players - %scrim.server - %scrim.location - %scrim.maps - %scrim.leagues
        timer.scrim.cs 0 65 msg #calscrim,#findscrim %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 *:TEXT:*:?: { 
  if ($nick ison %scrim) {
    timer.scrim off 
    unset %scrim
  }
}

alias scrim {
  /dialog -m scrim scrim 
}