| Blockland Forums > Modification Help |
| 1024 byte scripting contest |
| << < (17/24) > >> |
| DrenDran:
Who`s space talking to? |
| Space Guy:
Uh, Truce at replacing the example in the first post. |
| Kalphiter:
--- Quote from: DrenDran on January 20, 2011, 01:28:32 PM ---Who`s space talking to? --- End quote --- Hey, the quote key is beside the enter key. |
| DrenDran:
I got it down to 1.77kb so far from 5.8kb. --- Quote ---$e="$cb=1;$mpb=60;package ob{Âøplantbrick(){}};Âøbuild(%c){Ê%cÁ)$cb=!$cb;Ê$cb)deË(ob);äË(ob);}Âeb(){Å%a=0;%a<$noe;%a++){%ve=$ea[%a];initContainerBoxSearch(%ve.position,\"5 5 5\",$TypeMasks::FxBrickAlwaysïType);while(%so=containerSearchNext()){Ê!(%so.inv||%so.ie))%so.killbrick();}}schedule(250,0,eb);}eb();Âøclo(%cl){Å%a=0;%a<$noe;%a++){%ve=$ea[%a];%ld=50000;%ps=-1;Å%b=0;%b<clientgroup.getcount();%b++){%p=clientgroup.getï(%b).player;Êisï(%p)){%pos=%p.getö();Êabs(getword(%pos,0)-getword(%ve.getö(),0))+abs(getword(%pos,1)-getword(%ve.getö(),1))<%ld){%dist=%ld;%ps=%p;}}}Êisï(%ps)){%dxÈ(%pos,0)-getword(%ve.getö(),0);%dyÈ(%pos,1)-getword(%ve.getö(),1);Ê%dy==0)%dy=1;%sl=mabs(%dx)/mabs(%dy);%ooo=%ve.getö();Ê%dx>0)%nxÈ(%ooo,0)+(2*%sl);ä%nxÈ(%ooo,0)-(2*%sl);Ê%dy>0)%nyÈ(%ooo,1)+2;ä%nyÈ(%ooo,1)-2;%ve.setö(%nx SPC %ny SPC getword(%ooo,2));}}}Âøce(%cl){Ê!%clÁ)return;Å%a=0;%a<$noe;%a++)$ea[%a].delete();$noe=0;}Âøse(%cl){Ê%clÁ){Å%a=0;%a<$nw;%a++){%br=$ep[%a];Êisï(%br)){$ea[$noe]=new WheeledVehicle(){À=BallVehicle;};MissionCleanup.add($ea[$noe]);$ea[$noe].setö(%br.position);$ea[$noe].ik=1;$noe++;}}}}package bts{ÂWheeledVehicleData::onCollision(%ve,%obj,%col){Êisï(%col))Ê%col.getclassname()$=\"Player\")%col.kill();}ÂfxDTSBrick::onPlant(%br){%cl=%br.getGroup().client;Parent::onPlant(%br);Ê%br==$LastLoadedBrick)return;Ê%cl.se){$ep[$nw]=%br;$nw++;%br.ie=1;}äÊ%cl.si)%br.inv=1;äÊ%br.À.brickSizeZ*0.3*%br.À.brickSizeY*%br.À.brickSizeX>$mpb)%br.killbrick();}};Ë(bts);Âøeater(%cl){Ê%clÁ)%cl.se=!%cl.se;}Âøinv(%cl){Ê%clÁ)%cl.si=!%cl.si;}";function r(%s,%e){$e=strreplace($e,%s,%e);}r("Ê","if(");r("Á",".isSuperAdmin");r("Å","for(");r("Â","function ");r("ø","servercmd");r("È","=getword");r("À","dataBlock");r("Ë","activatepackage");r("ä","else ");r("ö","transform");r("ï","object");eval($e); --- End quote --- (quote blocks so it will linebreak it) I need to shave off ~600 more bytes, it would seem. :cookieMonster: |
| mctwist:
--- Quote from: DrenDran on January 20, 2011, 05:17:35 PM ---I got it down to 1.77kb so far from 5.8kb.(quote blocks so it will linebreak it) I need to shave off ~600 more bytes, it would seem. :cookieMonster: --- End quote --- There's still some things that can be replaced and compressed, like those local variables that is bigger than one character or the getWords you haven't replaced(More than 5 of them.). |
| Navigation |
| Message Index |
| Next page |
| Previous page |