new: simp 1 2 7 "blnk" 0 1 0
attr 16
imsk 1

* set to about every 30 minutes
* (20 ticks/sec * 60 secs * 30 mins)
tick 36000

scrp 1 2 7 9
	save
endm

* when the world has just loaded, reset
* the timer so we don't save straight away
scrp 1 2 7 128
	tick tick
endm

* raw key down
scrp 1 2 7 73
	inst
	doif _p1_ = 'R'
* control but not shift
		doif keyd 17 = 1 and keyd 16 = 0

			save
			tick tick
		endi
	endi
endm

rscr
enum 1 2 7
	kill targ
next
scrx 1 2 7 9
scrx 1 2 7 128