[mirrors/Programs.git] / turbobasic / 1998 / ROZVRH-H.BAS

SCREEN 8\r
COLOR 14,1\r
LOCATE 2,2\r
PRINT " PO- ČJ* M* PR 2.* ČT/PS "\r
LOCATE 3,2\r
PRINT " ÚT- M* ČJ* PR 1.* ČJ:SL* PLAVÁNÍ* PLAVÁNÍ:NÁVRAT "\r
LOCATE 4,2\r
PRINT " ST- ČJ* M* Tv* ČT* Hv "\r
LOCATE 5,2\r
PRINT " ČT- M* ČJ* PR 2.* PČ* ČT/PS "\r
LOCATE 6,2\r
PRINT " PÁ- ČJ* M* Vv* ČT "\r
SOUND 100+12,70\r
END\1a
Commit	Line	Data
	1	SCREEN 8\r
	2	COLOR 14,1\r
	3	LOCATE 2,2\r
	4	PRINT " PO- ČJ* M* PR 2.* ČT/PS "\r
	5	LOCATE 3,2\r
	6	PRINT " ÚT- M* ČJ* PR 1.* ČJ:SL* PLAVÁNÍ* PLAVÁNÍ:NÁVRAT "\r
	7	LOCATE 4,2\r
	8	PRINT " ST- ČJ* M* Tv* ČT* Hv "\r
	9	LOCATE 5,2\r
	10	PRINT " ČT- M* ČJ* PR 2.* PČ* ČT/PS "\r
	11	LOCATE 6,2\r
	12	PRINT " PÁ- ČJ* M* Vv* ČT "\r
	13	SOUND 100+12,70\r
	14	END\1a