Script Function: Q5GF
From Ultima Online: The Second Age
function void Q5GF() { list portcullis; Q5JJ = 0x33, 0x46, 0x00; Q5JK = 0x33, 0x45, 0x00; getObjectsAt(portcullis, Q5JJ); for(int i = 0x00; i < numInList(portcullis); i++) { int Q61T = getObjType(portcullis[i]); if (Q61T == 0x06F6) { deleteObject(portcullis[i]); } } clearList(portcullis); getObjectsAt(portcullis, Q5JK); for(i = 0x00; i < numInList(portcullis); i++) { Q61T = getObjType(portcullis[i]); if (Q61T == 0x06F6) { deleteObject(portcullis[i]); } } callback(this, 0x012C, 0x1B); return (); }
function void Q5GF(obj gate, int it) { setType(gate, 0x01); doLocAnimation(getLocation(gate), 0x1FCB, 0x09, 0x20, 0x00, 0x00); callback(gate, 0x01, 0x63); callback(gate, 0x04, it); return (); }