Jump to content

Recommended Posts

Posted

// Îòêðûòèå/çàêðûòèå ëþáûõ äâåðåé, âîðîò è ò.ä. À òàêæå ïðîõîä â äàëüíåéùåì ÷åðåç îòêðòóþ äâåðü äàëüøå.

// Ðàáîòàåò íà âñåõ ñåðâåðàõ, íî ïðîéòè ÷åðåç îòêðûòóþ äâåðü ìîæíî íà ñåðâåðå, ãäå íåò ãåîäàòû (java).

// ×òîáû èñïîëüçîâàòü ñêðèïò, âûäåëèòå íóæíóþ âàì äâåðü ÷åðåç Shift + ëåâàÿ êíîïêà ìûøè

// Àâòîð: Furious

// Âåðñèÿ: 0.2

 

var

Bypass: String;

ObjectID, ActionID, Status: Integer;

 

const

HTML='<html><body><center><img src="L2UI_CH3.herotower_deco"'+

' width=256 height=32><font color="LEVEL">Ìåíþ óïðàâëåíèÿ âî'+

'ðîòàìè è äâåðÿìè</font><br><font color="LEVEL">Àâòîð: Furio'+

'us</font><img src="L2UI.SquareWhite" width=260 height=1><im'+

'g src="L2UI.SquareBlank" width=260 height=4><br1><td><butto'+

'n value="Îòêðûòü" action="bypass -h open" width=70 height=1'+

'5 back="sek.cbui94" fore="sek.cbui92"></td><br><td><button '+

'value="Çàêðûòü" action="bypass -h close" width=70 height=15'+

' back="sek.cbui94" fore="sek.cbui92"></td><br></tr><img src'+

'="L2UI.SquareWhite" width=260 height=1><img src="L2UI.Squar'+

'eBlank" width=260 height=4><br1></center></body></html>';

 

procedure ShowHTML;

  begin

    buf:=#$0F;

    WriteD(5);

    WriteS(HTML);

    SendToClient;

  end;

 

procedure DoorAction;

  begin

    buf:=#$4D;

    WriteD(ObjectID);

    WriteD(Status);

    WriteD(0);

    WriteD(1);

    WriteD(0);

    SendToClient;

  end;

 

 

begin

  if FromClient and (pck[1]=#$04) then

    begin

      ActionID:=ReadC(18);

      if ActionID=1 then

        begin

          ObjectID:=ReadD(2);

          ShowHTML;

        end;

    end;

  if FromClient and (pck[1]=#$21) then

    begin

      Bypass:=ReadS(2);

      case Bypass of

      'open':Status:=0 and DoorAction;

      'close':Status:=1 and DoorAction;

      end;

    end;

end.

 

 

 

 

 

 

 

 

 

lipon ego etsi ton exo mesa sto phx mou kai mou doulevei mia xara... sou ipa kai me ti version to dokimazo.. kai prepei na to dokimasis se server pou na pianei to phx...

Posted

ok an 8es stilemou minima me to url tou server na mpo na dokimaso an ginete na anigo tis portes kai na sou po an ston sigekrimeno piani...

Posted

Polli kalo file thank you! Polli prototipo, makari na doulebei! Tha to dokimaso kai tha sou pw!

Posted

Polli kalo file thank you! Polli prototipo, makari na doulebei! Tha to dokimaso kai tha sou pw!

ean piani to phx eki pou ta dokimazis 8a piani sigoura...

 

[move]Hide this post: Apo 99 sta 50 mias kai to phx den piani se tosous polous server!!Dokimasmeno se l2PHX 3.1.8 C6 IL[/move]

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now



×
×
  • Create New...

AdBlock Extension Detected!

Our website is made possible by displaying online advertisements to our members.

Please disable AdBlock browser extension first, to be able to use our community.

I've Disabled AdBlock