ft2-clone

Fasttracker 2 clone
Log | Files | Refs | README | LICENSE

commit ca8520755ba0c6a84986b6731645571043ac280a
parent 1373144eebc8da64685af487de9aa1cff4e43776
Author: Olav Sørensen <olav.sorensen@live.no>
Date:   Tue, 31 Dec 2024 15:07:07 +0100

Small code cleanup

Diffstat:
Msrc/ft2_about.c | 330+++++++++++++++++++++++++++++--------------------------------------------------
Msrc/ft2_sample_ed.c | 10++++++----
2 files changed, 126 insertions(+), 214 deletions(-)

diff --git a/src/ft2_about.c b/src/ft2_about.c @@ -9,7 +9,8 @@ #include "ft2_pattern_ed.h" // exitPatternEditorExtended() #include "ft2_config.h" -#define NUM_STARS 1500 /* for new about screen only */ +#define OLD_NUM_STARS 1000 +#define NUM_STARS 1500 #define LOGO_ALPHA_PERCENTAGE 72 #define STARSHINE_ALPHA_PERCENTAGE 25 #define SINUS_PHASES 1024 @@ -45,105 +46,20 @@ typedef struct vector_t x, y, z; } matrix_t; -static const uint16_t sinusTables[256 * 5] = -{ - 0x0000,0x00C9,0x0192,0x025B,0x0324,0x03ED,0x04B6,0x057F,0x0648,0x0711,0x07D9,0x08A2,0x096A,0x0A33,0x0AFB,0x0BC3, - 0x0C8C,0x0D54,0x0E1C,0x0EE3,0x0FAB,0x1072,0x113A,0x1201,0x12C8,0x138F,0x1455,0x151C,0x15E2,0x16A8,0x176D,0x1833, - 0x18F8,0x19BD,0x1A82,0x1B47,0x1C0B,0x1CCF,0x1D93,0x1E56,0x1F19,0x1FDC,0x209F,0x2161,0x2223,0x22E5,0x23A6,0x2467, - 0x2527,0x25E8,0x26A8,0x2767,0x2826,0x28E5,0x29A3,0x2A61,0x2B1F,0x2BDC,0x2C98,0x2D55,0x2E10,0x2ECC,0x2F87,0x3041, - 0x30FB,0x31B5,0x326E,0x3326,0x33DE,0x3496,0x354D,0x3603,0x36B9,0x376F,0x3824,0x38D8,0x398C,0x3A3F,0x3AF2,0x3BA4, - 0x3C56,0x3D07,0x3DB7,0x3E67,0x3F16,0x3FC5,0x4073,0x4120,0x41CD,0x4279,0x4325,0x43D0,0x447A,0x4523,0x45CC,0x4674, - 0x471C,0x47C3,0x4869,0x490E,0x49B3,0x4A57,0x4AFA,0x4B9D,0x4C3F,0x4CE0,0x4D80,0x4E20,0x4EBF,0x4F5D,0x4FFA,0x5097, - 0x5133,0x51CE,0x5268,0x5301,0x539A,0x5432,0x54C9,0x555F,0x55F4,0x5689,0x571D,0x57AF,0x5841,0x58D3,0x5963,0x59F2, - 0x5A81,0x5B0F,0x5B9C,0x5C28,0x5CB3,0x5D3D,0x5DC6,0x5E4F,0x5ED6,0x5F5D,0x5FE2,0x6067,0x60EB,0x616E,0x61EF,0x6270, - 0x62F0,0x6370,0x63EE,0x646B,0x64E7,0x6562,0x65DC,0x6656,0x66CE,0x6745,0x67BB,0x6831,0x68A5,0x6918,0x698A,0x69FC, - 0x6A6C,0x6ADB,0x6B49,0x6BB6,0x6C22,0x6C8E,0x6CF8,0x6D60,0x6DC8,0x6E2F,0x6E95,0x6EFA,0x6F5D,0x6FC0,0x7021,0x7082, - 0x70E1,0x713F,0x719C,0x71F8,0x7253,0x72AD,0x7306,0x735E,0x73B4,0x740A,0x745E,0x74B1,0x7503,0x7554,0x75A4,0x75F2, - 0x7640,0x768C,0x76D7,0x7722,0x776A,0x77B2,0x77F9,0x783E,0x7883,0x78C6,0x7908,0x7949,0x7988,0x79C7,0x7A04,0x7A40, - 0x7A7B,0x7AB5,0x7AED,0x7B25,0x7B5B,0x7B90,0x7BC4,0x7BF7,0x7C28,0x7C58,0x7C87,0x7CB5,0x7CE2,0x7D0D,0x7D38,0x7D61, - 0x7D88,0x7DAF,0x7DD4,0x7DF9,0x7E1C,0x7E3D,0x7E5E,0x7E7D,0x7E9B,0x7EB8,0x7ED4,0x7EEE,0x7F08,0x7F20,0x7F36,0x7F4C, - 0x7F60,0x7F73,0x7F85,0x7F96,0x7FA5,0x7FB3,0x7FC0,0x7FCC,0x7FD7,0x7FE0,0x7FE8,0x7FEF,0x7FF4,0x7FF8,0x7FFC,0x7FFD, - 0x7FFE,0x7FFD,0x7FFC,0x7FF8,0x7FF4,0x7FEF,0x7FE8,0x7FE0,0x7FD7,0x7FCC,0x7FC0,0x7FB3,0x7FA5,0x7F96,0x7F85,0x7F73, - 0x7F60,0x7F4C,0x7F36,0x7F20,0x7F08,0x7EEE,0x7ED4,0x7EB8,0x7E9B,0x7E7D,0x7E5E,0x7E3D,0x7E1C,0x7DF9,0x7DD4,0x7DAF, - 0x7D88,0x7D61,0x7D38,0x7D0D,0x7CE2,0x7CB5,0x7C87,0x7C58,0x7C28,0x7BF7,0x7BC4,0x7B90,0x7B5B,0x7B25,0x7AED,0x7AB5, - 0x7A7B,0x7A40,0x7A04,0x79C7,0x7988,0x7949,0x7908,0x78C6,0x7883,0x783E,0x77F9,0x77B2,0x776A,0x7722,0x76D7,0x768C, - 0x7640,0x75F2,0x75A4,0x7554,0x7503,0x74B1,0x745E,0x740A,0x73B4,0x735E,0x7306,0x72AD,0x7253,0x71F8,0x719C,0x713F, - 0x70E1,0x7082,0x7021,0x6FC0,0x6F5D,0x6EFA,0x6E95,0x6E2F,0x6DC8,0x6D60,0x6CF8,0x6C8E,0x6C22,0x6BB6,0x6B49,0x6ADB, - 0x6A6C,0x69FC,0x698A,0x6918,0x68A5,0x6831,0x67BB,0x6745,0x66CE,0x6656,0x65DC,0x6562,0x64E7,0x646B,0x63EE,0x6370, - 0x62F0,0x6270,0x61EF,0x616E,0x60EB,0x6067,0x5FE2,0x5F5D,0x5ED6,0x5E4F,0x5DC6,0x5D3D,0x5CB3,0x5C28,0x5B9C,0x5B0F, - 0x5A81,0x59F2,0x5963,0x58D3,0x5841,0x57AF,0x571D,0x5689,0x55F4,0x555F,0x54C9,0x5432,0x539A,0x5301,0x5268,0x51CE, - 0x5133,0x5097,0x4FFA,0x4F5D,0x4EBF,0x4E20,0x4D80,0x4CE0,0x4C3F,0x4B9D,0x4AFA,0x4A57,0x49B3,0x490E,0x4869,0x47C3, - 0x471C,0x4674,0x45CC,0x4523,0x447A,0x43D0,0x4325,0x4279,0x41CD,0x4120,0x4073,0x3FC5,0x3F16,0x3E67,0x3DB7,0x3D07, - 0x3C56,0x3BA4,0x3AF2,0x3A3F,0x398C,0x38D8,0x3824,0x376F,0x36B9,0x3603,0x354D,0x3496,0x33DE,0x3326,0x326E,0x31B5, - 0x30FB,0x3041,0x2F87,0x2ECC,0x2E10,0x2D55,0x2C98,0x2BDC,0x2B1F,0x2A61,0x29A3,0x28E5,0x2826,0x2767,0x26A8,0x25E8, - 0x2527,0x2467,0x23A6,0x22E5,0x2223,0x2161,0x209F,0x1FDC,0x1F19,0x1E56,0x1D93,0x1CCF,0x1C0B,0x1B47,0x1A82,0x19BD, - 0x18F8,0x1833,0x176D,0x16A8,0x15E2,0x151C,0x1455,0x138F,0x12C8,0x1201,0x113A,0x1072,0x0FAB,0x0EE3,0x0E1C,0x0D54, - 0x0C8C,0x0BC3,0x0AFB,0x0A33,0x096A,0x08A2,0x07D9,0x0711,0x0648,0x057F,0x04B6,0x03ED,0x0324,0x025B,0x0192,0x00C9, - 0x0000,0xFF37,0xFE6E,0xFDA5,0xFCDC,0xFC13,0xFB4A,0xFA81,0xF9B8,0xF8EF,0xF827,0xF75E,0xF696,0xF5CD,0xF505,0xF43D, - 0xF374,0xF2AC,0xF1E4,0xF11D,0xF055,0xEF8E,0xEEC6,0xEDFF,0xED38,0xEC71,0xEBAB,0xEAE4,0xEA1E,0xE958,0xE893,0xE7CD, - 0xE708,0xE643,0xE57E,0xE4B9,0xE3F5,0xE331,0xE26D,0xE1AA,0xE0E7,0xE024,0xDF61,0xDE9F,0xDDDD,0xDD1B,0xDC5A,0xDB99, - 0xDAD9,0xDA18,0xD958,0xD899,0xD7DA,0xD71B,0xD65D,0xD59F,0xD4E1,0xD424,0xD368,0xD2AB,0xD1F0,0xD134,0xD079,0xCFBF, - 0xCF05,0xCE4B,0xCD92,0xCCDA,0xCC22,0xCB6A,0xCAB3,0xC9FD,0xC947,0xC891,0xC7DC,0xC728,0xC674,0xC5C1,0xC50E,0xC45C, - 0xC3AA,0xC2F9,0xC249,0xC199,0xC0EA,0xC03B,0xBF8D,0xBEE0,0xBE33,0xBD87,0xBCDB,0xBC30,0xBB86,0xBADD,0xBA34,0xB98C, - 0xB8E4,0xB83D,0xB797,0xB6F2,0xB64D,0xB5A9,0xB506,0xB463,0xB3C1,0xB320,0xB280,0xB1E0,0xB141,0xB0A3,0xB006,0xAF69, - 0xAECD,0xAE32,0xAD98,0xACFF,0xAC66,0xABCE,0xAB37,0xAAA1,0xAA0C,0xA977,0xA8E3,0xA851,0xA7BF,0xA72D,0xA69D,0xA60E, - 0xA57F,0xA4F1,0xA464,0xA3D8,0xA34D,0xA2C3,0xA23A,0xA1B1,0xA12A,0xA0A3,0xA01E,0x9F99,0x9F15,0x9E92,0x9E11,0x9D90, - 0x9D10,0x9C90,0x9C12,0x9B95,0x9B19,0x9A9E,0x9A24,0x99AA,0x9932,0x98BB,0x9845,0x97CF,0x975B,0x96E8,0x9676,0x9604, - 0x9594,0x9525,0x94B7,0x944A,0x93DE,0x9372,0x9308,0x92A0,0x9238,0x91D1,0x916B,0x9106,0x90A3,0x9040,0x8FDF,0x8F7E, - 0x8F1F,0x8EC1,0x8E64,0x8E08,0x8DAD,0x8D53,0x8CFA,0x8CA2,0x8C4C,0x8BF6,0x8BA2,0x8B4F,0x8AFD,0x8AAC,0x8A5C,0x8A0E, - 0x89C0,0x8974,0x8929,0x88DE,0x8896,0x884E,0x8807,0x87C2,0x877D,0x873A,0x86F8,0x86B7,0x8678,0x8639,0x85FC,0x85C0, - 0x8585,0x854B,0x8513,0x84DB,0x84A5,0x8470,0x843C,0x8409,0x83D8,0x83A8,0x8379,0x834B,0x831E,0x82F3,0x82C8,0x829F, - 0x8278,0x8251,0x822C,0x8207,0x81E4,0x81C3,0x81A2,0x8183,0x8165,0x8148,0x812C,0x8112,0x80F8,0x80E0,0x80CA,0x80B4, - 0x80A0,0x808D,0x807B,0x806A,0x805B,0x804D,0x8040,0x8034,0x8029,0x8020,0x8018,0x8011,0x800C,0x8008,0x8004,0x8003, - 0x8002,0x8003,0x8004,0x8008,0x800C,0x8011,0x8018,0x8020,0x8029,0x8034,0x8040,0x804D,0x805B,0x806A,0x807B,0x808D, - 0x80A0,0x80B4,0x80CA,0x80E0,0x80F8,0x8112,0x812C,0x8148,0x8165,0x8183,0x81A2,0x81C3,0x81E4,0x8207,0x822C,0x8251, - 0x8278,0x829F,0x82C8,0x82F3,0x831E,0x834B,0x8379,0x83A8,0x83D8,0x8409,0x843C,0x8470,0x84A5,0x84DB,0x8513,0x854B, - 0x8585,0x85C0,0x85FC,0x8639,0x8678,0x86B7,0x86F8,0x873A,0x877D,0x87C2,0x8807,0x884E,0x8896,0x88DE,0x8929,0x8974, - 0x89C0,0x8A0E,0x8A5C,0x8AAC,0x8AFD,0x8B4F,0x8BA2,0x8BF6,0x8C4C,0x8CA2,0x8CFA,0x8D53,0x8DAD,0x8E08,0x8E64,0x8EC1, - 0x8F1F,0x8F7E,0x8FDF,0x9040,0x90A3,0x9106,0x916B,0x91D1,0x9238,0x92A0,0x9308,0x9372,0x93DE,0x944A,0x94B7,0x9525, - 0x9594,0x9604,0x9676,0x96E8,0x975B,0x97CF,0x9845,0x98BB,0x9932,0x99AA,0x9A24,0x9A9E,0x9B19,0x9B95,0x9C12,0x9C90, - 0x9D10,0x9D90,0x9E11,0x9E92,0x9F15,0x9F99,0xA01E,0xA0A3,0xA12A,0xA1B1,0xA23A,0xA2C3,0xA34D,0xA3D8,0xA464,0xA4F1, - 0xA57F,0xA60E,0xA69D,0xA72D,0xA7BF,0xA851,0xA8E3,0xA977,0xAA0C,0xAAA1,0xAB37,0xABCE,0xAC66,0xACFF,0xAD98,0xAE32, - 0xAECD,0xAF69,0xB006,0xB0A3,0xB141,0xB1E0,0xB280,0xB320,0xB3C1,0xB463,0xB506,0xB5A9,0xB64D,0xB6F2,0xB797,0xB83D, - 0xB8E4,0xB98C,0xBA34,0xBADD,0xBB86,0xBC30,0xBCDB,0xBD87,0xBE33,0xBEE0,0xBF8D,0xC03B,0xC0EA,0xC199,0xC249,0xC2F9, - 0xC3AA,0xC45C,0xC50E,0xC5C1,0xC674,0xC728,0xC7DC,0xC891,0xC947,0xC9FD,0xCAB3,0xCB6A,0xCC22,0xCCDA,0xCD92,0xCE4B, - 0xCF05,0xCFBF,0xD079,0xD134,0xD1F0,0xD2AB,0xD368,0xD424,0xD4E1,0xD59F,0xD65D,0xD71B,0xD7DA,0xD899,0xD958,0xDA18, - 0xDAD9,0xDB99,0xDC5A,0xDD1B,0xDDDD,0xDE9F,0xDF61,0xE024,0xE0E7,0xE1AA,0xE26D,0xE331,0xE3F5,0xE4B9,0xE57E,0xE643, - 0xE708,0xE7CD,0xE893,0xE958,0xEA1E,0xEAE4,0xEBAB,0xEC71,0xED38,0xEDFF,0xEEC6,0xEF8E,0xF055,0xF11D,0xF1E4,0xF2AC, - 0xF374,0xF43D,0xF505,0xF5CD,0xF696,0xF75E,0xF827,0xF8EF,0xF9B8,0xFA81,0xFB4A,0xFC13,0xFCDC,0xFDA5,0xFE6E,0xFF37, - 0x0000,0x00C9,0x0192,0x025B,0x0324,0x03ED,0x04B6,0x057F,0x0648,0x0711,0x07D9,0x08A2,0x096A,0x0A33,0x0AFB,0x0BC3, - 0x0C8C,0x0D54,0x0E1C,0x0EE3,0x0FAB,0x1072,0x113A,0x1201,0x12C8,0x138F,0x1455,0x151C,0x15E2,0x16A8,0x176D,0x1833, - 0x18F8,0x19BD,0x1A82,0x1B47,0x1C0B,0x1CCF,0x1D93,0x1E56,0x1F19,0x1FDC,0x209F,0x2161,0x2223,0x22E5,0x23A6,0x2467, - 0x2527,0x25E8,0x26A8,0x2767,0x2826,0x28E5,0x29A3,0x2A61,0x2B1F,0x2BDC,0x2C98,0x2D55,0x2E10,0x2ECC,0x2F87,0x3041, - 0x30FB,0x31B5,0x326E,0x3326,0x33DE,0x3496,0x354D,0x3603,0x36B9,0x376F,0x3824,0x38D8,0x398C,0x3A3F,0x3AF2,0x3BA4, - 0x3C56,0x3D07,0x3DB7,0x3E67,0x3F16,0x3FC5,0x4073,0x4120,0x41CD,0x4279,0x4325,0x43D0,0x447A,0x4523,0x45CC,0x4674, - 0x471C,0x47C3,0x4869,0x490E,0x49B3,0x4A57,0x4AFA,0x4B9D,0x4C3F,0x4CE0,0x4D80,0x4E20,0x4EBF,0x4F5D,0x4FFA,0x5097, - 0x5133,0x51CE,0x5268,0x5301,0x539A,0x5432,0x54C9,0x555F,0x55F4,0x5689,0x571D,0x57AF,0x5841,0x58D3,0x5963,0x59F2, - 0x5A81,0x5B0F,0x5B9C,0x5C28,0x5CB3,0x5D3D,0x5DC6,0x5E4F,0x5ED6,0x5F5D,0x5FE2,0x6067,0x60EB,0x616E,0x61EF,0x6270, - 0x62F0,0x6370,0x63EE,0x646B,0x64E7,0x6562,0x65DC,0x6656,0x66CE,0x6745,0x67BB,0x6831,0x68A5,0x6918,0x698A,0x69FC, - 0x6A6C,0x6ADB,0x6B49,0x6BB6,0x6C22,0x6C8E,0x6CF8,0x6D60,0x6DC8,0x6E2F,0x6E95,0x6EFA,0x6F5D,0x6FC0,0x7021,0x7082, - 0x70E1,0x713F,0x719C,0x71F8,0x7253,0x72AD,0x7306,0x735E,0x73B4,0x740A,0x745E,0x74B1,0x7503,0x7554,0x75A4,0x75F2, - 0x7640,0x768C,0x76D7,0x7722,0x776A,0x77B2,0x77F9,0x783E,0x7883,0x78C6,0x7908,0x7949,0x7988,0x79C7,0x7A04,0x7A40, - 0x7A7B,0x7AB5,0x7AED,0x7B25,0x7B5B,0x7B90,0x7BC4,0x7BF7,0x7C28,0x7C58,0x7C87,0x7CB5,0x7CE2,0x7D0D,0x7D38,0x7D61, - 0x7D88,0x7DAF,0x7DD4,0x7DF9,0x7E1C,0x7E3D,0x7E5E,0x7E7D,0x7E9B,0x7EB8,0x7ED4,0x7EEE,0x7F08,0x7F20,0x7F36,0x7F4C, - 0x7F60,0x7F73,0x7F85,0x7F96,0x7FA5,0x7FB3,0x7FC0,0x7FCC,0x7FD7,0x7FE0,0x7FE8,0x7FEF,0x7FF4,0x7FF8,0x7FFC,0x7FFD -}; - static const uint8_t starColConv[24] = { 2,2,2,2,2,2,2,2, 2,2,2,1,1,1,3,3, 3,3,3,3,3,3,3,3 }; -static const int16_t *sin32767 = (const int16_t *)sinusTables, *cos32767 = (const int16_t *)&sinusTables[256]; static char *customText0 = "Original FT2 by Magnus \"Vogue\" H\224gdahl & Fredrik \"Mr.H\" Huss"; static char *customText1 = "Clone by Olav \"8bitbubsy\" S\233rensen"; static char *customText2 = "https://16-bits.org"; static char customText3[256]; static int16_t customText0X, customText0Y, customText1Y, customText2Y; static int16_t customText3Y, customText1X, customText2X, customText3X; -static int16_t sin16[SINUS_PHASES], hastighet; -static int32_t lastStarScreenPos[1000]; +static int16_t sin16[SINUS_PHASES], zSpeed; +static int32_t lastStarScreenPos[OLD_NUM_STARS]; static uint16_t logoAlpha16, starShineAlpha16; static uint32_t randSeed, sinp1, sinp2; -static oldVector_t starcrd[1000]; -static oldRotate_t star_a; -static oldMatrix_t starmat; +static oldVector_t oldStarPoints[OLD_NUM_STARS]; +static oldRotate_t oldStarRotation; +static oldMatrix_t oldStarMatrix; static vector_t starPoints[NUM_STARS], starRotation; static matrix_t starMatrix; @@ -159,7 +75,7 @@ static inline int32_t random32(void) return randSeed; } -static inline int32_t pascalRandom32(int32_t l) // Turbo Pascal Random() implementation +static inline int32_t pascalRandom(int32_t l) // Turbo Pascal Random() implementation { int32_t r; @@ -198,123 +114,113 @@ static void blendPixelsXY(uint32_t x, uint32_t y, uint32_t pixelB_r, uint32_t pi *p = RGB32(r, g, b); } -static void fixaMatris(oldRotate_t a, oldMatrix_t *mat) +static void oldRotateStarfieldMatrix(void) { - const int16_t sa = sin32767[a.x >> 6]; - const int16_t ca = cos32767[a.x >> 6]; - const int16_t sb = sin32767[a.y >> 6]; - const int16_t cb = cos32767[a.y >> 6]; - const int16_t sc = sin32767[a.z >> 6]; - const int16_t cc = cos32767[a.z >> 6]; - - mat->x.x = ((ca * cc) >> 16) + (((sc * ((sa * sb) >> 16)) >> 16) << 1); - mat->y.x = (sa * cb) >> 16; - mat->z.x = (((cc * ((sa * sb) >> 16)) >> 16) << 1) - ((ca * sc) >> 16); - - mat->x.y = (((sc * ((ca * sb) >> 16)) >> 16) << 1) - ((sa * cc) >> 16); - mat->y.y = (ca * cb) >> 16; - mat->z.y = ((sa * sc) >> 16) + (((cc * ((ca * sb) >> 16)) >> 16) << 1); - - mat->x.z = (cb * sc) >> 16; - mat->y.z = 0 - (sb >> 1); - mat->z.z = (cb * cc) >> 16; + // original code used a cos/sin table, but this only runs once per frame, no need... + const int16_t sa = (int16_t)round(32767.0 * sin(oldStarRotation.x * (2.0 * M_PI / 65536.0))); + const int16_t ca = (int16_t)round(32767.0 * cos(oldStarRotation.x * (2.0 * M_PI / 65536.0))); + const int16_t sb = (int16_t)round(32767.0 * sin(oldStarRotation.y * (2.0 * M_PI / 65536.0))); + const int16_t cb = (int16_t)round(32767.0 * cos(oldStarRotation.y * (2.0 * M_PI / 65536.0))); + const int16_t sc = (int16_t)round(32767.0 * sin(oldStarRotation.z * (2.0 * M_PI / 65536.0))); + const int16_t cc = (int16_t)round(32767.0 * cos(oldStarRotation.z * (2.0 * M_PI / 65536.0))); + + oldStarMatrix.x.x = ((ca * cc) >> 16) + (((sc * ((sa * sb) >> 16)) >> 16) << 1); + oldStarMatrix.y.x = (sa * cb) >> 16; + oldStarMatrix.z.x = (((cc * ((sa * sb) >> 16)) >> 16) << 1) - ((ca * sc) >> 16); + + oldStarMatrix.x.y = (((sc * ((ca * sb) >> 16)) >> 16) << 1) - ((sa * cc) >> 16); + oldStarMatrix.y.y = (ca * cb) >> 16; + oldStarMatrix.z.y = ((sa * sc) >> 16) + (((cc * ((ca * sb) >> 16)) >> 16) << 1); + + oldStarMatrix.x.z = (cb * sc) >> 16; + oldStarMatrix.y.z = 0 - (sb >> 1); + oldStarMatrix.z.z = (cb * cc) >> 16; } -static void newStarfield(void) +static void starfield(void) { - if (config.useNewAboutScreen) + vector_t *star = starPoints; + for (int16_t i = 0; i < NUM_STARS; i++, star++) { - vector_t *star = starPoints; - for (int16_t i = 0; i < NUM_STARS; i++, star++) - { - star->z += 0.0001f; - if (star->z >= 0.5f) - star->z -= 1.0f; + star->z += 0.0001f; + if (star->z >= 0.5f) + star->z -= 1.0f; - const float z = (starMatrix.x.z * star->x) + (starMatrix.y.z * star->y) + (starMatrix.z.z * star->z) + 0.5f; - if (z <= 0.0f) - continue; + const float z = (starMatrix.x.z * star->x) + (starMatrix.y.z * star->y) + (starMatrix.z.z * star->z) + 0.5f; + if (z <= 0.0f) + continue; - float y = (((starMatrix.x.y * star->x) + (starMatrix.y.y * star->y) + (starMatrix.z.y * star->z)) / z) * 400.0f; - const int32_t outY = (ABOUT_SCREEN_Y+(ABOUT_SCREEN_H/2)) + (int32_t)y; - if (outY < ABOUT_SCREEN_Y || outY >= ABOUT_SCREEN_Y+ABOUT_SCREEN_H) - continue; + float y = (((starMatrix.x.y * star->x) + (starMatrix.y.y * star->y) + (starMatrix.z.y * star->z)) / z) * 400.0f; + const int32_t outY = (ABOUT_SCREEN_Y+(ABOUT_SCREEN_H/2)) + (int32_t)y; + if (outY < ABOUT_SCREEN_Y || outY >= ABOUT_SCREEN_Y+ABOUT_SCREEN_H) + continue; - float x = (((starMatrix.x.x * star->x) + (starMatrix.y.x * star->y) + (starMatrix.z.x * star->z)) / z) * 400.0f; - const int32_t outX = (ABOUT_SCREEN_X+(ABOUT_SCREEN_W/2)) + (int32_t)x; - if (outX < ABOUT_SCREEN_X || outX >= ABOUT_SCREEN_X+ABOUT_SCREEN_W) - continue; + float x = (((starMatrix.x.x * star->x) + (starMatrix.y.x * star->y) + (starMatrix.z.x * star->z)) / z) * 400.0f; + const int32_t outX = (ABOUT_SCREEN_X+(ABOUT_SCREEN_W/2)) + (int32_t)x; + if (outX < ABOUT_SCREEN_X || outX >= ABOUT_SCREEN_X+ABOUT_SCREEN_W) + continue; - int32_t intensity255 = (int32_t)(z * 256.0f); - if (intensity255 > 255) - intensity255 = 255; - intensity255 ^= 255; + int32_t intensity255 = (int32_t)(z * 256.0f); + if (intensity255 > 255) + intensity255 = 255; + intensity255 ^= 255; - // add a tint of blue to the star pixel + // add a tint of blue to the star pixel - int32_t r = intensity255 - 79; - if (r < 0) - r = 0; + int32_t r = intensity255 - 79; + if (r < 0) + r = 0; - int32_t g = intensity255 - 38; - if (g < 0) - g = 0; + int32_t g = intensity255 - 38; + if (g < 0) + g = 0; - int32_t b = intensity255 + 64; - if (b > 255) - b = 255; + int32_t b = intensity255 + 64; + if (b > 255) + b = 255; - // plot and blend sides of star (basic shine effect) + // plot and blend sides of star (basic shine effect) - if (outX-1 >= ABOUT_SCREEN_X) - blendPixelsXY(outX-1, outY, r, g, b, starShineAlpha16); + if (outX-1 >= ABOUT_SCREEN_X) + blendPixelsXY(outX-1, outY, r, g, b, starShineAlpha16); - if (outX+1 < ABOUT_SCREEN_X+ABOUT_SCREEN_W) - blendPixelsXY(outX+1, outY, r, g, b, starShineAlpha16); + if (outX+1 < ABOUT_SCREEN_X+ABOUT_SCREEN_W) + blendPixelsXY(outX+1, outY, r, g, b, starShineAlpha16); - if (outY-1 >= ABOUT_SCREEN_Y) - blendPixelsXY(outX, outY-1, r, g, b, starShineAlpha16); + if (outY-1 >= ABOUT_SCREEN_Y) + blendPixelsXY(outX, outY-1, r, g, b, starShineAlpha16); - if (outY+1 < ABOUT_SCREEN_Y+ABOUT_SCREEN_H) - blendPixelsXY(outX, outY+1, r, g, b, starShineAlpha16); + if (outY+1 < ABOUT_SCREEN_Y+ABOUT_SCREEN_H) + blendPixelsXY(outX, outY+1, r, g, b, starShineAlpha16); - // plot center pixel - video.frameBuffer[(outY * SCREEN_W) + outX] = RGB32(r, g, b); - } + // plot center pixel + video.frameBuffer[(outY * SCREEN_W) + outX] = RGB32(r, g, b); } } -static void realStars(void) +static void oldStarfield(void) { - uint8_t col; - int16_t z, xx, xy, xz, yx, yy, yz, zx, zy, zz; - int32_t x, y, screenBufferPos; - - xx = starmat.x.x; xy = starmat.x.y; xz = starmat.x.z; - yx = starmat.y.x; yy = starmat.y.y; yz = starmat.y.z; - zx = starmat.z.x; zy = starmat.z.y; zz = starmat.z.z; - - oldVector_t *star = starcrd; - for (int32_t i = 0; i < 1000; i++, star++) + oldVector_t *star = oldStarPoints; + for (int32_t i = 0; i < OLD_NUM_STARS; i++, star++) { // erase last star pixel - screenBufferPos = lastStarScreenPos[i]; + int32_t screenBufferPos = lastStarScreenPos[i]; if (screenBufferPos >= 0) { video.frameBuffer[screenBufferPos] = video.palette[PAL_BCKGRND]; lastStarScreenPos[i] = -1; } - star->z += hastighet; // this intentionally overflows int16_t + star->z += zSpeed; // this intentionally overflows int16_t - z = (((xz * star->x) >> 16) + ((yz * star->y) >> 16) + ((zz * star->z) >> 16)) + 9000; + int16_t z = (((oldStarMatrix.x.z * star->x) >> 16) + ((oldStarMatrix.y.z * star->y) >> 16) + ((oldStarMatrix.z.z * star->z) >> 16)) + 9000; if (z <= 100) continue; - y = ((xy * star->x) >> 16) + ((yy * star->y) >> 16) + ((zy * star->z) >> 16); + int32_t y = ((oldStarMatrix.x.y * star->x) >> 16) + ((oldStarMatrix.y.y * star->y) >> 16) + ((oldStarMatrix.z.y * star->z) >> 16); y = (int16_t)((y << 7) / z) + 84; if ((uint16_t)y > 173-6) continue; - x = ((xx * star->x) >> 16) + ((yx * star->y) >> 16) + ((zx * star->z) >> 16); + int32_t x = ((oldStarMatrix.x.x * star->x) >> 16) + ((oldStarMatrix.y.x * star->y) >> 16) + ((oldStarMatrix.z.x * star->z) >> 16); x = (int16_t)((((x >> 2) + x) << 7) / z) + (320-8); if ((uint16_t)x >= 640-16) continue; @@ -323,7 +229,7 @@ static void realStars(void) screenBufferPos = ((y + 4) * SCREEN_W) + (x + 4); if ((video.frameBuffer[screenBufferPos] >> 24) == PAL_BCKGRND) { - col = ((uint8_t)~(z >> 8) >> 3) - (22 - 8); + const uint8_t col = ((uint8_t)~(z >> 8) >> 3) - (22 - 8); if (col < 24) { video.frameBuffer[screenBufferPos] = video.palette[starColConv[col]]; @@ -372,7 +278,8 @@ void renderAboutScreenFrame(void) clearRect(ABOUT_SCREEN_X, ABOUT_SCREEN_Y, ABOUT_SCREEN_W, ABOUT_SCREEN_H); // 3D starfield - newStarfield(); + + starfield(); starRotation.x -= 0.0003f; starRotation.y -= 0.0002f; starRotation.z += 0.0001f; @@ -408,12 +315,11 @@ void renderAboutScreenFrame(void) } else // old FT2 about screen { - star_a.x += SCALE_VBLANK_DELTA(3*64); // 70Hz delta -> 60Hz delta - star_a.y += SCALE_VBLANK_DELTA(2*64); - star_a.z -= SCALE_VBLANK_DELTA(1*64); - - fixaMatris(star_a, &starmat); - realStars(); + oldStarRotation.x += SCALE_VBLANK_DELTA(3*64); // 70Hz speed -> 60Hz speed + oldStarRotation.y += SCALE_VBLANK_DELTA(2*64); + oldStarRotation.z -= SCALE_VBLANK_DELTA(1*64); + oldRotateStarfieldMatrix(); + oldStarfield(); } showPushButton(PB_EXIT_ABOUT); // yes, we also have to redraw the exit button per frame :) @@ -462,44 +368,44 @@ void showAboutScreen(void) // called once when about screen is opened } else { - oldVector_t *s = starcrd; + oldVector_t *s = oldStarPoints; - const uint8_t type = (uint8_t)pascalRandom32(4); + const uint8_t type = (uint8_t)pascalRandom(4); switch (type) { case 0: { - hastighet = 309; - for (int32_t i = 0; i < 1000; i++, s++) + zSpeed = 309; + for (int32_t i = 0; i < OLD_NUM_STARS; i++, s++) { - s->z = (int16_t)pascalRandom32(0xFFFF) - 0x8000; - s->y = (int16_t)pascalRandom32(0xFFFF) - 0x8000; - s->x = (int16_t)pascalRandom32(0xFFFF) - 0x8000; + s->z = (int16_t)pascalRandom(0xFFFF) - 0x8000; + s->y = (int16_t)pascalRandom(0xFFFF) - 0x8000; + s->x = (int16_t)pascalRandom(0xFFFF) - 0x8000; } } break; case 1: { - hastighet = 0; - for (int32_t i = 0; i < 1000; i++, s++) + zSpeed = 0; + for (int32_t i = 0; i < OLD_NUM_STARS; i++, s++) { - if (i < 1000/4) + if (i < OLD_NUM_STARS/4) { - s->z = (int16_t)pascalRandom32(0xFFFF) - 0x8000; - s->y = (int16_t)pascalRandom32(0xFFFF) - 0x8000; - s->x = (int16_t)pascalRandom32(0xFFFF) - 0x8000; + s->z = (int16_t)pascalRandom(0xFFFF) - 0x8000; + s->y = (int16_t)pascalRandom(0xFFFF) - 0x8000; + s->x = (int16_t)pascalRandom(0xFFFF) - 0x8000; } else { - int32_t r = pascalRandom32(30000); - int32_t n = pascalRandom32(5); - int32_t w = ((2 * pascalRandom32(2)) - 1) * sqr(pascalRandom32(1000)); + int32_t r = pascalRandom(30000); + int32_t n = pascalRandom(5); + int32_t w = ((2 * pascalRandom(2)) - 1) * sqr(pascalRandom(1000)); double ww = (((M_PI * 2.0) / 5.0) * n) + (r / 12000.0) + (w / 3000000.0); - int32_t h = ((sqr(r) / 30000) * (pascalRandom32(10000) - 5000)) / 12000; + int32_t h = ((sqr(r) / 30000) * (pascalRandom(10000) - 5000)) / 12000; - s->x = (int16_t)trunc(r * cos(ww)); - s->y = (int16_t)trunc(r * sin(ww)); + s->x = (int16_t)(r * cos(ww)); + s->y = (int16_t)(r * sin(ww)); s->z = (int16_t)h; } } @@ -509,16 +415,20 @@ void showAboutScreen(void) // called once when about screen is opened case 2: case 3: { - hastighet = 0; - for (int32_t i = 0; i < 1000; i++, s++) + zSpeed = 0; + for (int32_t i = 0; i < OLD_NUM_STARS; i++, s++) { - int32_t r = (int32_t)round(sqrt(pascalRandom32(500) * 500)); - int32_t w = pascalRandom32(3000); - int32_t h = cos32767[(((w * 8) + r) / 16) & 1023] / 4;; + int32_t r = (int32_t)round(sqrt(pascalRandom(500) * 500)); + int32_t w = pascalRandom(3000); + double ww = ((w * 8) + r) / 16.0; + + const int16_t z = (int16_t)round(32767.0 * cos(w * (2.0 * M_PI / 1024.0))); + const int16_t y = (int16_t)round(32767.0 * sin(w * (2.0 * M_PI / 1024.0))); + const int16_t x = ((int16_t)round(32767.0 * cos(ww * (2.0 * M_PI / 1024.0)))) / 4; - s->z = (int16_t)((cos32767[w & 1023] * (w + r)) / 3500); - s->y = (int16_t)((sin32767[w & 1023] * (w + r)) / 3500); - s->x = (int16_t)((h * r) / 500); + s->z = (int16_t)((z * (w + r)) / 3500); + s->y = (int16_t)((y * (w + r)) / 3500); + s->x = (int16_t)((x * r) / 500); } } break; @@ -527,9 +437,9 @@ void showAboutScreen(void) // called once when about screen is opened break; } - star_a.x = 0; - star_a.y = 748; - star_a.z = 200; + oldStarRotation.x = 0; + oldStarRotation.y = 748; + oldStarRotation.z = 200; for (int32_t i = 0; i < 1000; i++) lastStarScreenPos[i] = -1; diff --git a/src/ft2_sample_ed.c b/src/ft2_sample_ed.c @@ -1495,7 +1495,11 @@ void updateSampleEditor(void) // draw sample play note - const uint8_t note = (editor.smpEd_NoteNr - 1) % 12; + const uint32_t noteNr = editor.smpEd_NoteNr - 1; + + const uint32_t note = noteNr % 12; + const uint32_t octave = noteNr / 12; + if (config.ptnAcc == 0) { noteChar1 = sharpNote1Char[note]; @@ -1507,11 +1511,9 @@ void updateSampleEditor(void) noteChar2 = flatNote2Char[note]; } - char octaChar = '0' + ((editor.smpEd_NoteNr - 1) / 12); - charOutBg(7, 369, PAL_FORGRND, PAL_BCKGRND, noteChar1); charOutBg(15, 369, PAL_FORGRND, PAL_BCKGRND, noteChar2); - charOutBg(23, 369, PAL_FORGRND, PAL_BCKGRND, octaChar); + charOutBg(23, 369, PAL_FORGRND, PAL_BCKGRND, (char)('0' + octave)); // draw sample display/length