Исходный файл(841 × 586 пкс, размер файла: 58 КБ, MIME-тип: image/gif, закольцованный, 128 фреймов, 11 с)

Краткое описание

Описание
English: An Amstrad CPC emulated in MAME running a short Locomotive BASIC demo program which displays color bars similar to SMPTE color bars or EBU colour bars.
Дата
Источник Собственная работа
Автор Morn

Locomotive BASIC program

10 mode 0
20 ink 1,26:ink 2,24:ink 3,20:ink 4,18
30 ink 5,8:ink 6,6:ink 7,2:ink 8,0
40 for i=1 to 8
50 paper i
60 print space$(40);
70 next

Program notes

  • Key words are printed in uppercase when the program is output with "list". But entering code is usually done in lowercase.
  • line 10: screen mode 0 is used (16 colours; 20x25 characters)
  • lines 20/30: set up colour palette; note that multiple instructions can be combined on a line
  • lines 40 to 70: a "for" loop over i
  • line 50: set the paper (background) colour to i
  • line 60: print 40 spaces (= 2 lines); space$ is a built-in function that returns a string
  • When the program ends, the "Ready" prompt is white-on-black because the current foreground (pen) colour, which is 1, had been set to white ("ink 1,26"). The background colour is 8 after the loop and "ink 8,0" had set that to black previously. See File:Amstrad CPC ink numbers.png for a chart of Amstrad ink numbers.

Лицензирование

Я, владелец авторских прав на это произведение, добровольно публикую его на условиях следующей лицензии:
Creative Commons CC-Zero Этот файл доступен на условиях Creative Commons CC0 1.0 Универсальной передачи в общественное достояние (Universal Public Domain Dedication).
Лица, связанные с работой над этим произведением, решили передать данное произведение в общественное достояние, отказавшись от всех прав на произведение по всему миру в рамках закона об авторских правах (а также связанных и смежных прав), в той степени, которую допускает закон. Вы можете копировать, изменять, распространять, исполнять данное произведение в любых целях, в том числе в коммерческих, без получения на это разрешения автора.

Краткие подписи

Добавьте однострочное описание того, что собой представляет этот файл

Элементы, изображённые на этом файле

изображённый объект

Locomotive BASIC английский

image/gif

История файла

Нажмите на дату/время, чтобы посмотреть файл, который был загружен в тот момент.

Дата/времяМиниатюраРазмерыУчастникПримечание
текущий20:15, 24 декабря 2023Миниатюра для версии от 20:15, 24 декабря 2023841 × 586 (58 КБ)MornUploaded own work with UploadWizard

Нет страниц, использующих этот файл.

Глобальное использование файла

Данный файл используется в следующих вики: