Home Upgrade Search Memberlist Extras Hacker Tools Award Goals Help Wiki Contact

Shell 

I am releasing an Animated Heart that changes color in batch! [Valentines Day Specia]

Want to make you're sweetie/babe/wife happy? for an occasion? Well, I have coded an animated heart, changes colors to red white, and some other nice colors to show you're love!

I hope you guys enjoy this, I have worked hard on this one.. Redesigned it!


pastebin[DOT]com/LTiidkre

Want to code batch with me? add me on skype!



🤝Have a good day! - Leave me a comment and a rep point <3✌
(Feb 14, 2017 03:38 PM)SIM-3391627 Wrote:  -snip-

That's really sweet of you to do this for your someone special. I've utilized my batch experience in the past for such an occasion :)

Lol this code is older than dirt, but this is what I did a couple years back ^-^
Code
@echo off & setlocal enableDelayedExpansion
color 0d

set /a "boxMax_Cols=73", "boxMax_Lines=19"
set /a "cols=boxMax_Cols + 4", "lines=boxMax_Lines + 4"
mode con: cols=%Cols% lines=%Lines%

for /l %%a in (1,1,%boxMax_Cols%) do set "out=!out!Û"
for /l %%a in (1,1,%boxMax_Lines%) do (
    for /l %%b in (1,1,%boxMax_Cols%) do (
        set "%%a,%%b= "
    )
)


for %%a in (18 19 20 21 29 30 31 32 40 41 42 43 44 47 54 55 56 59 63 65 66 67 68 69) do set "2,%%a=Û"
for %%a in (3 4 5 7 8 9 16 17 18 19 20 21 22 23 27 28 29 30 31 32 33 34 42 47 53 57 59 63 65) do set "3,%%a=Û"
for %%a in (2 3 4 5 6 7 8 9 10 15 16 23 24 26 27 34 35 42 47 53 57 59 63 65 66 67) do set "4,%%a=Û"
for %%a in (2 3 4 5 6 7 8 9 10 14 15 25 35 36 42 47 53 57 60 62 65) do set "5,%%a=Û"
for %%a in (3 4 5 6 7 8 9 13 14 19 20 21 22 28 29 30 36 37 40 41 42 43 44 47 48 49 50 51 54 55 56 61 65 66 67 68 69) do set "6,%%a=Û"
for %%a in (4 5 6 7 8 13 19 25 28 31 37) do set "7,%%a=Û"
for %%a in (6 13 14 19 20 21 24 25 26 28 29 30 36 37 47 51 54 55 56 59 63 65 67 69) do set "8,%%a=Û"
for %%a in (14 15 19 25 28 31 35 36 47 51 53 57 59 63 65 67 69) do set "9,%%a=Û"
for %%a in (16 17 19 28 29 30 33 34 48 49 50 53 57 59 63 65 67 69) do set "10,%%a=Û"
for %%a in (17 18 32 33 49 53 57 59 63) do set "11,%%a=Û"
for %%a in (19 20 30 31 49 54 55 56 60 61 62 65 67 69) do set "12,%%a=Û"
for %%a in (11 12 13 15 16 17 20 21 29 30) do set "13,%%a=Û"
for %%a in (10 11 12 13 14 15 16 17 18 22 23 27 28 32 33 34 35 36 39 40 41 44 45 46 47 50 51 52 53 54 56 60 62 63 64 65 66 68 69 70 71) do set "14,%%a=Û"
for %%a in (11 12 13 14 15 16 17 23 24 26 27 32 38 42 44 48 50 56 60 62 68 72) do set "15,%%a=Û"
for %%a in (12 13 14 15 16 24 25 25 26 32 33 34 38 42 44 45 46 47 50 51 52 56 60 62 63 64 68 69 70 71) do set "16,%%a=Û"
for %%a in (13 14 15 25 32 38 42 44 47 50 57 59 62 68 71) do set "17,%%a=Û"
for %%a in (14 32 39 40 41 44 48 50 51 52 53 54 58 62 63 64 65 66 68 72) do set "18,%%a=Û"

echo. & echo  Û!out!Û
for /l %%a in (1,1,!boxMax_Lines!) do (
    for /l %%b in (1,1,!boxMax_Cols!) do set "line=!line!!%%a,%%b!"
    echo  Û!line!Û
    set "line="
)
echo  Û!out!Û
pause > nul
goto :main
I just felt like someone would like to pass it on to a loved one! :) That's a pretty cool batch btw, nice design, I like how you made that! :) Have a nice day bro


Possibly Related Threads...
Thread / Author Replies Views Last Post
[Shell] by Robert RougeSep 24, 2026 10:02 AM 4 219 Sep 24, 2026 10:02 AM
Last Post: Anonynuk
[Shell] by fisica638Oct 30, 2019 11:05 AM 1 536 Oct 30, 2019 11:05 AM
Last Post: Hackoo
[C#] by Lor‌dSep 30, 2018 02:47 PM 47 5,642 Sep 30, 2018 02:47 PM
Last Post: The-Real_Devious