; Made by Silver for RoT
;
; this file was formely called xteleport, it's only part of scene 1390.

; 	SET acceptdp1, #<num.timeNow>

	SET acceptdp2, #<num.timeNow>
	SET acceptdp3, #<acceptdp2>
	SUB acceptdp3, #<acceptdp1>

	SET substring, "1"
	COMPARE #<substring>, "1"
	IF> @laggedout
	IF< @laggedout
	SET substring, "20"
	COMPARE #<substring>, "20"
	IF> @laggedout
	IF< @laggedout
	
	COMPARE #<acceptdp3>, "8"
	IF> @laggedout
#include lpscript4.txt
	GOTO @accepted

	N: Error, @accepted is missing!
	END

@laggedout
	EJECT T172
#include lpscript4.txt
	HOST_GIVE T650
	GOTO LINK 99,0,1

; vergeet alle eerste regel niet in 0000.
;
; SCENE 0000
; #include R1390.txt
; @accepted
; GOTO LINK

; What are you spying at? -.-