Код
/////////////////////////////////////////////////////
// //
// Made by NFix* //
// Type : Chat system //
// Use : type .ch //
// Version : o.55 R4 (to use in 55.i remove @**) //
// //
/////////////////////////////////////////////////////
// Main Menu - главное меню
[DIALOG chat_s]
0, 0
PAGE 0
resizepic 9 9 2600 181 244
text 55 22 162 0
text 76 220 162 1
button 37 134 4005 4006 1 1 1
text 72 134 1345 2
button 37 156 4005 4006 1 1 2
text 72 156 1345 3
button 37 178 4005 4006 1 1 3
text 72 178 1345 4
gumppic 69 57 223
[DIALOG chat_s TEXT]
Chat sys v1.1
by NFix*
Server chat
Guild chat
PM service
[DIALOG chat_s BUTTON]
ONBUTTON=1
f_taghelp
dialog schat
ONBUTTON=2
f_taghelp
dialog gchat
ONBUTTON=3
f_taghelp
dialog pmsend
//Распределение тагов
[FUNCTION f_taghelp]
IF (0<tag.off>==1)
tag.usechat=OFF
tag.tc=238
ELSE
tag.tc=64
tag.usechat=ON
ENDIF
IF (0<tag.goff>==1)
tag.usegc=OFF
tag.gtc=238
ELSE
tag.gtc=64
tag.usegc=ON
ENDIF
IF (0<tag.gcol> == 00)
tag.gcol=64
ENDIF
IF (0<tag.chatcol> == 00)
tag.chatcol=64
ENDIF
// Server Chat - Общесерверный чат
[FUNCTION ch]
IF (strmatch("<args>",""))
sysmessage @238 No text! Be careful! Type "!help" to get help'
dialog chat_s
return 1
ENDIF
IF (strmatch("<args>","!help"))
sysmessage @64 Type ".ch text" to use chat
sysmessage @64 Type ".ch on" to activate chat
sysmessage @64 Type ".ch off" to de-activate chat
return 1
ENDIF
IF (strmatch("<args>","on"))
IF (0<tag.off> == 1)
sysmessage @128 Chat is activated!
tag.off=0
return 1
ELSE
sysmessage @128 Chat is already activated!
return 1
ENDIF
ELSEIF (strmatch("<args>","off"))
IF (0<tag.off> == 1)
sysmessage @128 Chat is already de-activated!
return 1
ELSE
tag.off=1
sysmessage @128 Chat de-activated!
return 1
ENDIF
ENDIF
IF (0<tag.off>==1)
src.sysmessage @238 Chat is de-activated
src.sysmessage @238 Type .ch on to activate chat!
RETURN 1
ENDIF
var.speech=<args>
var.sname=<name>
var.sregion=<region.name>
var.scolor=<tag.chatcol>
serv.allclients f_chat
[FUNCTION f_chat]
IF (0<tag.off>==1)
RETURN 1
ENDIF
sysmessage @<eval <var.scolor>> <var.sname> [<var.sregion>]: <var.speech>
[DIALOG schat]
190, 0
PAGE 0
resizepic 9 9 2600 181 244
text 57 22 162 0
text 76 220 162 1
text 32 74 1345 2
text 42 94 1345 3
text 127 94 <eval <tag.tc>> 4
text 32 124 1345 5
text 42 144 1345 6
textentry 127 144 30 40 <eval <tag.chatcol>> 0 7
button 107 188 2311 2312 1 0 1
[DIALOG schat TEXT]
Chat options
by NFix*
Chat status:
Chat is ......
<tag.usechat>
Chat color:
Color is ....
<eval <tag.chatcol>>
[DIALOG schat BUTTON]
ONBUTTON=1
IF (<ARGTXT[0]> != <eval <tag.chatcol>>)
tag.chatcol=<ARGTXT[0]>
src.sysmessage @<eval <tag.chatcol>> Color changed to <eval <tag.chatcol>> !
RETURN 1
ENDIF
/// Gchat - Гильд Чат
[FUNCTION .]
IF (<MEMORYFINDTYPE(0400).LINK> == 0)
src.sysmessage You are not in a guild!
RETURN 1
ENDIF
IF (strmatch("<args>",""))
sysmessage @238 No text! Be careful! Type "!help" to get help'
dialog chat_s
return 1
ENDIF
IF (strmatch("<args>","!help"))
sysmessage @64 Type ".. text" to use chat
sysmessage @64 Type ".. on" to activate chat
sysmessage @64 Type ".. off" to de-activate chat
return 1
ENDIF
IF (strmatch("<args>","on"))
IF (0<tag.goff> == 1)
sysmessage @128 GChat is activated!
tag.goff=0
return 1
ELSE
sysmessage @128 GChat is already activated!
src.sysmessage @238 Type ".. off" to de-activate GChat!
return 1
ENDIF
ELSEIF (strmatch("<args>","off"))
IF (0<tag.goff> == 1)
sysmessage @128 GChat is already de-activated!
return 1
ELSE
tag.goff=1
sysmessage @128 GChat de-activated!
return 1
ENDIF
ENDIF
IF (0<tag.goff>==1)
src.sysmessage @238 GChat is de-activated
src.sysmessage @238 Type ".. on" to activate GChat!
RETURN 1
ENDIF
var.gpeech=<args>
var.gname=<name>
var.gregion=<region.name>
var.gcol=<tag.gcol>
var.gchecks=<MEMORYFINDTYPE(0400).LINK.uid>
serv.allclients f_gchat
[FUNCTION f_gchat]
IF (0<tag.goff> == 1)
RETURN 1
ENDIF
IF (0<MEMORYFINDTYPE(0400).LINK> == 0)
RETURN 1
ENDIF
IF (0<MEMORYFINDTYPE(0400).LINK> != <var.gcheks>)
RETURN 1
ENDIF
sysmessage @<eval <var.gcol>> **Guild** <var.gname> [<var.gregion>]: <var.gpeech>
[DIALOG gchat]
190, 0
PAGE 0
resizepic 9 9 2600 181 244
text 53 22 162 0
text 76 220 162 1
text 32 74 1345 2
text 42 94 1345 3
text 127 94 <eval <tag.gtc>> 4
text 32 124 1345 5
text 42 144 1345 6
textentry 127 144 30 40 <eval <tag.gcol>> 0 7
button 107 188 2311 2312 1 0 1
[DIALOG gchat TEXT]
GChat options
by NFix*
Chat status:
Chat is ......
<tag.usegc>
Chat color:
Color is ....
<eval <tag.gcol>>
[DIALOG gchat BUTTON]
ONBUTTON=1
IF (<ARGTXT[0]> != <eval <tag.gcol>>)
tag.gcol=<ARGTXT[0]>
src.sysmessage @<eval <tag.gcol>> Color changed to <eval <tag.gcol>> !
RETURN 1
ENDIF
[FUNCTION f_chat]
IF (0<tag.off>==1)
RETURN 1
ENDIF
sysmessage @<eval <var.scolor>> <var.sname> [<var.sregion>]: <var.speech>
// PM services - Персональный пеиджер
[FUNCTION pm]
IF (<tag.pmoff> == 1)
src.sysmessage @238 PM is de-activated!
RETURN 1
ENDIF
dialog pmsending
// диалог отправки
[DIALOG pmsending]
0, 0
PAGE 0
resizepic 63 63 3500 270 174
button 259 202 239 240 1 0 1
gumppic 87 101 96
text 87 81 1152 0
textentry 200 81 90 40 0 0 1
textentry 87 110 200 40 0 1 2
textentry 87 125 200 40 0 2 2
textentry 87 140 200 40 0 3 2
textentry 87 155 200 40 0 4 2
textentry 87 170 200 40 0 5 2
textentry 87 185 200 40 0 6 2
[DIALOG pmsending TEXT]
Message for :
<src.tag.sender>
=>
[DIALOG pmsending BUTTON]
ONBUTTON=1
var.target=<ARGTXT[0]>
var.sender=<src.name>
var.senderx=<src.uid>
var.pmtext1=<ARGTXT[1]>
var.pmtext2=<ARGTXT[2]>
var.pmtext3=<ARGTXT[3]>
var.pmtext4=<ARGTXT[4]>
var.pmtext5=<ARGTXT[5]>
var.pmtext6=<ARGTXT[6]>
serv.allclients f_pm
[FUNCTION f_pm]
IF (strmatch("<var.target>","<name>"))
IF (<tag.pmoff> == 1)
LINK=<var.senderx>
LINK.sysmessage @238 Person has blocked PM services
RETURN 1
ENDIF
tag.text1=<var.pmtext1>
tag.text2=<var.pmtext2>
tag.text3=<var.pmtext3>
tag.text4=<var.pmtext4>
tag.text5=<var.pmtext5>
tag.text6=<var.pmtext6>
tag.sender=<var.target>
var.left = <
var.right = >
IF (0<tag.muzzoff> == 0)
sfx 0214
ENDIF
dialog receive
ENDIF
// Диалог получения
[DIALOG receive]
0, 0
PAGE 0
resizepic 63 63 3500 290 184
button 259 212 239 240 1 0 0
gumppic 87 101 96
text 87 81 1152 0
text 205 81 0 1
HTMLgump 97 120 220 80 2 1 1
button 224 212 4005 4006 1 0 1
[DIALOG receive TEXT]
Message from :
<src.tag.sender>
<src.tag.text1><var.left>p<var.right><src.tag.text2><var.left>p<var.right><src.tag.text3><var.left>p<var.right><src.tag.text4><var.left>p<var.right><src.tag.text5><var.left>p<var.right><src.tag.text6>
[DIALOG receive BUTTON]
ONBUTTON=1
dialog pmsending
//Диалог настроек ПМ
[DIALOG pmsend]
190, 0
PAGE 0
resizepic 9 9 2600 181 244
text 57 22 162 0
text 76 220 162 1
text 34 84 1345 2
text 44 104 1345 3
checkbox 131 104 211 210 <eval <tag.pmoff>> 0
text 34 134 1345 4
text 44 154 1345 5
checkbox 131 154 211 210 <eval <tag.muzoff>> 1
Button 107 188 2311 2312 1 0 1
button 83 52 4005 4006 1 1 2
[DIALOG pmsend TEXT]
PM service
by NFix*
PM status:
PM is .......
PM music:
PM is .......
[DIALOG pmsend BUTTON]
ONBUTTON=1
IF (<ARGCHK[0]> == 1) && (0<src.tag.pmoff> == 0)
src.tag.pmoff=1
src.sysmessage @128 PM services de-activated
ELSEIF (<ARGCHK[0]> == 0) && (0<src.tag.pmoff> == 1)
src.sysmessage @128 PM services activated
src.tag.pmoff=0
ENDIF
IF (<ARGCHK[1]> == 1) && (0<src.tag.muzoff> == 0)
src.tag.muzoff=1
src.sysmessage @128 PM music de-activated
ELSEIF (<ARGCHK[1]> == 0) && (0<src.tag.muzoff> == 1)
src.sysmessage @128 PM music activated
src.tag.muzoff=0
ENDIF
ONBUTTON=2
dialog pmsending
//Made by NFix*
//Type : Chat system
//Use : type .ch
//Version : o.55 R4 (to use in 55.i remove @**)
Добавил гильд-чат (он глбючит (IMG:
style_emoticons/default/sad.gif)) и ПМ сервис (пеиджинг)
Много ума, чтоб сферу повесить, не надо.
Chat-system
19.8.2004, 23:32
NFx Chat-system 19.8.2004, 23:32
