CPCWiki forum

General Category => Off topic => Topic started by: mr_lou on 19:17, 23 December 19

Title: Merry Christmas and a Happy New Year to all!
Post by: mr_lou on 19:17, 23 December 19
Well I waited and waited, but no one else created this year's Merry Christmas thread, so here I go again.  :)

I wish all of my fellow CPC geeks a Merry Christmas and a Happy New Year!

Christmas time has always been CPC time for me. And this year I'll meet up with my retro mates the 29th to show off some of all the awesome new CPC creations. I'm sure I'll make some jaws drop.  :D
It makes a lot of sense to me, to have a retroday between Christmas and New Year's Eve.  :)

Although my CPC enthusiasm has been missing a bit lately, I still have many ideas for CPC projects, which I hope to find the time and enthusiasm for in 2020.

Thanks for 2019!!!
See you in 2020!!!
Title: Re: Merry Christmas and a Happy New Year to all!
Post by: XeNoMoRPH on 21:37, 23 December 19
https://youtu.be/olYOMMTSAZQ
Title: Re: Merry Christmas and a Happy New Year to all!
Post by: robcfg on 23:31, 23 December 19
It's been definitely a good year, and with great company  :D


Feliz Navidad, Merry Christmas, God Jul and an even better year 2020!
Title: Re: Merry Christmas and a Happy New Year to all!
Post by: VincentGR on 23:40, 23 December 19
Excellent year indeed with great games!
Title: Re: Merry Christmas and a Happy New Year to all!
Post by: SkulleateR on 00:24, 24 December 19
2019 I got addicted to CPC again, so .... yes ... 2019 was (is) a great year  8)


Wish you all a Merry Christmas and a happy new year 2020

oh and BTW : Thx for this great forum and its stunning community :D :D :D
Title: Re: Merry Christmas and a Happy New Year to all!
Post by: AMSDOS on 09:56, 24 December 19

I made a little pic out of this programme:


Code: [Select]
10 REM  CHAPTER 7/1
20 REM  CHRISTMAS TREE
25 MODE 1:BORDER 6:INK 0,6:INK 1,9:INK 2,25:INK 3,3:PEN 1:DEFINT a-z
30 T=20
40 PRINT TAB(t);"*"
50 FOR j=1 TO 16
60 PRINT TAB(t-j);"*";TAB(t+j);"*"
70 NEXT j
80 FOR c=1 TO 2*j+1
90 PRINT TAB(t-(3*2)+c-12);"*";
100 NEXT c
110 PRINT
120 FOR j=1 TO 2
130 PRINT TAB(t-1);"*";TAB(t+1);"*"
140 NEXT j
150 FOR c=1 TO j
160 PRINT TAB(t-2+c);"*";
170 NEXT c
180 a$="MERRY CHRISTMAS!"
190 FOR p=1 TO 16
200 PEN INT(RND*3)+1
210 LOCATE 11+p,25:PRINT MID$(a$,p,1);
220 NEXT p
230 END