scene.org File Archive

File download

<root>­/­parties­/­2023­/­vccc23­/­christmas-diamonds/logiker_cpc_basic_vc3-2023.zip

File size:
9 100 bytes (8.89K)
File date:
2024-01-03 14:15:18
Download count:
all-time: 12

Preview

  • file_id.diz 311B
  • result.png 4.66K
  • source.png 5.56K
  • VCCC2023.BAS 212B
  • vccc2023.dsk 190.25K

file_id.diz

Christmesh CPC 84b

Author: Logiker
System: CPC
Language: Locomotive BASIC V1.0
Usage:
Use Caprice or another emulator and run it.
Code:
1for i=0 to 18:for x=3 to 21:?chr$(32-10*(abs(x mod 6-3)=abs(i mod 6-3)));:next:?:next
Simply calculates for each x/y position if a star has to be drawn or not.