RBSE.BAS

'2019-03-23 EkriirkE
'Figuring out coordinates for a simple RBS logo

SCREEN 1: LINE (0, 0)-(240, 64), 1, B

LINE (32, 0)-(50, 0)	'Monitor
LINE -(50, 30)
LINE -(30, 29)

LINE (20, 10)-(20, 20)

LINE (35, 5)-(45, 5)
LINE -(45, 25)
LINE -(25, 24)

LINE (55, 25)-(55, 1)
LINE -(60, 5)
LINE -(57, 6)
LINE -(55, 25)

LINE (30, 10)-(28, 20)
LINE -(35, 10)
LINE -(34, 20)
LINE -(37, 16)
LINE -(37, 20)

LINE (10, 37)-(40, 40)	'Keyboard
LINE -(38, 48)
LINE (40, 40)-(48, 41)
LINE -(45, 50)
LINE (8, 39)-(47, 44)
LINE (6, 41)-(46, 47)

LINE (3, 46)-(48, 55)
LINE -(55, 43)
LINE -(55, 48)
LINE -(63, 43)
LINE -(48, 58)
LINE -(3, 46)

LOCATE 5, 10: PRINT "BattleStations"

LINE (77, 10)-(85, 10)	'R
LINE -(90, 12)
LINE -(90, 18)
LINE -(85, 20)
LINE -(90, 25)
LINE -(86, 25)
LINE -(82, 20)
LINE -(78, 20)
LINE -(78, 25)
LINE -(75, 25)
LINE -(75, 17)
LINE -(85, 17)
LINE -(85, 13)
LINE -(75, 13)
LINE -(77, 10)

LINE (95, 10)-(110, 10)	'E
LINE -(107, 13)
LINE -(100, 13)
LINE -(100, 17)
LINE -(110, 17)
LINE -(107, 19)
LINE -(100, 19)
LINE -(100, 22)
LINE -(110, 22)
LINE -(107, 25)
LINE -(95, 25)
LINE -(95, 10)

LINE (116, 10)-(130, 10)	'T
LINE -(128, 13)
LINE -(123, 13)
LINE -(123, 25)
LINE -(120, 25)
LINE -(120, 13)
LINE -(113, 13)
LINE -(116, 10)

LINE (136, 10)-(144, 10)	'R
LINE -(149, 12)
LINE -(149, 18)
LINE -(144, 20)
LINE -(149, 25)
LINE -(145, 25)
LINE -(141, 20)
LINE -(137, 20)
LINE -(137, 25)
LINE -(134, 25)
LINE -(134, 17)
LINE -(144, 17)
LINE -(144, 13)
LINE -(134, 13)
LINE -(136, 10)

LINE (158, 10)-(168, 10)	'O
LINE -(172, 13)
LINE -(172, 22)
LINE -(168, 25)
LINE -(158, 25)
LINE -(154, 23)
LINE -(154, 13)
LINE -(158, 10)
LINE (160, 14)-(166, 14)
LINE -(169, 16)
LINE -(169, 19)
LINE -(166, 21)
LINE -(160, 21)
LINE -(157, 19)
LINE -(157, 16)
LINE -(160, 14)