[Scripting] Vérifier Status On/Offline sur différent serveurs

Vérifier Status On/Offline sur différent serveurs [Scripting] - Programmation

Marsh Posté le 29-03-2002 à 06:44:32    

Aliases

Code :
  1. /Status {
  2.   If (%Status- [ $+ [ $1 ] ] == on) { /Return Up }
  3.   If (%Status- [ $+ [ $1 ] ] == off) { /Return Down }
  4. }
  6. /Servname {
  7.   If ($1 == 1) { /Return PatchServer }
  8.   If ($1 == 2) { /Return LoginServer }
  9.   If ($1 == 3) { /Return CharSelectServer }
  10.   If ($1 >= 4) { /Return GameServer $+ $1 }
  11. }
  13. /Servip {
  14.   If ($1 == 1) { /Return 211.239.123.172 }
  15.   If ($1 == 2) { /Return 211.239.161.74 }
  16.   If ($1 == 3) { /Return 211.239.161.60 }
  17.   If ($1 == 4) { /Return 211.239.161.62 }
  18.   If ($1 == 5) { /Return 211.239.161.63 }
  19.   If ($1 == 6) { /Return 211.239.161.66 }
  20.   If ($1 == 7) { /Return 211.239.161.68 }
  21.   If ($1 == 8) { /Return 211.239.161.69 }
  22.   If ($1 == 9) { /Return 211.239.161.70 }
  23.   If ($1 == 10) { /Return 211.239.161.71 }
  24. }
  26. /Servport {
  27.   If ($1 == 1) { /Return 5438 }
  28.   If ($1 == 2) { /Return 6900 }
  29.   If ($1 == 3) { /Return 6001 }
  30.   If ($1 >= 4) { /Return 5001 }
  31. }
  33. /Check {
  34.   :Loop
  35.   /Inc %Serv 1
  36.   If (%Serv < 10) {
  37.     /Sockopen Ragnarok- $+ %Serv $Servip(%Serv) $Servport(%Serv)
  38.     /Goto Loop
  39.     /sockclose Ragnarok*
  40.   }
  41.   Else { /Set %Serv 1 }
  42. }


Remote

Code :
  1. on 1:TEXT:!Test:#: {
  2.   /check
  3.   /Notice $Nick [Server Test]
  4.   :Loop
  5.   /Inc %Loop 1
  6.   If (%Loop < 10) {
  7.     /Notice $Nick - $Servname(%Loop) - $Status(%Loop)
  8.     /Goto Loop
  9.   }
  10.   Else {
  11.     /Notice $Nick [End Test]
  12.     /Set %Loop 1
  13.   }
  14. }
  16. on 1:SOCKOPEN:Ragnarok-*: {
  17.   If ($Sockerr > 0) {
  18.     /Set %Status [ $+ [ $Mid($Sockname,$Pos($Sockname,$Chr(45)),$Len($Sockname))) ] ] off
  19.     /Halt
  20.   }
  21.   /Set %Status [ $+ [ $Mid($Sockname,$Pos($Sockname,$Chr(45)),$Len($Sockname))) ] ] on
  22. }


Ca ne Fonctionne pas :( normalement ca devrais vérifier si le server est online ou offline...qqun pourais l'arranger? :jap:  :wahoo:  :pt1cable:

 

[jfdsdjhfuetppo]--Message édité par Techno_cool_00--[/jfdsdjhfuetppo]

Reply

Marsh Posté le 29-03-2002 à 06:44:32   

Reply

Marsh Posté le 30-03-2002 à 03:50:22    

:bounce:

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed