Trispis' Fireworks

An ASCII Art fireworks display for the Fourth of July.

Author: Trispis@M*U*S*H
Category: Other
Commands: @create, @dolist, @lock, @pemit, @set, @wait.

Instructions

Copy and paste the below code into a compatible MUSH or MUX.

MUSHCode for Trispis' Fireworks

@create fireworks
@lock fireworks==me
@set fireworks=!NO_COMMAND
&2 fireworks=[space(2)]
&3 fireworks=[space(3)]
&4 fireworks=[space(4)]
&5 fireworks=[space(5)]
&6 fireworks=[space(6)]
&7 fireworks=[space(7)]
&8 fireworks=[space(8)]
&CMD.4 fireworks=$+4:@dolist lnum(9) 0 0={@wait inc(#@)=@pemit %#=[u(u.launch.x,##)]};@dol lnum(4)={@wait add(12,mul(#@,3))=@pemit %#=[u(u.display.x,##)]}
&DESCRIBE fireworks=very spammy
@set fireworks/DESCRIBE=no_command visual public nearby
&DISPLAY0 fireworks=[iter(lnum(9),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xyh,space(37)*[space(37)])][ansi(x,|)]%r[iter(lnum(10),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]
&DISPLAY1 fireworks=[iter(lnum(8),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xyh,space(37)*[space(37)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xyh,space(34)* %b|%b *[space(34)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xyh,space(32)* - >*< - *[space(32)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xyh,space(34)*%b | %b*[space(34)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xyh,space(37)*[space(37)])][ansi(x,|)]%r[iter(lnum(8),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]
&DISPLAY2 fireworks=[iter(lnum(7),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xrh,space(37)*[space(37)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xrh,space(33)* %b | %b *[space(33)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xrh,space(31)* %b\\[space(5)]/ %b*[space(31)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xrh,space(30)* -[space(9)]- *[space(30)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xrh,space(31)* %b/[space(5)]\\ %b*[space(31)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xrh,space(33)* %b | %b *[space(33)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xrh,space(37)*[space(37)])][ansi(x,|)]%r[iter(lnum(8),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]
&DISPLAY3 fireworks=[iter(lnum(3),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xbh,[space(19)][u(2)]*[u(3)]*[u(4)]*[u(4)]****[u(3)]****[u(3)]*[u(3)]*[u(2)][space(19)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xbh,[space(19)][u(2)]*[u(3)]*[u(3)]* *[u(3)]*[u(3)]*[u(2)]*[u(3)]*[u(3)]* *[u(3)][space(19)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xbh,[space(19)][u(2)]*****[u(2)]*****[u(2)]****[u(3)]****[u(5)]*[u(4)][space(19)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xbh,[space(19)][u(2)]*[u(3)]*[u(2)]*[u(3)]*[u(2)]*[u(6)]*[u(8)]*[u(4)][space(19)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xbh,[space(19)][u(2)]*[u(3)]*[u(2)]*[u(3)]*[u(2)]*[u(6)]*[u(8)]*[u(4)][space(19)])][ansi(x,|)]%r[iter(lnum(3),[ansi(x,|)][ansi(X,[space(75)])][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xbh,[space(10)][u(4)]*[u(2)]*[u(3)]*[u(2)]*[u(6)]*[u(3)]*[space(10)][u(3)]*[u(3)]*****[u(2)]*[u(3)]*[space(10)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xbh,[space(10)][u(4)]*[u(2)]*[u(3)]*[u(2)]*[u(7)]* * [space(10)][u(2)]**[u(5)]*[u(4)]*[u(3)]*[space(10)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xbh,[space(10)][u(4)]*[u(2)]*[u(3)]*[u(2)]*[u(8)]*[u(2)][space(10)] * *[u(5)]*[u(4)]*****[space(10)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xbh,[space(10)]*[u(3)]*[u(2)]*[u(3)]*[u(2)]*[u(8)]*[u(2)][space(10)]*****[u(4)]*[u(4)]*[u(3)]*[space(10)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xbh,[space(10)] ***[u(4)]***[u(3)]*****[u(4)]*[u(2)][space(10)][u(3)]*[u(5)]*[u(4)]*[u(3)]*[space(10)])][ansi(x,|)]%r[iter(lnum(4),[ansi(x,|)][ansi(Xbh,[space(75)])][ansi(x,|)],%b,%r)]
&LAUNCH0 fireworks=[iter(lnum(20),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]
&LAUNCH1 fireworks=[iter(lnum(19),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xwh,space(37)*[space(37)])][ansi(x,|)]
&LAUNCH2 fireworks=[iter(lnum(18),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xwh,space(37)*[space(37)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xw,space(37)|[space(37)])][ansi(x,|)]
&LAUNCH3 fireworks=[iter(lnum(17),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xwh,space(37)*[space(37)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xw,space(37)|[space(37)])][ansi(x,|)]%r[ansi(x,|)][ansi(X,space(75))][ansi(x,|)]
&LAUNCH4 fireworks=[iter(lnum(16),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xwh,space(37)*[space(37)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xw,space(37)|[space(37)])][ansi(x,|)]%r[iter(lnum(2),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]
&LAUNCH5 fireworks=[iter(lnum(15),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xwh,space(37)*[space(37)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xw,space(37)|[space(37)])][ansi(x,|)]%r[iter(lnum(3),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]
&LAUNCH6 fireworks=[iter(lnum(14),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xwh,space(37)*[space(37)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xw,space(37)|[space(37)])][ansi(x,|)]%r[iter(lnum(4),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]
&LAUNCH7 fireworks=[iter(lnum(13),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xw,space(37)*[space(37)])][ansi(x,|)]%r[ansi(x,|)][ansi(Xxh,space(37)|[space(37)])][ansi(x,|)]%r[iter(lnum(5),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]
&LAUNCH8 fireworks=[iter(lnum(12),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]%r[ansi(x,|)][ansi(Xx,space(37)*[space(37)])][ansi(x,|)]%r[iter(lnum(7),[ansi(x,|)][ansi(X,space(75))][ansi(x,|)],%b,%r)]
&TOPBORDER fireworks=[center(ansi(x,repeat(-,77)),77)]
&U.DISPLAY.X fireworks=[u(topborder)]%r[u(display%0)]%r[u(topborder)]
&U.LAUNCH.X fireworks=[u(topborder)]%r[u(launch%0)]%r[u(topborder)]

think Type +4 to view the firework display.