123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960 |
- %setVar safe marvinius;
- @checker
- %playersToList online;
- %if %getListSize online; == 0 goto wait;
- %setVar i 0;
- @checklabel
- %if %getListElementAt online $i; == marvinius goto jump;
- %if %distance %getPlayerLoc $safe; %getPlayerLoc %getListElementAt online $i;;; < 8 goto throw;
- @jump
- %setVar i %add $i 1;;
- %if $i < %getListSize online; goto checklabel;
- %goto wait;
- @throw
- %setVar throw %getListElementAt online $i;;
- %setVar safex %coords %getPlayerLoc $safe; x;;
- %setVar safey %coords %getPlayerLoc $safe; z;;
- %setVar throwx %coords %getPlayerLoc $safe; x;;
- %setVar throwy %coords %getPlayerLoc $safe; z;;
- %msg marvinius $safex;
- %msg marvinius $safey;
- %msg marvinius $throwx;
- %msg marvinius $throwy;
- %if $safex <= $throwx && $safey <= $throwy goto throw1;
- %if $safex >= $throwx && $safey >= $throwy goto throw2;
- %if $safex <= $throwx && $safey >= $throwy goto throw3;
- %if $safex >= $throwx && $safey <= $throwy goto throw4;
- %goto wait;
- @throw1
- %msg all throw1;
- %throwEntity %getPlayerID $throw; 2 0 2;
- %goto wait;
- @throw2
- %msg all throw2;
- %throwEntity %getPlayerID $throw; -2 0 -2;
- %goto wait;
- @throw3
- %msg all throw3;
- %throwEntity %getPlayerID $throw; 2 0 -2;
- %goto wait;
- @throw4
- %msg all throw4;
- %throwEntity %getPlayerID $throw; -2 0 2;
- %goto wait;
- @wait
- %msg all wait;
- %sgoto 15 checker;
- %wait;
- %if $event == player-leave && $player-name == $safe goto term;
- %goto wait;
- @term
- %msg marvinius term;
- %term;
|