# $Id$ #print("Loading bo105.nas"); print("\tShift-C ... open/close rear door"); rearpos = "/controls/doors/rear"; rearstep = "/controls/doors/rear-state"; setprop(rearstep, 0); reardoor = func { pos = getprop(rearpos); step = getprop(rearstep); if (pos == 0 or step < 0) { setprop(rearstep, 0.02); } elsif (pos == 1 or step > 0) { setprop(rearstep, -0.02); } settimer(MoveDoor, 0.05); } MoveDoor = func { pos = getprop(rearpos); step = getprop(rearstep); if (pos + step >= 0 and pos + step <= 1) { setprop(rearpos, pos + step); settimer(MoveDoor, 0.05); } else { if (step < 0) { setprop(rearpos, 0); } elsif (step > 0) { setprop(rearpos, 1); } setprop(rearstep, 0); } } #print("Finished loading bo105.nas");