Another Missile Script :P

mIRC Code

+ 1 likes

Please Register to submit score.

Average Score	0.0
Scores Submitted	0
Date Added	Aug 31, 2007
Last Updated	Sep 26, 2007
Tags	missile script

Introduction

Again, another script you've probably seen many of. This is called scripting at 2 a.m. x) I've gone through it and plucked out most of the stuff that wasn't needed, but if you see anything that could be shortened/added please leave a comment! :D

!initiate - This starts the script up. It will PM that user a launch code.
!target <target here> - This will set the target to whatever you put after !target.
!abort - This will cancel the current launch.
!launch - Once you have entered the code and set the target, this will actually fire the missile. Hehe :3
!mstats - This will post your current launch stats into the channel.

[Note: It is also advised to not load the script until you have identified yourself on a server. If not the script and NickServ or what ever other identifying system the server uses could get into a fight. x)]

Edit: I took out the %launch.date out of here just now. I realized a bit ago that I took the dialog out of this one :3

Grab the Code

;######-Load-######

on *:LOAD:{
  if (%fails == $null) {
    .set %fails 0
  }
  if (%success == $null) {
    .set %success 0
  }
  if (%launched == $null) {
    .set %launched No
  }
}

;######-Text Commands-######

on *:TEXT:!initiate*:#:{
  if (%launched == No) {
    .set %launched Yes
    .randomcode
    .set %launch.code %1 $+ %2 $+ %3 $+ %4 $+ %5 $+ %hy1 $+ %11 $+ %12 $+ %hy2 $+ %6 $+ %7 $+ %8 $+ %9 $+ %10
    .set %targeted No
    .set %launch.user $nick
    .set %launch.chan $chan
    .set %launch.entered No
    .msg %launch.chan Please enter the launch-code.
    .msg %launch.user The launch-code is:  %launch.code 
    .msg %launch.chan Awaiting the code...
    .close -m %launch.user
    halt
  }
  if (%launched == Yes) {
    .msg %launch.chan Error: There is already a launch started.
  }
}

on *:TEXT:!launch*:#:{
  if ($nick == %launch.user) && (%launch.entered == Yes) && (%targeted == Yes) {
    .timer 1 14 msg %launch.chan Launching the missile...
    .missile
    halt
  }
  if ($nick == %launch.user) && (%launch.entered == No) && (%targeted == No) {
    .msg %launch.chan Error: Missile cannot be fired. 
    .msg %launch.chan 2 Reasons found.
    .msg %launch.chan 1 out of 2: Launch-code wasn't entered correctly.
    .msg %launch.chan 2 out of 2: A target hasn't been selected.
    halt
  }
  if ($nick == %launch.user) && (%launch.entered == No) {
    .msg %launch.chan Error: Missile cannot be fired. 
    .msg %launch.chan Reason: Launch-code wasn't entered correctly.
    halt
  }
  if ($nick == %launch.user) && (%targeted == No) {
    .msg %launch.chan Error: Missile cannot be fired. 
    .msg %launch.chan Reason: A target hasn't been selected.
    halt
  } 
  if ($nick != %launch.user) {
    .msg %launch.chan Error: You do not have permission to do that, $nick $+ .
  }
}

on *:TEXT:!target*:#: {
  if ($nick == %launch.user) && (%targeted == No) {
    .set %target.chan $2
    .msg %launch.chan Target aquired.
    .set %targeted Yes
    .msg %launch.chan Awaiting permission to launch...
    .halt
  }
  if ($nick == %launch.user) && (%targeted = Yes) {
   .msg %launch.chan Error: Target already acquired.
    halt
  }
  if ($nick != %launch.user) {
    .msg %launch.chan Error: You do not have permission to do that, $nick $+ .
    halt
  } 
}

on *:TEXT:!mhelp*:#: {
  .msg $nick To aquire the launch-codes, type: !initiate.
  .msg $nick To enter the launch-code, private message $me with the code and ONLY the code.
  .msg $nick To select a target, type: !target <targethere>.
  .msg $nick To abort, type: !abort.
  .msg $nick To launch the missile, make sure you have entered the code, and selected a target and type: !launch.
  .close -m $nick
}

on *:TEXT:!abort*:#: {
  if ($nick == %launch.user) {
    .set %opt.chan $chan
    .unset %launch.code
    .unset %launch.chan
    .set %launched No
    .unset %launch.user
    .unset %target.chan
    .msg %opt.chan Mission aborted by user.
    halt
  }
  if ($nick != %launch.user) {
    .msg $chan Error: You do not have permission to do that $nick $+ .
    halt
  }
}

on *:TEXT:!mstats*:#: {
  .msg $chan --Missle Stats--
  .msg $chan ------------------
  .msg $chan Failed: %fails
  .msg $chan Successes: %success
  .msg $chan ------------------
}

;######-Query-######

on *:open:?:{
  if ($nick == %launch.user) && ($1 == %launch.code) {
    .msg %launch.chan Launch-code has been entered. Awaiting target setup...
    .msg %launch.user Code Accepted
    .set %launch.entered Yes
    .close -m $nick
    halt
  }
  if ($nick == %launch.user) && ($1 != %launch.code) {
    .msg %launch.user Error: Incorrect Code. Please enter the correct launch-code. You should've received a message with the latest code.
    .close -m $nick
    halt
  }
  if ($nick != %launch.user) && ($1 != %launch.code) {
    .msg $nick Error: [Message Blocked] Access Denied.
    .close -m $nick
    halt
  }
  if (%launch.code == $null) {
    .msg $nick Error: A launching sequence has not been initiated. There is no valid launch-code.
    .close -m $nick
    halt
  }
}

;######-Aliases-######

alias randomcode { 
  .set %1 $rand(A,Z)
  .set %2 $rand(1,9)
  .set %3 $rand(A,Z)
  .set %4 $rand(A,Z)
  .set %5 $rand(1,9)
  .set %hy1 -
  .set %11 $rand(A,Z)
  .set %12 $rand(1,9)
  .set %hy2 -
  .set %6 $rand(1,9)
  .set %7 $rand(A,Z)
  .set %8 $rand(1,9)
  .set %9 $rand(A,Z)
  .set %10 $rand(A,Z)
}

alias missile {
  .timer 1 4 .describe %launch.chan deploys a nuclear missile from one of its' many missile silos.
  .timer 1 6 .msg %launch.chan The warhead has been aimed at the selected target:  %target.chan 
  .timer 1 8 .msg %launch.chan Impact in 5.
  .timer 1 11 /impact.rand
  halt
}

alias impact.rand {
  .set %launch.impact $rand(1,2)
  if (%launch.impact == 1) {
    .timer 1 6 .msg %launch.chan Enemy defender missiles have destroyed our missile.
    .timer 1 8 /mreset
    inc %fails
    halt
  }
  if (%launch.impact == 2) {
    .timer 1 6 .msg %launch.chan Impact.
    .timer 1 6 .msg %launch.chan Target destroyed.   
    .timer 1 8 /mreset
    inc %success
    halt
  }
}

alias mreset {
  .unset %launch.code
  .unset %launch.chan
  .set %launched No
  .unset %launch.user
  .set %launch.entered No
  .unset %target.chan
  .msg $chan Systems reset.
}

alias codetest {
  /randomcode
  .echo -a  %1 $+ %2 $+ %3 $+ %4 $+ %5 $+ %hy1 $+ %11 $+ %12 $+ %hy2 $+ %6 $+ %7 $+ %8 $+ %9 $+ %10 
}

;######-Menu-######

menu channel,menubar {
  Missile Projection
  .Engage:.set %launched No | .echo -a Missile script now activated.
  .Abort Active: {
    /unset %launch.code
    /unset %launch.chan
    /set %launched No
    /set %launch.entered No
    /unset %launch.user
    /unset %target.chan
    /msg $chan Mission aborted by systems.
  }
  .-
  .Troubleshoot
  ..Code Check:/codetest
}

Comments

(5) RSS

Go to Bottom

Godzilla

Comments: 91

mIRC Snippet: Another Missile Script :P
Posted on Aug 31, 2007 10:58 pm

No use of / before command.

mountaindew

Comments: 1,645

mIRC Snippet: Another Missile Script :P
Posted on Aug 31, 2007 11:00 pm

u dont need /'s, but its helpful to use .'s with .msg so it duznt show up in status window

Akishoot

Comments: 159

mIRC Snippet: Another Missile Script :P
Posted on Sep 1, 2007 2:43 am

[Updated]:

I took mountaindew's advice and replaced the /'s with .'s :) (Thanks ;)

I also added an on *:LOAD:{ so that the !mstats command would function okay. Before if you didn't manually set %fails and %success to 0 you'd have an empty space after the !mstats results until you either got a Failed launch or a Successful launch.

mountaindew

Comments: 1,645

mIRC Snippet: Another Missile Script :P
Posted on Sep 1, 2007 9:50 am

well u only need em for timers and msgs and notices, not .close or .set :P

Akishoot

Comments: 159

mIRC Snippet: Another Missile Script :P
Posted on Sep 1, 2007 7:12 pm

[Updated]:

There was a slight problem with the !target and !launch functions. I forgot to make it so others can't set the target or launch the missile besides the %launch.user. That problem has been fixed :)

Akishoot

		Unemployed, Student, Detroit, Michigan
Last seen: Sep 29, 2008 Profile Likes (4) Friends (17) Snippets (9) Images (2) Comments Received (93) Comments Submitted (159)

My Snippet Tags

Contact

Add to Friends

Send Private Message

AOL AIM:

MSN: akishoot@hotmail.com

Friends (17)

Nymphomaniiac

Calliope

View All