@prog conboot.muf
1 999 d
1 i
: say me @ swap notify ;
: main
	me @ wizard? not if
		pop "Permission denied." say exit
	then
	dup atoi dup intostr rot strcmp if
		pop "Not a valid number." say exit
	then
	conboot
;
.
c
q