跳至內容

File:Locomotive BASIC color bars.gif

頁面內容不支援其他語言。
這個文件來自維基共享資源
來自維基學院

原始檔案 ‎（841 × 586 像素，檔案大小：58 KB，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 此檔案在創用CC CC0 1.0 通用公有領域貢獻宣告之下分發。
在此宣告之下分發本作品者，已依據各國著作權法，在全世界放棄其對本作品所擁有的著作權及所有相關相似的法律權利，從而將本作品貢獻至公有領域。您可以複製、修改、分發和演示該作品，用於任何商業用途，所有這些都不需要請求授權。

說明

添加單行說明來描述出檔案所代表的內容

在此檔案描寫的項目

描繪內容

Locomotive BASIC 英文

檔案來源 Chinese (Taiwan) (已轉換拼寫)

上傳者的原創作品

檔案歷史

點選日期/時間以檢視該時間的檔案版本。

日期/時間縮⁠圖尺寸使用者備⁠註
目前2023年12月24日 (日) 20:15於 2023年12月24日 (日) 20:15 版本的縮圖841 × 586（58 KB）MornUploaded own work with UploadWizard

沒有使用此檔案的頁面。

全域檔案使用狀況

以下其他 wiki 使用了這個檔案：

取自「https://zh.wikiversity.org/wiki/File:Locomotive_BASIC_color_bars.gif」