Mario Kart WIi - Time Trial Manager

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	0.0
Scores Submitted	0
Date Added	May 28, 2008
Last Updated	May 28, 2008
Tags	dialog kart manager mario mirc script scripts time trial wii

Introduction

This was simply made because I didn't like running up and down stairs to get my time trials info, so I decided to make something to store it.

This was mostly a pain to make because the coding is so damn boring. I know I could have coded it better with .ini's, but I always have troubles with them.. and they're just horrid to use imo.

Paste into remotes and type /mk or right-click anywhere cand select Mario Kart Wii. Shouldn't be any questions as there is a help editbox at the bottom.

Enjoy!

Grab the Code

alias mk {
  dialog $iif($dialog(mkwii),-v,-md) mkwii mkwii 
}
menu * {
  .Mario Kart Wii: dialog $iif($dialog(mkwii),-v,-md) mkwii mkwii
}
dialog mkwii {
  title "Mario Kart Wii"
  size -1 -1 220 145
  option pixels
  combo 1, 10 15 100 70, drop
  box "Cup", 2, 5 0 110 40
  list 3, 10 56 110 60, size
  box "Track", 4, 5 40 120 80
  edit "", 5, 125 15 85 20
  box "Time", 6, 120 0 95 40
  button "Update", 7, 133 45 80 22
  button "Message", 8, 133 69 80 22
  button "Close", 9, 133 92 80 22
  edit "", 10, 5 122 210 20, read
}
on *:DIALOG:mkwii:mouse:*: {
  if ($did == 1) { did -ra $dname 10 Select a cup. }
  if ($did == 3) { did -ra $dname 10 Use this to select a course. }
  if ($did == 5) { did -ra $dname 10 This is your time for the course. }
  if ($did == 7) { did -ra $dname 10 Click this once you have edited your time. }
  if ($did == 8) { did -ra $dname 10 Show the active channel your time. }
  if ($did == 9) { did -ra $dname 10 Close the dialog. }
}
on *:dialog:mkwii:init:0: {
  did -b $dname 3,5,7,8
  did -a $dname 1 Mushroom Cup
  did -a $dname 1 Flower Cup
  did -a $dname 1 Star Cup
  did -a $dname 1 Special Cup
  did -a $dname 1 ---
  did -a $dname 1 Shell Cup
  did -a $dname 1 Banana Cup
  did -a $dname 1 Leaf Cup
  did -a $dname 1 Lightning Cup
}
on *:dialog:mkwii:sclick:*: {
  if ($did == 1) {
    did -e $dname 3
    if ($did(1).sel == 1) {
      did -ra $dname 3 Luigi Circuit
      did -a $dname 3 Moo Moo Meadows
      did -a $dname 3 Mushroom Gorge
      did -a $dname 3 Toad's Factory
    }
    if ($did(1).sel == 2) {
      did -ra $dname 3 Mario Circuit
      did -a $dname 3 Coconut Mall
      did -a $dname 3 DK's Snowboard Cross
      did -a $dname 3 Wario's Gold Mine
    }
    if ($did(1).sel == 3) {
      did -ra $dname 3 Daisy Circuit
      did -a $dname 3 Koopa Cape
      did -a $dname 3 Maple Treeway
      did -a $dname 3 Grumble Volcano
    }
    if ($did(1).sel == 4) {
      did -ra $dname 3 Dry Dry Ruins
      did -a $dname 3 Moonview Highway
      did -a $dname 3 Bowser's Castle
      did -a $dname 3 Rainbow Road
    }
    if ($did(1).sel == 5) {
      did -b $dname 3,5,7,8
      did -r $dname 3
    }
    if ($did(1).sel == 6) {
      did -ra $dname 3 GCN Peach Beach
      did -a $dname 3 DS Yoshi Falls
      did -a $dname 3 SNES Ghost Valley 2
      did -a $dname 3 N64 Mario Raceway
    }
    if ($did(1).sel == 7) {
      did -ra $dname 3 N64 Sherbert Land
      did -a $dname 3 GBA Shy Guy Beach
      did -a $dname 3 DS Delfino Square
      did -a $dname 3 GCN Waluigi Stadium
    }
    if ($did(1).sel == 8) {
      did -ra $dname 3 DS Desert Hills
      did -a $dname 3 GBA Bowser Castle 3
      did -a $dname 3 N64 DK's Jungle Parkway
      did -a $dname 3 GCN Mario Circuit
    }
    if ($did(1).sel == 9) {
      did -ra $dname 3 SNES Mario Circuit 3
      did -a $dname 3 DS Peach Garden
      did -a $dname 3 GCN DK Mountain
      did -a $dname 3 N64 Bowser's Castle
    }
  }
  if ($did == 7) {
    if (!$did(5).text) {
      noop $input(You did not enter any data.,uwo,Error!)
    }
    else {
      if ($did(1).sel == 1) {
        if ($did(3).sel == 1) { write -l1 MKWii.txt $did(5).text }
        if ($did(3).sel == 2) { write -l2 MKWii.txt $did(5).text }
        if ($did(3).sel == 3) { write -l3 MKWii.txt $did(5).text }
        if ($did(3).sel == 4) { write -l4 MKWii.txt $did(5).text }
      }
      if ($did(1).sel == 2) {
        if ($did(3).sel == 1) { write -l5 MKWii.txt $did(5).text }
        if ($did(3).sel == 2) { write -l6 MKWii.txt $did(5).text }
        if ($did(3).sel == 3) { write -l7 MKWii.txt $did(5).text }
        if ($did(3).sel == 4) { write -l8 MKWii.txt $did(5).text }
      }
      if ($did(1).sel == 3) {
        if ($did(3).sel == 1) { write -l9 MKWii.txt $did(5).text }
        if ($did(3).sel == 2) { write -l10 MKWii.txt $did(5).text }
        if ($did(3).sel == 3) { write -l11 MKWii.txt $did(5).text }
        if ($did(3).sel == 4) { write -l12 MKWii.txt $did(5).text }
      }
      if ($did(1).sel == 4) {
        if ($did(3).sel == 1) { write -l13 MKWii.txt $did(5).text }
        if ($did(3).sel == 2) { write -l14 MKWii.txt $did(5).text }
        if ($did(3).sel == 3) { write -l15 MKWii.txt $did(5).text }
        if ($did(3).sel == 4) { write -l16 MKWii.txt $did(5).text }
      }
      if ($did(1).sel == 6) {
        if ($did(3).sel == 1) { write -l17 MKWii.txt $did(5).text }
        if ($did(3).sel == 2) { write -l18 MKWii.txt $did(5).text }
        if ($did(3).sel == 3) { write -l19 MKWii.txt $did(5).text }
        if ($did(3).sel == 4) { write -l20 MKWii.txt $did(5).text }
      }
      if ($did(1).sel == 7) {
        if ($did(3).sel == 1) { write -l21 MKWii.txt $did(5).text }
        if ($did(3).sel == 2) { write -l22 MKWii.txt $did(5).text }
        if ($did(3).sel == 3) { write -l23 MKWii.txt $did(5).text }
        if ($did(3).sel == 4) { write -l24 MKWii.txt $did(5).text }
      }
      if ($did(1).sel == 8) {
        if ($did(3).sel == 1) { write -l25 MKWii.txt $did(5).text }
        if ($did(3).sel == 2) { write -l26 MKWii.txt $did(5).text }
        if ($did(3).sel == 3) { write -l27 MKWii.txt $did(5).text }
        if ($did(3).sel == 4) { write -l28 MKWii.txt $did(5).text }
      }
      if ($did(1).sel == 9) {
        if ($did(3).sel == 1) { write -l29 MKWii.txt $did(5).text }
        if ($did(3).sel == 2) { write -l30 MKWii.txt $did(5).text }
        if ($did(3).sel == 3) { write -l31 MKWii.txt $did(5).text }
        if ($did(3).sel == 4) { write -l32 MKWii.txt $did(5).text }
      }
    }
  }
  if ($did == 8) {
    if (!$did(5).text) {
      noop $input(There is no data to message.,uwo,Error!)
    }
    else {
      echo -a 3My 4Mario Kart Wii 3time trial for 4 $+ $did(3).seltext 3is 4 $+ $did(5).text
    }
  }
  if ($did == 9) {
    dialog -x $dname
  }
}
on *:dialog:mkwii:dclick:*: {
  if ($did == 3) {
    did -e $dname 5,7,8
    if ($did(1).sel == 1) {
      if ($did(3).sel == 1) { did -ra $dname 5 $read(MKWii.txt, 1) }
      if ($did(3).sel == 2) { did -ra $dname 5 $read(MKWii.txt, 2) }
      if ($did(3).sel == 3) { did -ra $dname 5 $read(MKWii.txt, 3) }
      if ($did(3).sel == 4) { did -ra $dname 5 $read(MKWii.txt, 4) }
    }
    elseif ($did(1).sel == 2) {
      if ($did(3).sel == 1) { did -ra $dname 5 $read(MKWii.txt, 5) }
      if ($did(3).sel == 2) { did -ra $dname 5 $read(MKWii.txt, 6) }
      if ($did(3).sel == 3) { did -ra $dname 5 $read(MKWii.txt, 7) }
      if ($did(3).sel == 4) { did -ra $dname 5 $read(MKWii.txt, 8) }
    }
    elseif ($did(1).sel == 3) {
      if ($did(3).sel == 1) { did -ra $dname 5 $read(MKWii.txt, 9) }
      if ($did(3).sel == 2) { did -ra $dname 5 $read(MKWii.txt, 10) }
      if ($did(3).sel == 3) { did -ra $dname 5 $read(MKWii.txt, 11) }
      if ($did(3).sel == 4) { did -ra $dname 5 $read(MKWii.txt, 12) }
    }
    elseif ($did(1).sel == 4) {
      if ($did(3).sel == 1) { did -ra $dname 5 $read(MKWii.txt, 13) }
      if ($did(3).sel == 2) { did -ra $dname 5 $read(MKWii.txt, 14) }
      if ($did(3).sel == 3) { did -ra $dname 5 $read(MKWii.txt, 15) }
      if ($did(3).sel == 4) { did -ra $dname 5 $read(MKWii.txt, 16) }
    }
    elseif ($did(1).sel == 6) {
      if ($did(3).sel == 1) { did -ra $dname 5 $read(MKWii.txt, 17) }
      if ($did(3).sel == 2) { did -ra $dname 5 $read(MKWii.txt, 18) }
      if ($did(3).sel == 3) { did -ra $dname 5 $read(MKWii.txt, 19) }
      if ($did(3).sel == 4) { did -ra $dname 5 $read(MKWii.txt, 20) }
    }
    elseif ($did(1).sel == 7) {
      if ($did(3).sel == 1) { did -ra $dname 5 $read(MKWii.txt, 21) }
      if ($did(3).sel == 2) { did -ra $dname 5 $read(MKWii.txt, 22) }
      if ($did(3).sel == 3) { did -ra $dname 5 $read(MKWii.txt, 23) }
      if ($did(3).sel == 4) { did -ra $dname 5 $read(MKWii.txt, 24) }
    }
    elseif ($did(1).sel == 8) {
      if ($did(3).sel == 1) { did -ra $dname 5 $read(MKWii.txt, 25) }
      if ($did(3).sel == 2) { did -ra $dname 5 $read(MKWii.txt, 26) }
      if ($did(3).sel == 3) { did -ra $dname 5 $read(MKWii.txt, 27) }
      if ($did(3).sel == 4) { did -ra $dname 5 $read(MKWii.txt, 28) }
    }
    elseif ($did(1).sel == 9) {
      if ($did(3).sel == 1) { did -ra $dname 5 $read(MKWii.txt, 29) }
      if ($did(3).sel == 2) { did -ra $dname 5 $read(MKWii.txt, 30) }
      if ($did(3).sel == 3) { did -ra $dname 5 $read(MKWii.txt, 31) }
      if ($did(3).sel == 4) { did -ra $dname 5 $read(MKWii.txt, 32) }
    }
  }
}
on *:TEXT:!time*:?: {
  if ($nick == $me) {
    halt
  }
  if (!$2) {
    .notice $nick You did not specify a course!
  }
  else {
    var %mes = .notice $nick 3My time for4
    if ($2- == Luigi Circuit) { %mes Luigi Circuit 3is4 $read(MKWii.txt, 1) }
    if ($2- == Moo Moo Meadows) { %mes Moo Moo Meadows 3is4 $read(MKWii.txt, 2) }
    if ($2- == Mushroom Gorge) { %mes Mushroom Gorge 3is4 $read(MKWii.txt, 3) }
    if ($2- == Toad's Factory) { %mes Toad's Factory 3is4 $read(MKWii.txt, 4) }
    if ($2- == Mario Circuit) { %mes Mario Circuit 3is4 $read(MKWii.txt, 5) }
    if ($2- == Coconut Mall) { %mes Coconut Mall 3is4 $read(MKWii.txt, 6) }
    if ($2- == DK's Snowboard Cross) { %mes DK's Snowboard Cross 3is4 $read(MKWii.txt, 7) }
    if ($2- == Wario's Gold Mine) { %mes Wario's Gold Mine 3is4 $read(MKWii.txt, 8) }
    if ($2- == Daisy Circuit) { %mes Daisy Circuit 3is4 $read(MKWii.txt, 9) }
    if ($2- == Koopa Cape) { %mes Koopa Cape 3is4 $read(MKWii.txt, 10) }
    if ($2- == Maple Treeway) { %mes Maple Treeway 3is4 $read(MKWii.txt, 11) }
    if ($2- == Grumble Volcano) { %mes Grumble Volcano 3is4 $read(MKWii.txt, 12) }
    if ($2- == Dry Dry Ruins) { %mes Dry Dry Ruins 3is4 $read(MKWii.txt, 13) } 
    if ($2- == Moonview Highway) { %mes Moonview Highway 3is4 $read(MKWii.txt, 14) }
    if ($2- == Bowser's Castle) { %mes Bowser's Castle 3is4 $read(MKWii.txt, 15) }
    if ($2- == Rainbow Road) { %mes Rainbow Road 3is4 $read(MKWii.txt, 16) }
    if ($2- == GCN Peach Beach) { %mes GCN Peach Beach 3is4 $read(MKWii.txt, 17) }
    if ($2- == DS Yoshi Falls) { %mes DS Yoshi Falls 3is4 $read(MKWii.txt, 18) }
    if ($2- == SNES Ghost Valley 2) { %mes SNES Ghost Valley 2 3is4 $read(MKWii.txt, 19) }
    if ($2- == N64 Mario Raceway) { %mes N64 Mario Raceway 3is4 $read(MKWii.txt, 20) }
    if ($2- == N64 Sherbert Land) { %mes N64 Sherbert Land 3is4 $read(MKWii.txt 21) }
    if ($2- == GBA Shy Guy Beach) { %mes GBA Shy Guy Beach 3is4 $read(MKWii.txt, 22) }
    if ($2- == DS Delfino Square) { %mes DS Delfino Square 3is4 $read(MKWii.txt, 23) }
    if ($2- == GCN Waluigi Stadium) { %mes GCN Waluigi Stadium 3is4 $read(MKWii.txt, 24) }
    if ($2- == DS Desert Hills) { %mes DS Desert Hills 3is4 $read(MKWii.txt, 25) }
    if ($2- == GBA Bowser Castle 3) { %mes GBA Bowser Castle 3 3is4 $read(MKWii.txt, 26) }
    if ($2- == N64 DK's Jungle Parkway) { %mes DK's Jungle Parkway 3is4 $read(MKWii.txt, 27) }
    if ($2- == GCN Mario Circuit) { %mes GCN Mario Circuit 3is4 $read(MKWii.txt, 28) }
    if ($2- == SNES Mario Circuit 3) { %mes SNES Mario Circuit 3 3is4 $read(MKWii.txt, 29) }
    if ($2- == DS Peach Garden) { %mes DS Peach Garden 3is4 $read(MKWii.txt, 30) } 
    if ($2- == GCN DK Mountain) { %mes GCN DK Mountain 3is4 $read(MKWii.txt, 31) }
    if ($2- == N64 Bowser's Castle) { %mes N64 Bowser's Castle 3is4 $read(MKWii.txt, 32) }
  }
}
on *:TEXT:!mkwii:?: {
  if ($nick == $me) {
    halt
  }
  .notice $nick To see my time trial times, type '/msg $me !times COURSE'
  .notice $nick Want my ghost data? Type '/msg $me !ghost COURSE'
}
on *:TEXT:!ghost*:?: {
  if ($nick == $me) {
    halt 
  }
  window @MKWii
  echo -t @MKWii 4 $+ $nick 3has asked for your ghost data for 4 $+ $2- 3at 4 $+ $time $+ .
}

Comments

(3) RSS

Go to Bottom

Hawkee

Comments: 486

mIRC Snippet: Mario Kart WIi - Time Trial Manager
Posted on May 28, 2008 1:56 pm

Cool, another Mario Kart player. Add your friend code to this thread so we can get some Hawkee races going:

http://www.hawkee.com/shop/prod/2945955/#comments

jonesy44

Comments: 936

mIRC Snippet: Mario Kart WIi - Time Trial Manager
Posted on May 28, 2008 2:22 pm

must be a way of shortening all those IF statements :p

vaseline28

Comments: 134

mIRC Snippet: Mario Kart WIi - Time Trial Manager
Posted on May 31, 2008 5:23 am

@jonesy44 I don\'t think that there is, they\'re necessary to cover the large amount of info in there.

But the \"{\" and \"}\" around each one are not necessary.

Quote:

if ($did(3).sel == 1) did -ra $dname 5 $read(MKWii.txt, 25)

will work too. Having said that, it\'s minor and really doesn\'t affect the script at all.

Mario Kart WIi - Time Trial Manager

Introduction

Grab the Code

Comments

^Neptune

My Snippet Tags

Contact

Friends (11)

Sponsors


Last seen: Sep 05, 2008 Profile Likes (3) Friends (11) Snippets (8) Images (18) Comments Received (299) Comments Submitted (241) Forum Posts (55)