#define nb_program_offset(TP) ((unsigned short)((unsigned char *)(TP) - nb_memory.bytes))
nb_program_offset returns a 16-bit offset from the start of the CoreBASIC program to the token pointer TP
nb_program_address.