mIRC Home    About    Download    Register    News    Help

Print Thread
dialog/did errors #18688 10/04/03 12:41 AM
Joined: Dec 2002
Posts: 397
A
ATMA Offline OP
Fjord artisan
OP Offline
Fjord artisan
A
Joined: Dec 2002
Posts: 397
i dont know what it is but some of this doesnt like to work right
Code:
plz pm me for the code just for securty reasons =p dont want ppl riping me



Need amazing web design for low price: http://www.matrixn3t.net
Re: dialog/did errors #18689 10/04/03 10:39 AM
Joined: Feb 2003
Posts: 47
G
guesseyder Offline
Ameglian cow
Offline
Ameglian cow
G
Joined: Feb 2003
Posts: 47
mirc scripts are considered open source and people would like to learn of eachother. I'm not helping if you don't want your code publicly viewed. If you don't want it ripped then you shouldn't be asking for help since the helper could use the code himself as well and might even post it anyways.

just my humble opinion

Re: dialog/did errors #18690 10/04/03 08:16 PM
Joined: Dec 2002
Posts: 397
A
ATMA Offline OP
Fjord artisan
OP Offline
Fjord artisan
A
Joined: Dec 2002
Posts: 397
here is the code sorry lol
grin

Code:
dialog away {
  title Slayer Script 1.2 Away Script
  size -1 -1 200 132
  option dbu
  tab "Away Info:", 1,           1 1 198 130
  box "Away:", 5,                5 17 190 100, tab 1
  edit %away.nick, 6,            9 25 50 12, tab 1
  text "(Away Nick)", 7,         60 27 50 12, tab 1
  edit %away.returnnick, 8,          9 37 50 12, tab 1
  text "(Return Nick)", 9,       60 39 50 12, tab 1
  text "Away Reason:", 10,       9 49 50 12, tab 1
  edit %away.reason, 11,         9 57 181 45, tab 1
  combo 119,                     125 25 50 40, left, tab 1 size drop
  button "Away", 12,             9 102 50 12, tab 1
  button "Return", 13,           140 102 50 12, tab 1
  button "Help", 14,             75 102 50 12, tab 1
  tab "Options:", 2
  box "Timers:", 15,             5 17 150 22, tab 2
  combo 16,                      9 25 52 60, tab 2 size drop
  button "Set Timer", 17,        65 24 40 12, tab 2
  box "Letter Colors:", 18,      5 40 150 22, tab 2
  combo 19,                      9 48 52 60, tab 2 size drop
  button "Set Color", 20,        65 47 40 12, tab 2
  box "Background Color:", 21,   5 63 150 22, tab 2
  combo 22,                      9 71 52 60, tab 2 size drop
  button "Set Color", 23,        65 70 40 12, tab 2
  box "Left Divider:", 24,       5 86 150 22, tab 2
  edit %away.leftdiv, 25,        9 94 52 11, tab 2
  button "Set Divider", 26,      65 93 40 12, tab 2
  tab Options 2:, 3,
  box "Right Divider:", 27,      5 17 150 22, tab 3
  edit %away.rightdiv, 28,       9 25 52 11, tab 3
  button "Set Divider", 29,      65 24 40 12, tab 3
  box "Divider:", 30,            5 40 150 22, tab 3
  edit %away.div, 31,            9 48 52 11, tab 3
  button "Set Divider", 32,      65 47 40 12, tab 3
  button "Save All & Exit", 33,  140 118 50 12, ok cancel
  button "Preveiw", 34,         8 118 50 12
  button "Ok", 35,              75 118 50 12, ok
}
on *:DIALOG:away:sclick:20: {
  if ($did(22).text == Black) { set %away.lcolors 1 }
  if ($did(22).text == Dark Blue) { set %away.lcolors 2 }
  if ($did(22).text == Green) { set %away.lcolors 3 }
  if ($did(22).text == Red) { set %away.lcolors 4 }
  if ($did(22).text == Dark Red) { set %away.lcolors 5 }
  if ($did(22).text == Purple) { set %away.lcolors 6 }
  if ($did(22).text == Orange) { set %away.lcolors 7 }
  if ($did(22).text == Yellow) { set %away.lcolors 8 }
  if ($did(22).text == Neon Green) { set %away.lcolors 9 }
  if ($did(22).text == Ocean Blue) { set %away.lcolors 10 }
  if ($did(22).text == Turquoise) { set %away.lcolors 11 }
  if ($did(22).text == Blue) { set %away.lcolors 12 }
  if ($did(22).text == Light Purple) { set %away.lcolors 13 }
  if ($did(22).text == Dark Grey) { set %away.lcolors 14 }
  if ($did(22).text == Light Grey) { set %away.lcolors 15 }
  if ($did(22).text == White) { set %away.lcolors 0 }
  .echo ID# %away.lcolors
}
on *:DIALOG:away:sclick:33: {
  if ($did(22).text == Black) { set %away.lcolors 1 }
  if ($did(22).text == Dark Blue) { set %away.lcolors 2 }
  if ($did(22).text == Green) { set %away.lcolors 3 }
  if ($did(22).text == Red) { set %away.lcolors 4 }
  if ($did(22).text == Dark Red) { set %away.lcolors 5 }
  if ($did(22).text == Purple) { set %away.lcolors 6 }
  if ($did(22).text == Orange) { set %away.lcolors 7 }
  if ($did(22).text == Yellow) { set %away.lcolors 8 }
  if ($did(22).text == Neon Green) { set %away.lcolors 9 }
  if ($did(22).text == Ocean Blue) { set %away.lcolors 10 }
  if ($did(22).text == Turquoise) { set %away.lcolors 11 }
  if ($did(22).text == Blue) { set %away.lcolors 12 }
  if ($did(22).text == Light Purple) { set %away.lcolors 13 }
  if ($did(22).text == Dark Grey) { set %away.lcolors 14 }
  if ($did(22).text == Light Grey) { set %away.lcolors 15 }
  if ($did(22).text == White) { set %away.lcolors 0 }
  .set %away.reason $did(away,11)
  .set %away.nick $did(away,6)
  .set %away.returnnick $did(away,8)
  .set %away.pager $did(away,119)
  .set %away.timer $did(away,16)
  .set %away.leftdiv $did(away,25)
  .set %away.rightdiv $did(away,28)
  .set %away.div $did(away,31)
}
on *:DIALOG:away:slick:12: {
  if ($did(22).text == Black) { set %away.lcolors 1 }
  if ($did(22).text == Dark Blue) { set %away.lcolors 2 }
  if ($did(22).text == Green) { set %away.lcolors 3 }
  if ($did(22).text == Red) { set %away.lcolors 4 }
  if ($did(22).text == Dark Red) { set %away.lcolors 5 }
  if ($did(22).text == Purple) { set %away.lcolors 6 }
  if ($did(22).text == Orange) { set %away.lcolors 7 }
  if ($did(22).text == Yellow) { set %away.lcolors 8 }
  if ($did(22).text == Neon Green) { set %away.lcolors 9 }
  if ($did(22).text == Ocean Blue) { set %away.lcolors 10 }
  if ($did(22).text == Turquoise) { set %away.lcolors 11 }
  if ($did(22).text == Blue) { set %away.lcolors 12 }
  if ($did(22).text == Light Purple) { set %away.lcolors 13 }
  if ($did(22).text == Dark Grey) { set %away.lcolors 14 }
  if ($did(22).text == Light Grey) { set %away.lcolors 15 }
  if ($did(22).text == White) { set %away.lcolors 0 }
  .set %away.reason $did(away,11)
  .set %away.nick $did(away,6)
  .set %away.returnnick $did(away,8)
  .set %away.pager $did(away,119)
  .set %away.timer $did(away,16)
  .set %away.leftdiv $did(away,25)
  .set %away.rightdiv $did(away,28)
  .set %away.div $did(away,31)
  .tnick %away.nick
  .ame is away,  $+  $+ %lcolors $+ , $+ %bgcolors %away.leftdiv $+ %away.reason $+ %away.rightdiv %away.div %away.leftdiv $+ Pager: %away.pager $+ %away.rightdiv %away.div %away.leftdiv $+ To conntact me type /ctcp page %away.nick <message> $+ %away.rightdiv
}

on *:DIALOG:away:init:*: {
  if (%away.pager == Pager On) { did -ic $dname 119 1 Pager Off | did -ic $dname 119 2 Pager On }
  if (%away.pager == Pager Off) { did -ic $dname 119 1 Pager On | did -ic $dname 119 2 Pager Off }
  did -ic $dname 16 1 5mins
  did -ic $dname 16 2 10mins
  did -ic $dname 16 3 15mins
  did -ic $dname 16 4 20mins
  did -ic $dname 16 5 25mins
  did -ic $dname 16 6 30mins
  did -ic $dname 16 7 35mins
  did -ic $dname 16 8 40mins
  did -ic $dname 16 9 45mins
  did -ic $dname 16 10 50mins
  did -ic $dname 19 1 Black
  did -ic $dname 19 2 Dark Blue
  did -ic $dname 19 3 Green
  did -ic $dname 19 4 Red
  did -ic $dname 19 5 Dark Red
  did -ic $dname 19 6 Purple
  did -ic $dname 19 7 Orange
  did -ic $dname 19 8 Yellow
  did -ic $dname 19 9 Neon Green
  did -ic $dname 19 10 Ocean Blue
  did -ic $dname 19 11 Turquoise
  did -ic $dname 19 12 Blue
  did -ic $dname 19 13 Light Purple
  did -ic $dname 19 14 Dark Grey
  did -ic $dname 19 15 White
  did -ic $dname 22 1 Black
  did -ic $dname 22 2 Dark Blue
  did -ic $dname 22 3 Green
  did -ic $dname 22 4 Red
  did -ic $dname 22 5 Dark Red
  did -ic $dname 22 6 Purple
  did -ic $dname 22 7 Orange
  did -ic $dname 22 8 Yellow
  did -ic $dname 22 9 Neon Green
  did -ic $dname 22 10 Ocean Blue
  did -ic $dname 22 11 Turquoise
  did -ic $dname 22 12 Blue
  did -ic $dname 22 13 Light Purple
  did -ic $dname 22 14 Dark Grey
  did -ic $dname 22 15 White
}
#awaystuff
#awaypager
ctcp *:page:{ 
  if ($nick != $me) { 
    .ctcpreply $nick PAGE Your page has been logged!
    if ($window(@Away_Pager) == $null) { window -ng2 @Away_Pager }
    aline -hp @Away_Pager $time(HH:nn:ss) $date(mm/dd/yyyy)  $+ $colour(CTCP) $+ Page:12 $nick $+ :  $2-
  }
}

#awaypager
on *:TEXT:?: { 
  if ($nick != $me) {
    .msg $nick (Auto) I am not here at the moment thank you.
  }
}
#awaystuff
alias /away2 { /dialog -md away away }


Need amazing web design for low price: http://www.matrixn3t.net
Re: dialog/did errors #18691 11/04/03 10:17 AM
Joined: Feb 2003
Posts: 47
G
guesseyder Offline
Ameglian cow
Offline
Ameglian cow
G
Joined: Feb 2003
Posts: 47
Could you specify what exactly isn't working? What errors do you get etc.

I'm not at home and can't use mirc now to test the code.

Re: dialog/did errors #18692 11/04/03 10:21 AM
Joined: Feb 2003
Posts: 47
G
guesseyder Offline
Ameglian cow
Offline
Ameglian cow
G
Joined: Feb 2003
Posts: 47
Perhaps the error lies in the "alias /away2 { }"

Usually alias definitions don't have the slash in front of it. The slash is only used in mircwindows to denote a command or alias call. try "alias away2 { }" instead. If you specify what else is going wrong then i might help u further. I don't see any other errors at this moment.