Colour bars/Display: Difference between revisions
Content added Content deleted
Line 4: | Line 4: | ||
=={{header|Icon}} and {{header|Unicon}}== |
=={{header|Icon}} and {{header|Unicon}}== |
||
The procedure below is generalized to take a description of a ''test card'' and display it. |
The procedure below is generalized to take a description of a ''test card'' and display it. |
||
[[File:Colourbars_Simple_Unicon.png|thumb|right]] |
|||
<lang Icon>link graphics,printf |
<lang Icon>link graphics,printf |
||
Line 43: | Line 43: | ||
end</lang> |
end</lang> |
||
The following example is a wee tiny bit more interesting. |
The following example is a wee tiny bit more interesting. |
||
[[File:Colourbars_SMPTE_Unicon.png|thumb|right]] |
|||
<lang Icon>procedure SMPTE_TestCard() #: return structure with 480i(ish) testcard |
<lang Icon>procedure SMPTE_TestCard() #: return structure with 480i(ish) testcard |
||
return testcard(,"SMPTE TV Test Card",width := 672,height := 504, |
return testcard(,"SMPTE TV Test Card",width := 672,height := 504, |
||
Line 76: | Line 77: | ||
{{libheader|Icon Programming Library}} |
{{libheader|Icon Programming Library}} |
||
[http://www.cs.arizona.edu/icon/library/src/procs/graphics.icn graphics.icn provides graphics] |
[http://www.cs.arizona.edu/icon/library/src/procs/graphics.icn graphics.icn provides graphics] |
||
[http://www.cs.arizona.edu/icon/library/src/procs/printf.icn printf.icn provides sprintf] |
[http://www.cs.arizona.edu/icon/library/src/procs/printf.icn printf.icn provides sprintf] |
||
=={{header|J}}== |
=={{header|J}}== |