InputRoutine:
	call	_ClrScrn
	call	_HomeUp
	xor	a, a
	ld	(ioPrompt), a
	ld	(curUnder), a
	call	_GetStringInput
	ld	hl, (editSym)
	call	_VarNameToOP1HL
	call	_ChkFindSym
	ld	a, (de)
	inc	de
	inc	de
	ld	b, a
	sbc	hl, hl
_:	push	bc
		add	hl, hl
		push	hl
		pop	bc
		add	hl, hl
		add	hl, hl
		add	hl, bc
		ld	a, (de)
		sub	a, t0
		ld	bc, 0
		ld	c, a
		add	hl, bc
		inc	de
	pop	bc
	djnz	-_
InputOffset = $+2
	ld	(ix+0), hl
	jp	_DeleteTempEditEqu
InputRoutineEnd: