Something like this?
AA=0
AANG = ATN(AA/B)
TEXT2 0,0,aang+90
valore = B*TAN(aang)
LINE2 0,0,A,0
LINE2 A,0,A,B
LINE2 -valore,B,A,B
LINE2 0,0,-valore,B
unID = 1 + unID : HOTSPOT2 0,B,unID,AA, 129
unID = 1 + unID : HOTSPOT2 1,B,unID, AA,3
unID = 1 + unID : HOTSPOT2 -AA,B,unID,AA, 2
CU mirco