Source

(*Camera Screen*)
Stlx→(Cx(Bx-Rx)Tx+(Bx(Cy-Ry)+(By-Cy)Rx)Ty+((Bz-Cz)Rx+Bx(Cz-Rz))Tz)/((Bx-Rx)Tx+(By-Ry)Ty+(Bz-Rz)Tz),
Stly→((By(Cx-Rx)-(-Bx+Cx)Ry)Tx+Cy(By-Ry)Ty+((Bz-Cz)Ry+By(Cz-Rz))Tz)/((Bx-Rx)Tx+(By-Ry)Ty+(Bz-Rz)Tz),
Stlz→((Bz(Cx-Rx)-(-Bx+Cx)Rz)Tx+(Bz(Cy-Ry)-(-By+Cy)Rz)Ty+Cz(Bz-Rz)Tz)/((Bx-Rx)Tx+(By-Ry)Ty+(Bz-Rz)Tz),
Stx→(Rx(Cx Tx+Cy Ty+(-Bz+Cz)Tz))/(Rx Tx+Ry Ty+(-Bz+Rz)Tz),
Sty→(Ry(Cx Tx+Cy Ty+(-Bz+Cz)Tz))/(Rx Tx+Ry Ty+(-Bz+Rz)Tz),
Stz→(Rz(Cx Tx+Cy Ty+Cz Tz)-Bz(Cx Tx-Rx Tx+Cy Ty-Ry Ty+Cz Tz))/(Rx Tx+Ry Ty+(-Bz+Rz)Tz),
Strx→(Cx(-Bx-Rx)Tx+(-Bx(Cy-Ry)+(By-Cy)Rx)Ty+((Bz-Cz)Rx+-Bx(Cz-Rz))Tz)/((-Bx-Rx)Tx+(By-Ry)Ty+(Bz-Rz)Tz),
Stry→((By(Cx-Rx)-(Bx+Cx)Ry)Tx+Cy(By-Ry)Ty+((Bz-Cz)Ry+By(Cz-Rz))Tz)/((-Bx-Rx)Tx+(By-Ry)Ty+(Bz-Rz)Tz),
Strz→((Bz(Cx-Rx)-(Bx+Cx)Rz)Tx+(Bz(Cy-Ry)-(-By+Cy)Rz)Ty+Cz(Bz-Rz)Tz)/((-Bx-Rx)Tx+(By-Ry)Ty+(Bz-Rz)Tz),
Sblx→Bx-((Bx-Rx)((Bx-Cx)Tx+(By-Cy)Ty-Cz Tz))/((Bx-Rx)Tx+(By-Ry)Ty-Rz Tz),
Sbly→By-((By-Ry)((Bx-Cx)Tx+(By-Cy)Ty-Cz Tz))/((Bx-Rx)Tx+(By-Ry)Ty-Rz Tz),
Sblz→(Rz((Bx-Cx)Tx+(By-Cy)Ty-Cz Tz))/((Bx-Rx)Tx+(By-Ry)Ty-Rz Tz),
Sbx→(Rx(Cx Tx+Cy Ty+Cz Tz))/(Rx Tx+Ry Ty+Rz Tz),
Sby→(Ry(Cx Tx+Cy Ty+Cz Tz))/(Rx Tx+Ry Ty+Rz Tz),
Sbz→-(-Cx Rz Tx-Cy Rz Ty-Cz Rz Tz)/(Rx Tx+Ry Ty+Rz Tz),
Sbrx→-Bx-((-Bx-Rx)((-Bx-Cx)Tx+(By-Cy)Ty-Cz Tz))/((-Bx-Rx)Tx+(By-Ry)Ty-Rz Tz),
Sbry→By-((By-Ry)((-Bx-Cx)Tx+(By-Cy)Ty-Cz Tz))/((-Bx-Rx)Tx+(By-Ry)Ty-Rz Tz),
Sbrz→(Rz((-Bx-Cx)Tx+(By-Cy)Ty-Cz Tz))/((-Bx-Rx)Tx+(By-Ry)Ty-Rz Tz),