A first attempt at creating a gigantic nail.

Code logic

The code script 1 is triggered by an S1 switch in this first iteration. Note the sectors around the bottom? The idea is that as the nail descends, the 'wound' is opened up. This is simulated by the Floor_LowerInstant() calls at certain counter values.

Code in full

#library "myscripts.acs"
#include "zcommon.acs"
global int 1:x;

script 100 ENTER{
	x=1;
}

script 1 (void){
	log(s:"nail in...");	
	// tag, speed, height
	Floor_LowerByValue(3, 8, 128);
	Ceiling_LowerByValue(3,8,128);
	int counter = 0;
	while(counter < 200){
		counter = counter+1;
		if(counter == 35){
			Floor_LowerInstant(4,0,16);
		}
		if(counter == 70){
			Floor_LowerInstant(5,0,16);
		}
		if(counter == 105){
			Floor_LowerInstant(6,0,16);
		}
		Delay(1);
	}
}

script 2 (void){
	x++;
}

script 3 (void){
	log(i:x);
}