changed S80s for occasion type to grab from new inputs

__________    _____  ________      _____    _________ _________
\______   \  /  _  \ \______ \    /  _  \  /   _____//   _____/
 |    |  _/ /  /_\  \ |    |  \  /  /_\  \ \_____  \ \_____  \ 
 |    |   \/    |    \|    `   \/    |    \/        \/        \
 |______  /\____|__  /_______  /\____|__  /_______  /_______  /
        \/         \/        \/         \/        \/        \/