# [R], <strike>139</strike> 122 bytes

-17 bytes thanks to Giuseppe

 u=utf8ToInt;`*`=rep;o=c(' '*12,'
 ')*7;o[u("	&3@LKWVUTSRDC5(")]=LETTERS[(13:38+u(scan(,'')))%%26+1];cat(o,sep='')

Explanation:

 o=rep(c(rep(' ',12),'
 '),7) 

Builds an empty box of spaces

 u("	&3@LKWVUTSRDC5(")
is a set of indices for letter positions corresponding to:

 c(7:9,23,24,38,51,64,76,75,87:82,68,67,53,40,27,15,16,4:6)


[TIO]

[R]: https://www.r-project.org/
[TIO]: https://tio.run/##K/r/v9S2tCTNIiTfM6/EOkErwbYotcA63zZZQ11BXcvQSEedS11Ty9w6P7pUQ4mdg1NcQs3Ywcc7PCw0JDjIxdlUQ5pfgIWVTUkz1tbHNSTENSg4WsPQ2MrYQrtUozg5MU9DR11dU1NTVdXITNsw1jo5sUQjX6c4tcAWKPzf8T8A