1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253 |
- %setVar edge1 games:-934:105:4070;
- %setVar edge2 games:-928:105:4064;
- %setVar art STONE;
- %setVar world %coords $edge1 w;;
- %setVar x1 %coords $edge1 x;;
- %setVar y1 %coords $edge1 y;;
- %setVar z1 %coords $edge1 z;;
- %setVar x2 %coords $edge2 x;;
- %setVar y2 %coords $edge2 y;;
- %setVar z2 %coords $edge2 z;;
- %if $x1 < $x2 goto override1;
- %setVar helper $x2;
- %setVar x2 $x1;
- %setVar x1 $helper;
- @override1
- %if $y1 < $y2 goto override2;
- %setVar helper $y2;
- %setVar y2 $y1;
- %setVar y1 $helper;
- @override2
- %if $z1 < $z2 goto override3;
- %setVar helper $z2;
- %setVar z2 $z1;
- %setVar z1 $helper;
- @override3
- %setVar helper null;
- %setVar x $x1;
- @start_x
- %setVar y $y1;
- @start_y
- %setVar z $z1;
- @start_z
- %setVar loc %concat $world : $x : $y : $z;;
- %setBlock $loc $art;
- @override4
- %setVar z %add $z 1;;
- %if $z <= $z2 goto start_z;
- %setVar y %add $y 1;;
- %if $y <= $y2 goto start_y;
- %setVar x %add $x 1;;
- %if $x <= $x2 goto start_x;
|