Page 1 of 1
Fire-Colored particle system
Posted: 07 May 2019 22:07
by IcarusLives
Hello everyone,
Here is a particle system! they change colors as they rise. Not much to be impressed about, just a fun visual. Enjoy!
Code: Select all
@echo off & setlocal enableDelayedExpansion
( for /f %%a in ('echo prompt $E^| cmd') do set "esc=%%a" ) & echo !esc![?25l
set "temperature[0]=[38;2;7;7;7mÛ[0m"
set "temperature[1]=[38;2;31;7;7mÛ[0m"
set "temperature[2]=[38;2;47;15;7mÛ[0m"
set "temperature[3]=[38;2;71;15;7mÛ[0m"
set "temperature[4]=[38;2;87;23;7mÛ[0m"
set "temperature[5]=[38;2;103;31;7mÛ[0m"
set "temperature[6]=[38;2;119;31;7mÛ[0m"
set "temperature[7]=[38;2;143;39;7mÛ[0m"
set "temperature[8]=[38;2;159;47;7mÛ[0m"
set "temperature[9]=[38;2;175;63;7mÛ[0m"
set "temperature[10]=[38;2;191;71;7mÛ[0m"
set "temperature[11]=[38;2;199;71;7mÛ[0m"
set "temperature[12]=[38;2;223;79;7mÛ[0m"
set "temperature[13]=[38;2;223;87;7mÛ[0m"
set "temperature[14]=[38;2;223;87;7mÛ[0m"
set "temperature[15]=[38;2;215;95;7mÛ[0m"
set "temperature[16]=[38;2;215;95;7mÛ[0m"
set "temperature[17]=[38;2;215;103;15mÛ[0m"
set "temperature[18]=[38;2;207;111;15mÛ[0m"
set "temperature[19]=[38;2;207;119;15mÛ[0m"
set "temperature[20]=[38;2;207;127;15mÛ[0m"
set "temperature[21]=[38;2;207;135;23mÛ[0m"
set "temperature[22]=[38;2;199;135;23mÛ[0m"
set "temperature[23]=[38;2;199;143;23mÛ[0m"
set "temperature[24]=[38;2;199;151;31mÛ[0m"
set "temperature[25]=[38;2;191;159;31mÛ[0m"
set "temperature[26]=[38;2;191;159;31mÛ[0m"
set "temperature[27]=[38;2;191;167;39mÛ[0m"
set "temperature[28]=[38;2;191;167;39mÛ[0m"
set "temperature[29]=[38;2;191;175;47mÛ[0m"
set "temperature[30]=[38;2;183;175;47mÛ[0m"
set "temperature[31]=[38;2;183;183;47mÛ[0m"
set "temperature[32]=[38;2;183;183;55mÛ[0m"
set "temperature[33]=[38;2;207;207;111mÛ[0m"
set "temperature[34]=[38;2;223;223;159mÛ[0m"
set "temperature[35]=[38;2;239;239;199mÛ[0m"
set "temperature[36]=[38;2;255;255;255mÛ[0m"
set /a "max=36", "mag=4"
set /a "hei=wid=max", "objects=max * mag"
mode %wid%,%hei%
for /l %%a in (1,1,%objects%) do set /a "y[%%a]=!random! %% hei + hei","x[%%a]=%%a / mag","ys[%%a]=!random! %% mag + 1"
for /l %%# in () do (
for /l %%a in (1,1,%objects%) do (
if !y[%%a]! lss 0 ( set /a "y[%%a]=hei" ) else set /a "ly=y[%%a]","y[%%a]-=ys[%%a]"
for %%y in (!y[%%a]!) do set "screen=!screen!%esc%[!ly!;!x[%%a]!H %esc%[!y[%%a]!;!x[%%a]!H!temperature[%%y]!"
)
<nul set /p "=!screen!" & set "screen="
)
Re: Fire-Colored particle system
Posted: 08 May 2019 09:23
by Jer
Any idea why the batch code does this? The termination is my doing.
This is all displayed in a smaller window, same as your image.
My O/S: Microsoft Windows [Version 10.0.17134.706]
Code: Select all
[38;2;191;71;7m█[0m [38;2;175; 63;7m█[0m;199;7[3[38;2;199;71;[38;2; 175;63;7m█[0m38;2;223;79;7m█[0m38;[3 8;2;191;71;7m█[0m[38;2;215;95;7m█[0m
38;2;207;1[38;2;215;95;7 █[0m [3
8;[3 ;2;215;95; m [0m2;207 38; 38;2;
[38;2;215;95 7m█[0m█[0m27;15m█ 0m0 3
[38; ;20[38;2[38;2;21[38;2;215;1[38; 2;215;95;7m█[0m3m█[0m[38;2;207;127 1
38;2;207;119;1[38;2;207;119;1[38;2; 215;103;15m█[0m;2;207 127;15m█[0m;2;
207;135; 3m█[ m;2;199 143;23m[38 2;2
07;119;15m█[0m5 ;31[38;2;199;135;23m
█[0m2;19 ;16 3 m█[[38;2;191;1 9 31m
█[0 159;31m█ 0m ;39m[38;2;199 151;31
m█[0m7;3 [[[3[38[38 2;191;159;31m█[0
m█[0m75;4[[38;2;191 [38[38;2;191;167
;39m█[0m[38;2;191;16[38[38;2;191;[38 ;2;191;159;31m█[0m2; 91;167[38;2;191
;159;31m█[0m7 ;4 m█[0m8 2;[38;[38 2;
191;167;39m█[0m[0mm█[38;2;183;175;47
m█[0m0m3[[38;2;183;183;47m 0[38; ;1
91;175;47m█[0m83;183;5[38;2;[38;2;18
3;175;47m█[0m[38;2;2 7 207;[38 2;183
;183;47m█[0m23;223[38;2;2[38 ;207;2
07;111m█[0m38 [3[3 [38;2;23[3[3[[38; 2;207;207;111m█[0m 2 [3[38;2;[38;2;
223;223;159m█[0m [ 8;2;239;
239;199m█[0m ^ CTerminate batch job (Y/N)?
Re: Fire-Colored particle system
Posted: 08 May 2019 09:39
by aGerman
Did you check "Use legacy console" in the console properties? If so, uncheck it.
Steffen
EDIT Nope, I'm facing the same problem with this particular code.
Re: Fire-Colored particle system
Posted: 08 May 2019 11:19
by penpen
I think IcarusLives initially used the esc-character itself in that batch and replaced it by a delayed variable later (adding some slight errors), so the following should work:
Code: Select all
@echo off & setlocal enableDelayedExpansion
( for /f %%a in ('echo prompt $E^| cmd') do set "esc=%%a" ) & echo !esc![?25l
set "temperature[0]=[38;2;7;7;7mÛ"
set "temperature[1]=[38;2;31;7;7mÛ"
set "temperature[2]=[38;2;47;15;7mÛ"
set "temperature[3]=[38;2;71;15;7mÛ"
set "temperature[4]=[38;2;87;23;7mÛ"
set "temperature[5]=[38;2;103;31;7mÛ"
set "temperature[6]=[38;2;119;31;7mÛ"
set "temperature[7]=[38;2;143;39;7mÛ"
set "temperature[8]=[38;2;159;47;7mÛ"
set "temperature[9]=[38;2;175;63;7mÛ"
set "temperature[10]=[38;2;191;71;7mÛ"
set "temperature[11]=[38;2;199;71;7mÛ"
set "temperature[12]=[38;2;223;79;7mÛ"
set "temperature[13]=[38;2;223;87;7mÛ"
set "temperature[14]=[38;2;223;87;7mÛ"
set "temperature[15]=[38;2;215;95;7mÛ"
set "temperature[16]=[38;2;215;95;7mÛ"
set "temperature[17]=[38;2;215;103;15mÛ"
set "temperature[18]=[38;2;207;111;15mÛ"
set "temperature[19]=[38;2;207;119;15mÛ"
set "temperature[20]=[38;2;207;127;15mÛ"
set "temperature[21]=[38;2;207;135;23mÛ"
set "temperature[22]=[38;2;199;135;23mÛ"
set "temperature[23]=[38;2;199;143;23mÛ"
set "temperature[24]=[38;2;199;151;31mÛ"
set "temperature[25]=[38;2;191;159;31mÛ"
set "temperature[26]=[38;2;191;159;31mÛ"
set "temperature[27]=[38;2;191;167;39mÛ"
set "temperature[28]=[38;2;191;167;39mÛ"
set "temperature[29]=[38;2;191;175;47mÛ"
set "temperature[30]=[38;2;183;175;47mÛ"
set "temperature[31]=[38;2;183;183;47mÛ"
set "temperature[32]=[38;2;183;183;55mÛ"
set "temperature[33]=[38;2;207;207;111mÛ"
set "temperature[34]=[38;2;223;223;159mÛ"
set "temperature[35]=[38;2;239;239;199mÛ"
set "temperature[36]=[38;2;255;255;255mÛ"
set /a "max=36", "mag=4"
set /a "hei=wid=max", "objects=max * mag"
mode %wid%,%hei%
for /l %%a in (1,1,%objects%) do set /a "y[%%a]=!random! %% hei + hei","x[%%a]=%%a / mag","ys[%%a]=!random! %% mag + 1"
for /l %%# in () do (
for /l %%a in (1,1,%objects%) do (
if !y[%%a]! lss 0 ( set /a "y[%%a]=hei" ) else set /a "ly=y[%%a]","y[%%a]-=ys[%%a]"
for %%y in (!y[%%a]!) do set "screen=!screen!%esc%[!ly!;!x[%%a]!H %esc%[!y[%%a]!;!x[%%a]!H!esc!!temperature[%%y]!!esc![0m"
)
<nul set /p "=!screen!" & set "screen="
for /l %%a in (1, 1, 150000) do rem
)
Sidenote: Note i added the loop "for /l %%a in (1, 1, 150000) do rem" in order to slow down that; you might want to delete that loop or change the values.
penpen
Re: Fire-Colored particle system
Posted: 08 May 2019 11:49
by aGerman
Haha, I was about to post almost the same code. Every [ needs its own escape character.
Steffen
Re: Fire-Colored particle system
Posted: 08 May 2019 12:19
by Jer
I have questions about two lines. If someone could explain, that would be great.
What does "& echo !esc![?25l" do?
In the assignment of screen, how is "H" doing its job?
Changing it to some other character gives different spacing and frequency.
"G" and "I" produce many more characters than H.
Thanks.
Jerry
Re: Fire-Colored particle system
Posted: 08 May 2019 12:43
by aGerman
!esc![?25l hides the cursor.
!esc![y;xH moves the cursor position to line y and column x
I'm not aware that G or I are even valid characters in this context.
https://docs.microsoft.com/en-us/window ... -sequences
Steffen