Sneak Peak: Counter-Strike Tools (Dialog)

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	1.0
Scores Submitted	1
Date Added	Jun 17, 2007
Last Updated	Jun 17, 2007
Tags	counter cs dialog editor form game peak sneak strike tools

Introduction

This is only a sneak peak of a Counter-Strike tools dialog. In the full release you'll be able to calculate exp in gun games, match your kills, deaths and averages with other users and more!

I feel so good, this is only my first dialog try and it's working perfectly.

At the minute, it only has logs of the panel and some standard sets such as your username, version and preferred weapon. Just take a look and comment, with suggestions.

Grab the Code

alias csplogs {
  if ($dialog(csplogs)) {
    dialog -veo csplogs csplogs
  }
  else { dialog -mado csplogs csplogs }
} 
dialog csplogs {
  title "Counter-Strike Panel LOGS - IRC Dialog"
  List 14, 3 3 500 300, vsbar
  text "Counter-Strike Panel � Syntax @ hub.blitzx.net. All rights reserved.", 21, 2 350 500 20, center
  size 50 50 500 375
  button "Exit", 23, 422 320 60 25, cancel
}
dialog csp {
  title "Counter-Strike Panel - IRC Dialog"
  menu "&File", 1
  item "&Save", 3
  item break, 7
  item "&Exit", 8

menu "&Edit", 11
  item "&Paste", 12, 11
  item "&Copy", 13
  item "C&ut", 14

menu "&Links", 96
  item "Steam", 97
  item "&CSNation", 98
  item "&AMX", 99

menu "&Help", 100
  item "&About", 101

Box "Version", 50, 40 55 140 80
  Box "Player Settings", 51, 190 55 300 80
  text "Welcome to the Counter-Strike Panel, here, you will be able to record kills, deaths and more!", 15, 2 1 500 100, center
  text "This is only a sneak-peak of this script! Keep checking Hawkee.com snippets for the full release, and have a look around and comment on Hawkee.com!", 400, 2 15 500 100, autohs center
  text "Counter-Strike Username:", 16, 198 70 125 20
  text "Preferred weapon:", 70, 198 90 125 20
  edit "", 17, 330 68 125 20
  edit "", 71, 330 88 125 20
  button "Save", 200, 198 108 60 25

radio "Counter-Strike", 18, 43 70 125 20, version group
  radio "Condition Zero", 19, 43 90 125 20, version
  radio "Source", 20, 43 110 125 20, version

text "Counter-Strike Panel � Syntax @ hub.blitzx.net. All rights reserved.", 21, 2 350 500 20, center
  size 50 50 500 375
  button "Exit", 23, 432 300 60 25, cancel
  button "Logs", 44, 370 300 60 25
}
alias csp {
  if ($dialog(csp)) {
    dialog -veo csp csp
  }
  else { dialog -mado csp csp }
} 
alias doit {
  if ($readini(csp.ini,settings,username) != $null) {
    did -ar csp 17 $readini(csp.ini,settings,username)
  }
  if ($readini(csp.ini,settings,wepp) != $null) {
    did -ar csp 71 $readini(csp.ini,settings,wepp)
  }
  if ($readini(csp.ini,settings,version) != $null) {
    did -c csp $readini(csp.ini,settings,version)
  }
}
alias doall {
  doit
}
ON *:DIALOG:csp:SCLICK:18: {
  writeini csp.ini settings version 18
  inc %logs
  writeini csp.ini logs %logs $timestamp Changed Counter-Strike version $($+($chr(40),%logs,$chr(41)))
  if ($dialog(csplogs)) {
    did -a csplogs 14 $readini(csp.ini,logs,%logs)
  }
}
ON *:DIALOG:csp:SCLICK:19: {
  writeini csp.ini settings version 19
  inc %logs
  writeini csp.ini logs %logs $timestamp Changed Counter-Strike version $($+($chr(40),%logs,$chr(41)))
  if ($dialog(csplogs)) {
    did -a csplogs 14 $readini(csp.ini,logs,%logs)
  }
}
ON *:DIALOG:csp:SCLICK:20: {
  writeini csp.ini settings version 20
  inc %logs
  writeini csp.ini logs %logs $timestamp Changed Counter-Strike version $($+($chr(40),%logs,$chr(41)))
  if ($dialog(csplogs)) {
    did -a csplogs 14 $readini(csp.ini,logs,%logs)
  }
}
ON *:DIALOG:csp:SCLICK:23: {
  inc %logs
  writeini csp.ini logs %logs $timestamp Exited dialog (CSP) $($+($chr(40),%logs,$chr(41)))
  if ($dialog(csplogs)) {
    did -a csplogs 14 $readini(csp.ini,logs,%logs)
  }
}
ON *:DIALOG:csplogs:SCLICK:14: {
  inc %logs
  writeini csp.ini logs %logs $timestamp Exited panel logs $($+($chr(40),%logs,$chr(41)))
  if ($dialog(csplogs)) {
    did -a csplogs 14 $readini(csp.ini,logs,%logs)
  }
}
ON *:DIALOG:csp:SCLICK:44: {
  inc %logs
  writeini csp.ini logs %logs $timestamp Opened panel logs $($+($chr(40),%logs,$chr(41)))
  csplogs
  if ($dialog(csplogs)) {
    did -a csplogs 14 $readini(csp.ini,logs,%logs)
  }
}
ON *:DIALOG:csp:SCLICK:200: {
  writeini csp.ini settings username $did(17)
  writeini csp.ini settings wepp $did(71)
  inc %logs
  writeini csp.ini logs %logs $timestamp New username and preferred weapon set (if provided) $($+($chr(40),%logs,$chr(41)))
  if ($dialog(csplogs)) {
    did -a csplogs 14 $readini(csp.ini,logs,%logs)
  }
}
ON *:DIALOG:csp:INIT:0: {
  doall
  inc %logs
  writeini csp.ini logs %logs $timestamp Dialog (CSP) opened sucessfully $($+($chr(40),%logs,$chr(41)))
  if ($dialog(csplogs)) {
    did -a csplogs 14 $readini(csp.ini,logs,%logs)
  }
}
ON *:DIALOG:csplogs:INIT:0: {
  var %i = 1
  inc %logs
  writeini csp.ini logs %logs $timestamp Opened panel logs $($+($chr(40),%logs,$chr(41)))
  while (%i <= %logs) {
    did -a csplogs 14 $readini(csp.ini,logs,%i)
    inc %i
  }
}

Comments

(3) RSS

Go to Bottom

SyntaxIRC

Comments: 37

mIRC Snippet: Sneak Peak: Counter-Strike Tools (Dialog)
Posted on Jun 17, 2007 4:36 pm

Fixed bugs.

SyntaxIRC

Comments: 37

mIRC Snippet: Sneak Peak: Counter-Strike Tools (Dialog)
Posted on Jun 18, 2007 4:48 pm

I really don't appreciate someone rating it 1.0 and not giving comments, suggestions or not even posting.

xinita

Comments: 1

mIRC Snippet: Sneak Peak: Counter-Strike Tools (Dialog)
Posted on Jun 28, 2007 4:22 am

Pretty nice and useful! Thanks for making this!

Sneak Peak: Counter-Strike Tools (Dialog)

Introduction

Grab the Code

Comments

SyntaxIRC

My Snippet Tags

Contact

Sponsors


Last seen: Mar 22, 2008 Profile Snippets (18) Comments Received (81) Comments Submitted (37) Forum Posts (45)