Question: re Tapscript usage for dividend distribution

Is the following possible?

Let A be a receiving address
Let inputs(A) be the sum of transaction inputs to A
Let X be a set of keys
Let count(X) be the number of keys in X
Let outputs(Xn) be the sum of transaction outputs using key Xn

Fail if outputs(Xn)>inputs(A)/count(X)

My goal is is to divide income to A equally between the keys in X.

IE: A could be a corporation's retained earnings treasury account, and X could be the set of shareholders. Each Xn in X can spend a portion of A's UTXO's, up to the limit of their share.