RolePlaying Dialog

+ 0 likes

Please Register to submit score.

Average Score	8.0
Scores Submitted	3
Date Added	Apr 17, 2008
Last Updated	May 19, 2008
Tags	dialog play role roleplay

Introduction

This dialog allows you to use various nicks while roleplaying. It stores the nicks you wish to use , the channels you want to use them in and can easily be turned on and off. To choose or change nicks just double click one. To easily change channels while RolePlaying double click a channel to make it the active one. You can add/remove nicks and add/remove channels ( will add a # if not used ). The list will be updated each time a new nick/channel is added or deleted. It stores the nicks and channels to a variable which it loads each time it is opened to the list for each. There is also a button that will shrink it so you can keep it open and yet out o fthe way. The title of the dialog will state wether RPing is on/off and also what nick , if one is chosen , is being used currently.

*Original idea for the RolePlaying script from Niveusluna.

Update: Nick and Channel list are now alphabetical ( April 18th '08 )
Update: Nick and Channel list update each time the Shrink/Expand button pushed ( May 20th '08 )

Grab the Code

menu channel {
  [RolePlay]: dialog $iif($dialog(RPing), -va , -ma) RPing RPing
}
dialog RPing {
  title "Role Playing"
  size -1 -1 200 210 
  button "Role Playing", 1, 10 10 100 25 
  text "Character List", 2, 5 45 90 20, center
  text "Channel List", 3, 105 45 90 20, center
  list 4, 10 60 80 100
  list 5, 110 60 80 100
  button "New", 7, 10 160 35 20
  button "Del", 8, 55 160 35 20
  button "New", 9, 110 160 35 20
  button "Del", 10, 155 160 35 20
  edit "", 11, 110 185 45 20, autohs
  button "Yes", 12, 110 185 35 20
  button "No", 13, 155 185 35 20
  button "Add", 14, 155 185 35 20
  edit "", 15, 10 185 45 20, autohs
  button "Add", 16, 55 185 35 20
  button "Shrink", 17, 125 10 65 25
  button "Yes", 18, 10 185 35 20
  button "No", 19, 55 185 35 20
}
on *:dialog:RPing:*:*: {
  if ($devent == init) { 
    didtok $dname 4 32 $sorttok(%rpcharacters,32)
    didtok $dname 5 32 $sorttok(%rpchannels,32)
    did -h $dname 11-16,18-19
    did -b $dname 8,10
    $iif(%rping = 1, did -ra $dname 1 Role Play Off, did -ra $dname 1 Role Play On) 
    dialog -t $dname $iif(%rping == 1, RP: On $iif(%rpcharacter, - Char: %rpcharacter), RP: Off  $iif(%rpcharacter, - Char: %rpcharacter))   
  }
  if ($devent == edit) { 
    if ($did == 11) { $iif($did(11).text, did -e $dname 14, did -b $dname 14 ) }
    if ($did == 15) { $iif($did(15).text, did -e $dname 16, did -b $dname 16 ) }
  }
  if ($devent == dclick) { 
    if ($did == 4) { $iif($did(4).seltext, set %rpcharacter $did(4).seltext) | dialog -t $dname $iif(%rping == 1, RP: On $iif(%rpcharacter, - Char: %rpcharacter), RP: Off  $iif(%rpcharacter, - Char: %rpcharacter)) }
    if ($did == 5) { join $did(5).seltext }
  } 
  if ($devent == sclick) {
    if ($did == 1) { set %rping $iif(%rping == 1, 0, 1) | did -ra $dname 1 $iif(%rping = 1, Role Play Off, Role Play On) | dialog -t $dname $iif(%rping == 1, RP: On  $iif(%rpcharacter, - Char: %rpcharacter), RP: Off  $iif(%rpcharacter, - Char: %rpcharacter))   }
    if ($did == 4) { $iif($did(4).seltext, did -e $dname 7-8) | did -h $dname 11-16 | did -b $dname 10 }
    if ($did == 5) { $iif($did(5).seltext, did -e $dname 10) | did -h $dname 11-16,18,19 | did -b $dname 8 }
    if ($did == 7) { did -v $dname 15,16 | did -e $dname 15 | did -b $dname 10,14,16 | did -h $dname 11-14,18,19 }
    if ($did == 8) { did -v $dname 18-19 | did -h $dname 12,13 } 
    if ($did == 9) { did -v $dname 11,14 | did -e $dname 11 | did -b $dname 8,10,14 | did -h $dname 12,13,15-16 }
    if ($did == 10) { did -v $dname 12-14 | did -h $dname 11,14,18,19 }
    if ($did == 12) { set %rpchannels $remtok(%rpchannels,$did(5).seltext,1,32) | .timer 1 1 dialog -x RPing | .timer 1 2 dialog -m RPing RPing }
    if ($did == 13) { did -h $dname 12,13 | did -b $dname 10 }
    if ($did == 14) { set %rpchannels $addtok(%rpchannels,$( $iif($left($did(11).text,1) != $chr(35), $( $chr(35) $+ $did(11).text), $did(11).text) ),32) | .timer 1 1 dialog -x RPing | .timer 1 2 dialog -m RPing RPing }
    if ($did == 16) { set %rpcharacters $addtok(%rpcharacters,$did(15).text,32) | .timer 1 1 dialog -x RPing | .timer 1 2 dialog -m RPing RPing }
    if ($did == 17) { 
      did -r $dname 4,5
      didtok $dname 4 32 $sorttok(%rpcharacters,32)
      didtok $dname 5 32 $sorttok(%rpchannels,32)
      $iif($dialog(RPing).h == 72, did -ra $dname 17 Shrink, did -ra $dname 17 Expand) 
      $iif($dialog(RPing).h == 72, dialog -s $dname -1 -1 200 210 , dialog -s $dname -1 -1 200 40) 
      if ($dialog(RPing).h == 72) { did -u $dname 4,5 | did -b $dname 8,10 | did -h $dname 11-16,18-19 } 
    }
    if ($did == 18) { set %rpcharacters $remtok(%rpcharacters,$did(4).seltext,1,32) | $iif($did(4).seltext == %rpcharacter, unset %rpcharacter) | .timer 1 1 dialog -x RPing | .timer 1 2 dialog -m RPing RPing }
    if ($did == 19) { did -h $dname 18,19 | did -b $dname 8 }
  }
}

on *:INPUT:#:{
  if (%rping == 1) {
    if ($chan isin %rpchannels) {
      if (($me isop $chan) || ($me ishop $chan) || (h isincs $usermode)) {
        if ($left($$1,1) != /) {
          .quote $iif(h isincs $usermode, fsay $chan %rpcharacter $iif($left($1,1) == $chr(58), $($chr(58) $+ $$1-), $$1-)  , npc $chan %rpcharacter $iif($left($1,1) == $chr(58), $($chr(58) $+ $$1-), $$1-))
          haltdef
        }
        else if ($$1 == /me) {
          .quote $iif(h isincs $usermode, faction $chan %rpcharacter $iif($left($2,1) == $chr(58), $($chr(58) $+ $$2-), $$2-)  , npca $chan %rpcharacter $iif($left($2,1) == $chr(58), $($chr(58) $+ $$2-), $$2-))
          haltdef
        } 
      }
    }
  }
}

Comments

(5) RSS

Go to Bottom

Rovien

Comments: 2

mIRC Snippet: RolePlaying Dialog
Posted on Apr 17, 2008 10:18 pm

Very nice, Simple and easy to use, comes in handy if you RP in many channels at one time.

Romulus777

Comments: 3

mIRC Snippet: RolePlaying Dialog
Posted on Apr 18, 2008 9:47 am

Wonderful script, SCAKK, as always. It\'s always helpful to have a nice dialog like this floating around for RPs. The only real suggestion I can make is to have the window be adjustable, so I can see the full list of characters.

SiLver_ShaDow

Comments: 5

mIRC Snippet: RolePlaying Dialog
Posted on Apr 22, 2008 8:24 am

verry good

kaperdk

Comments: 1

mIRC Snippet: RolePlaying Dialog
Posted on May 25, 2008 6:16 am

how do you start it? else loooking nice

vaseline28

Comments: 133

mIRC Snippet: RolePlaying Dialog
Posted on May 28, 2008 2:52 am

@ kaperdk: Right click in a channel window and select the option [RolePlay] which will show up.

Again, great work Scakk!

RolePlaying Dialog

Introduction

Grab the Code

Comments

Scakk

My Snippet Tags

Contact

Friends (15)

Sponsors


Last seen: Aug 29, 2008 Profile Likes (1) Friends (15) Snippets (34) Images (16) Comments Received (287) Comments Submitted (214) Forum Posts (170)