Die Division
Fan = 1875000 / Periode
hat in der ISR nichts verloren, dauert zu lange.

Deshalb im Hauptprogramm:

do
if fan_aktive=1 then
reset fan_aktive
disable interrupts
Fan = 1875000 / Periode 'Atomarer Zugriff auf Periode
enable interrupts
endif
print fan
loop

Übrigens, wenn Du den Overflow-Interrupt nicht benötigts lösche bitte die Zeile

enable Timer1