Font Dialog Needed

Can anyone tell me how to load font dialoge in my script and from where i can have it.

script which im being used at SCN dosent support fonts and it use default and colorless font...

so anyone can guid about it?

You have to preform dids in order for it to work. I'm not real sure if SCN has something to do that, but, someone might look and offer one.

Yeah Im sure its easier to find dialogs to flood people on scn than it is to find a font dialog. LOL Oh!!!!

And people wonder why they get closed .. lol

You can use this. Don't know if this is something you're looking for. If it isn't can you go more into detail?

menu menubar,channel,status {
  Edit Colors:/colors
  -
  Edit Font:/font
  -
}

alias colors {
  if ($com(colors)) .comclose colors
  .comopen colors WScript.Shell
  .comclose colors $com(colors,Sendkeys,3,bstr,$+($(%,0),K))
}

These are remote commands to open mircs color dialog, or font dialog box. You can also do this just from the "View" menu as well.

Thanx warrior so much.these are MIRC fonts and color code..while i need a Font dialog so i can change my chat fonts and colors ...

as i already have some code like

dialog font {

title "SCN Font Dialog"

size -1 -1 102 63

option dbu

combo 1, 2 14 60 50, sort size drop

text "Font Type", 2, 18 5 26 8

combo 3, 2 39 60 50, sort size drop

text "Font Color", 4, 18 27 26 8

check "Bold", 5, 74 14 27 10

check "Italic", 6, 74 25 27 10

check "Random Color", 7, 2 50 43 10

check "Use Font", 8, 67 1 33 10

}

alias pini {

if ($2 == $null) return $readini(SCNFont.ini,n,settings,$$1)

if ($1 == r) remini SCNFont.ini settings $$2

else writeini SCNFont.ini settings $$1 $2-

}

On *:Dialog:font:init:*: {

if ($pini(do.font)) did -c font 8

if ($pini(font.) did -c font 5

if ($pini(font.i)) did -c font 6

if ($pini(font.r)) did -c font 7

didtok font 3 44 Black,White,DarkBlue,DarkGreen,Red,DarkRed,Purple,DarkYellow,Yellow,Green,Teal,Cyan,Blue,Pink,DarkGray,Gray

didtok font 1 44 Arial,Tahoma,Arial Black,Arial Narrow,Century,Comic Sans MS

}

on *:dialog:font:sclick:*:{

if ($did == 8) { if ($pini(do.font)) { pini r do.font | did -u font 8 }

else { pini do.font $true | did -c font 8 }

}

if ($did == 5) { if ($pini(font.) { pini r font.b | did -u font 5 }

else { pini font.b $true | did -c font 5 }

setfontcode

}

if ($did == 6) { if ($pini(font.i)) { pini r font.i | did -u font 6 }

else { pini font.i $true | did -c font 6 }

setfontcode

}

if ($did == 7) { if ($pini(font.r)) { pini r font.r | did -u font 7 }

else { pini font.r $true | did -c font 7 }

}

if ($did == 1) { pini font.font $did(font,$did).seltext | setfontcode }

if ($did == 3) { pini font.color $did(font,$did).seltext | setfontcode }

}

but hell it does not works dont know wats wrong with it :S

Your missing some aliases. Post for some help on SCN's board, which I think has moved to Chainscriptz.

i already have asked them for help .........

but they said they do not help with script............

i have made 2 scripts for SCN....and font dialog work with them...

but now i have made new version and now same dilag does not works...which driving me crazy and i realy dont know how to make it work...i have done aloost everything but all in vain...nothing work with it :S

Have you included the needed aliases? I see two aliases that you didnt include in the code you posted.

hummmmm........

i cant gett wat im missing ...please if u can tell me wat im missing ...?

and u can post here?

Your missing:

alias pini

alias setfontcode

Also, since SCN isnt IRCd, I've moved this to General IRCx