ORG		100
	Input		x
	Subt		One
	Skipcond	000
	Jump		War2
	Load		Chptr
	Add		Imie
	Store		Chptr
	Jump		Start
War2,	Skipcond	400
	Jump		War3
	Load 		Chptr
	Add 		Nazw
	Store		Chptr
	Jump		Start
War3,	Skipcond	800
	Halt
	Load		Chptr
	Add		Miasto
	Store		Chptr
Start,	LoadI		Chptr
	Skipcond	400
	Jump		Outp
	Halt
Outp,	Output
	Load		Chptr
	Add		One
	Store		Chptr
	Jump		Start
x,	Dec		0
one,	Dec		1
Chptr,	Hex		000
Imie,	Hex		123
Nazw,	Hex		133
Miasto,	Hex		148
One,	Dec		1
Strl,	Dec		068 /D
	Dec		097 /a
	Dec		119 /w
	Dec		105 /i
	Dec		100 /d
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
Str2,	Dec		083 /S
	Dec		122 /z
	Dec		116 /t
	Dec		097 /a
	Dec		100 /n
	Dec		100 /d
	Dec		097 /a
	Dec		114 /r
	Dec		115 /s
	Dec		107 /k
	Dec		105 /i
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
Str3,	Dec		067 /C
	Dec		104 /h
	Dec		108 /l
	Dec		101 /e
	Dec		098 /b
	Dec		111 /o
	Dec		119 /w
	Dec		111 /o
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000
	Dec		000