th04/main: Initial state

To anyone else encountering TASM's "Near jump or call to different CS" issue:
Just split off the offending segment into a different source file and include
it from the main one.