Chat-system Опции

[NFx]

Код

Made by NFix*

Type : Chat system

Use : type .ch

Version : o.55 R4 (to use in 55.i remove @**) 



[FUNCTION ch]



IF (strmatch("<args>",""))

 sysmessage @238 No text! Be careful! Type "!help" to get help

 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>

serv.allclients f_chat



[FUNCTION f_chat]

IF (0<tag.off>==1)

 RETURN 1

ENDIF

sysmessage @64 <var.sname> [<var.sregion>]: <var.speech>

Чат-система общесерверная, включаемая-отключаемая каждм пользователем как он хочет, хрень типо попомщи включенна

[STunTxxx]

крута ) можна я павешаю твой сервер с этай системой )))

[NFx]

Код

/////////////////////////////////////////////////////

//                                                 //

// 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)) и ПМ сервис (пеиджинг)


Много ума, чтоб сферу повесить, не надо.

[AHgpjuwKA]

Чат есть в самой ультиме. Его чтоли недостаточно? Хатя через него реально сферу положить можно.

[|Finger Board|]

1.Чатики не плохие
2.Положить можно , но осторожно
3.Всегда можно апгрейдитца!

[NFx]

мне стало лень разбираться тчо с ГильдЧатом, так что если хотите класть на сервер - наидите там ошибку.

[Destruction]

Класс! Молодец! Держи 100$!

[NFx]

Код

///////////////////////////////////////////////////// 

//                                                 // 

// 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 v2.0 

by NFix* 

Server chat 

Guild Chat

Help Page 





[DIALOG chat_s BUTTON] 



ONBUTTON=1

f_taghelp 

dialog schat



ONBUTTON=2

f_taghelp 

dialog schat



ONBUTTON=3

helppage



  //Распределение тагов 



[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>","")) 

sysmessageua @238 No text! Be careful! Type "!help" to get help' 

dialog chat_s 

return 1 

ENDIF 



IF (strmatch("<args>","!help")) 

sysmessageua @64 Type ".ch text" to use chat 

sysmessageua @64 Type ".ch on" to activate chat 

sysmessageua @64 Type ".ch off" to de-activate chat 

return 1 

ENDIF 



IF (strmatch("<args>","on")) 

IF (0<tag.off> == 1) 

 sysmessageua @128 Chat is activated! 

 tag.off=0 

 return 1 

ELSE 

 sysmessageua @128 Chat is already activated! 

 return 1 

ENDIF 

ELSEIF (strmatch("<args>","off")) 

IF (0<tag.off> == 1) 

 sysmessageua @128 Chat is already de-activated! 

 return 1 

ELSE 

 tag.off=1 

 sysmessageua @128 Chat de-activated! 

 return 1 

ENDIF 

ENDIF   



IF (0<tag.off>==1) 

src.sysmessageua @238 Chat is de-activated 

src.sysmessageua @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 

sysmessageua <eval <var.scolor>>,0,0,rus,<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).uid> 

serv.allclients f_gchat 



[FUNCTION f_gchat] 

IF (0<tag.goff> == 1) 

RETURN 1 

ENDIF 

IF (0<MEMORYFINDTYPE(0400).UID> == 0) 

RETURN 1 

ENDIF 

IF (0<MEMORYFINDTYPE(0400).UID> != <var.gcheks>) 

RETURN 1 

ENDIF 

sysmessageua <eval <var.scolor>>,0,0,rus,***Guild*** <var.sname> [<var.sregion>]: <var.speech> 



[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 

ЛОВИтЕ! После того как написал пред. пост я наконец понял, почему юникод глючит.... Кароч я пытался переводить на русский юникод отталкиваясь от Тарановскои функции, но подумав, решил что проще не менять стандартную команду его ыфункциеи, а поюзать её напрямую....


Итого - chat sys 2.0


Теперь моно пистаь по русски (IMG:style_emoticons/default/smile.gif) (сча разберусь еще с гильд чатом, времени в образ). Убрал Пеиджинг, ибо лаги, создаваемые им, себя не оправдали

[Aron]

Поздняк метаться пацаны, НФикс работает на меня Ж)