In[]:=
transform[p_]:={p[[1]]+p[[2]]/2,Sqrt[3]/2p[[2]]};
siszero={5,4,6};sisone={10,10,10};(*YOUENTERTHISANDNOTHINGELSE!*)​​firstpoint=siszero/Max[Total[siszero],0.0001];secondpoint=sisone/Max[Total[sisone],0.0001];​​firstplot={firstpoint[[1]],firstpoint[[2]]};secondplot={secondpoint[[1]],secondpoint[[2]]};​​Show[Graphics[{Line[{{0,0},{1,0},{0,1},{0,0}}],Line[{{1/2,0},{0,1}}],Line[{{0,1/2},{1,0}}],Line[{{0,0},{1/2,1/2}}],​​{Thick,Red,Line[{firstplot,secondplot}]}​​}]]​​Show[Graphics[{Line[Map[transform,{{0,0},{1,0},{0,1},{0,0}}]],​​Line[Map[transform,{{1/2,0},{0,1}}]],​​Line[Map[transform,{{0,1/2},{1,0}}]],​​Line[Map[transform,{{0,0},{1/2,1/2}}]],{Thick,Red,Line[Map[transform,{firstplot,secondplot}]]}​​}]]
Out[]=
Out[]=