[DBP] 2D Lightning Function - GameCreators Forum

Author

Message

lower logic

18

Years of Service

User Offline

Joined: 15th Jun 2006

Location:

Posted: 16th Aug 2007 22:14

Link

I got bored so I made a lightning function:

To compile you will need D3DFunc installed.

sync on
sync rate 50
cls
set display mode 1024,768,32
hide mouse
D3D_INIT
do
D3D_Color 0,0,0,55
D3D_BOX 0,0,screen width(),screen height()
d#=0.88
r=15
inc n
if n>2
   n=0
   fractal_line(0,0,mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),0,mousex(),mousey(),0.3,d#,r)
   fractal_line(0,screen height(),mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),screen height(),mousex(),mousey(),0.3,d#,r)
endif
sync

while spacekey()=1:wait 5:endwhile
loop

function fractal_line(x1#,y1#,x2#,y2#,k#,d#,r)
   dx#=x2#-x1#
   dy#=y2#-y1#
   if r<=0 or (dx#^2+dy#^2)<900
      w=3
      for s=2 to 1 step -1
         D3D_COLOR 255,255,255,255.0/(s+1)^2
         for x=-s*w+w-1 to s*w-w+1
            for y=-s*w+w-1 to s*w-w+1
               D3D_LINE x1#+x,y1#+y,x2#+x,y2#+y
            next y
         next x
      next s
      exitfunction
   endif
   mx#=(x1#+x2#)/2
   my#=(y1#+y2#)/2
   nx#=-dy#
   ny#=dx#
   repeat
      m#=randf(-k#,k#)
      x3#=mx#+nx#*m#
      y3#=my#+ny#*m#
   until x3#>0 and x3#<screen width() and y3#>0 and y3#<screen height()
   fractal_line(x1#,y1#,x3#,y3#,k#*d#,d#,r-1)
   fractal_line(x2#,y2#,x3#,y3#,k#*d#,d#,r-1)
endfunction

function randf(min#,max#)
   d#=max#-min#
   x#=rnd(d#*10000)/10000.0+min#
endfunction x#

+ Code Snippet

sync on
sync rate 50
cls
set display mode 1024,768,32
hide mouse
D3D_INIT
do
D3D_Color 0,0,0,55
D3D_BOX 0,0,screen width(),screen height()
d#=0.88
r=15
inc n
if n>2
   n=0
   fractal_line(0,0,mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),0,mousex(),mousey(),0.3,d#,r)
   fractal_line(0,screen height(),mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),screen height(),mousex(),mousey(),0.3,d#,r)
endif
sync

while spacekey()=1:wait 5:endwhile
loop

function fractal_line(x1#,y1#,x2#,y2#,k#,d#,r)
   dx#=x2#-x1#
   dy#=y2#-y1#
   if r<=0 or (dx#^2+dy#^2)<900
      w=3
      for s=2 to 1 step -1
         D3D_COLOR 255,255,255,255.0/(s+1)^2
         for x=-s*w+w-1 to s*w-w+1
            for y=-s*w+w-1 to s*w-w+1
               D3D_LINE x1#+x,y1#+y,x2#+x,y2#+y
            next y
         next x
      next s
      exitfunction
   endif
   mx#=(x1#+x2#)/2
   my#=(y1#+y2#)/2
   nx#=-dy#
   ny#=dx#
   repeat
      m#=randf(-k#,k#)
      x3#=mx#+nx#*m#
      y3#=my#+ny#*m#
   until x3#>0 and x3#<screen width() and y3#>0 and y3#<screen height()
   fractal_line(x1#,y1#,x3#,y3#,k#*d#,d#,r-1)
   fractal_line(x2#,y2#,x3#,y3#,k#*d#,d#,r-1)
endfunction

function randf(min#,max#)
   d#=max#-min#
   x#=rnd(d#*10000)/10000.0+min#
endfunction x#

Back to top

Profile PM

Ankillito

17

Years of Service

User Offline

Joined: 10th Dec 2006

Location: Litigious California

Posted: 18th Aug 2007 09:22 Edited at: 18th Aug 2007 09:28

Link

Lower Logic!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

You're Back!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Woot!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

file>save as>LL's awesome code>lightning

definite keeper.

http://forum.thegamecreators.com/xt/xt_apollo_pic.php?i=1234759

Back to top

Profile PM

Sixty Squares

18

Years of Service

User Offline

Joined: 7th Jun 2006

Location: Somewhere in the world

Posted: 21st Aug 2007 04:09 Edited at: 21st Aug 2007 04:09

Link

Wow that was really cool. Tell me. How are you so good at coding?!

Metal Runner
Snow Demo

Back to top

Profile PM Email

Libervurto

18

Years of Service

User Offline

Joined: 30th Jun 2006

Location: On Toast

Posted: 25th Aug 2007 21:11

Link

do they always go from the corners through the center?

Your signature has been erased by a mod because it was rubbish.

Back to top

Profile PM Email

lower logic

18

Years of Service

User Offline

Joined: 15th Jun 2006

Location:

Posted: 27th Aug 2007 07:05

Link

Thanks.

"do they always go from the corners through the center?"

Yeah, in the example these four function calls make lightning bolts from each corner to the mouse's position, but the function can be called to make bolts between any 2 points:

+ Code Snippet

   fractal_line(0,0,mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),0,mousex(),mousey(),0.3,d#,r)
   fractal_line(0,screen height(),mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),screen height(),mousex(),mousey(),0.3,d#,r)

Back to top

Profile PM

Mortus

17

Years of Service

User Offline

Joined: 14th Dec 2006

Location: Illinois

Posted: 5th Sep 2007 17:32

Link

he i translated to non-d3d
i have d3d so i dont know if it works someone give it a try?

sync on
cls
set display mode 1024,768,32
hide mouse
do
Ink 0,0
Box 0,0,1024,768
d#=0.88
r=15
inc n
if n>2
   n=0
   fractal_line(0,0,mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),0,mousex(),mousey(),0.3,d#,r)
   fractal_line(0,screen height(),mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),screen height(),mousex(),mousey(),0.3,d#,r)
endif
sync

while spacekey()=1:wait 5:endwhile
loop

function fractal_line(x1#,y1#,x2#,y2#,k#,d#,r)
   dx#=x2#-x1#
   dy#=y2#-y1#
   if r<=0 or (dx#^2+dy#^2)<900
      w=3
      for s=2 to 1 step -1
         Ink RGB(255,255,255),0
         for x=-s*w+w-1 to s*w-w+1
            for y=-s*w+w-1 to s*w-w+1
               Line x1#+x,y1#+y,x2#+x,y2#+y
            next y
         next x
      next s
      exitfunction
   endif
   mx#=(x1#+x2#)/2
   my#=(y1#+y2#)/2
   nx#=-dy#
   ny#=dx#
   repeat
      m#=randf(-k#,k#)
      x3#=mx#+nx#*m#
      y3#=my#+ny#*m#
   until x3#>0 and x3#<screen width() and y3#>0 and y3#<screen height()
   fractal_line(x1#,y1#,x3#,y3#,k#*d#,d#,r-1)
   fractal_line(x2#,y2#,x3#,y3#,k#*d#,d#,r-1)
endfunction

function randf(min#,max#)
   d#=max#-min#
   x#=rnd(d#*10000)/10000.0+min#
endfunction x#

+ Code Snippet

sync on
cls
set display mode 1024,768,32
hide mouse
do
Ink 0,0
Box 0,0,1024,768
d#=0.88
r=15
inc n
if n>2
   n=0
   fractal_line(0,0,mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),0,mousex(),mousey(),0.3,d#,r)
   fractal_line(0,screen height(),mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),screen height(),mousex(),mousey(),0.3,d#,r)
endif
sync

while spacekey()=1:wait 5:endwhile
loop

function fractal_line(x1#,y1#,x2#,y2#,k#,d#,r)
   dx#=x2#-x1#
   dy#=y2#-y1#
   if r<=0 or (dx#^2+dy#^2)<900
      w=3
      for s=2 to 1 step -1
         Ink RGB(255,255,255),0
         for x=-s*w+w-1 to s*w-w+1
            for y=-s*w+w-1 to s*w-w+1
               Line x1#+x,y1#+y,x2#+x,y2#+y
            next y
         next x
      next s
      exitfunction
   endif
   mx#=(x1#+x2#)/2
   my#=(y1#+y2#)/2
   nx#=-dy#
   ny#=dx#
   repeat
      m#=randf(-k#,k#)
      x3#=mx#+nx#*m#
      y3#=my#+ny#*m#
   until x3#>0 and x3#<screen width() and y3#>0 and y3#<screen height()
   fractal_line(x1#,y1#,x3#,y3#,k#*d#,d#,r-1)
   fractal_line(x2#,y2#,x3#,y3#,k#*d#,d#,r-1)
endfunction

function randf(min#,max#)
   d#=max#-min#
   x#=rnd(d#*10000)/10000.0+min#
endfunction x#

Back to top

Profile PM Email

calcyman

17

Years of Service

User Offline

Joined: 31st Aug 2007

Location: The Uncertainty Principle

Posted: 31st Oct 2007 23:21

Link

Very nice lightning effect!

It works - they flash up for a split-second and then disappear (actually like lightning). Also it seems to only render in horizontal strips of 100px high.

When removing the sync-related commands I get a better result, albiet rather strange.

That fractal_line function could come in very useful, especially for energy-like effects (like plasma-balls). It would look better if it didn't have a definite edge, though.

Urrgghh! A self-calling function! those are the sorts of things I don't recommend.

Your signature has been erased by a hyper-intelligent pan-dimensional being (a mod)

Back to top

Profile PM Email

Roxas

19

Years of Service

User Offline

Joined: 11th Nov 2005

Location: http://forum.thegamecreators.com

Posted: 2nd Nov 2007 16:03

Link

Hehe.. Try this

The amount is 50 and because of that its slow but awesome looking!
Just change the amount value to make diffrent looking effects

Amount=50
sync on
sync rate 50
cls
set display mode 1024,768,32
hide mouse
D3D_INIT
do
D3D_Color 0,0,0,55
D3D_BOX 0,0,screen width(),screen height()
d#=0.88
r=15
inc n
if n>2
   n=0
   for x=1 to Amount
   fractal_line(0,0,mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),0,mousex(),mousey(),0.3,d#,r)
   fractal_line(0,screen height(),mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),screen height(),mousex(),mousey(),0.3,d#,r)
   next x
endif
sync

while spacekey()=1:wait 5:endwhile
loop

function fractal_line(x1#,y1#,x2#,y2#,k#,d#,r)
   dx#=x2#-x1#
   dy#=y2#-y1#
   if r<=0 or (dx#^2+dy#^2)<900
      w=3
      for s=2 to 1 step -1
         D3D_COLOR 255,255,255,255.0/(s+1)^2
         for x=-s*w+w-1 to s*w-w+1
            for y=-s*w+w-1 to s*w-w+1
               D3D_LINE x1#+x,y1#+y,x2#+x,y2#+y
            next y
         next x
      next s
      exitfunction
   endif
   mx#=(x1#+x2#)/2
   my#=(y1#+y2#)/2
   nx#=-dy#
   ny#=dx#
   repeat
      m#=randf(-k#,k#)
      x3#=mx#+nx#*m#
      y3#=my#+ny#*m#
   until x3#>0 and x3#<screen width() and y3#>0 and y3#<screen height()
   fractal_line(x1#,y1#,x3#,y3#,k#*d#,d#,r-1)
   fractal_line(x2#,y2#,x3#,y3#,k#*d#,d#,r-1)
endfunction

function randf(min#,max#)
   d#=max#-min#
   x#=rnd(d#*10000)/10000.0+min#
endfunction x#

+ Code Snippet

Amount=50
sync on
sync rate 50
cls
set display mode 1024,768,32
hide mouse
D3D_INIT
do
D3D_Color 0,0,0,55
D3D_BOX 0,0,screen width(),screen height()
d#=0.88
r=15
inc n
if n>2
   n=0
   for x=1 to Amount
   fractal_line(0,0,mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),0,mousex(),mousey(),0.3,d#,r)
   fractal_line(0,screen height(),mousex(),mousey(),0.3,d#,r)
   fractal_line(screen width(),screen height(),mousex(),mousey(),0.3,d#,r)
   next x
endif
sync

while spacekey()=1:wait 5:endwhile
loop

function fractal_line(x1#,y1#,x2#,y2#,k#,d#,r)
   dx#=x2#-x1#
   dy#=y2#-y1#
   if r<=0 or (dx#^2+dy#^2)<900
      w=3
      for s=2 to 1 step -1
         D3D_COLOR 255,255,255,255.0/(s+1)^2
         for x=-s*w+w-1 to s*w-w+1
            for y=-s*w+w-1 to s*w-w+1
               D3D_LINE x1#+x,y1#+y,x2#+x,y2#+y
            next y
         next x
      next s
      exitfunction
   endif
   mx#=(x1#+x2#)/2
   my#=(y1#+y2#)/2
   nx#=-dy#
   ny#=dx#
   repeat
      m#=randf(-k#,k#)
      x3#=mx#+nx#*m#
      y3#=my#+ny#*m#
   until x3#>0 and x3#<screen width() and y3#>0 and y3#<screen height()
   fractal_line(x1#,y1#,x3#,y3#,k#*d#,d#,r-1)
   fractal_line(x2#,y2#,x3#,y3#,k#*d#,d#,r-1)
endfunction

function randf(min#,max#)
   d#=max#-min#
   x#=rnd(d#*10000)/10000.0+min#
endfunction x#

[center]

Click for details!

Back to top

Profile PM Email

Roxas

19

Years of Service

User Offline

Joined: 11th Nov 2005

Location: http://forum.thegamecreators.com

Posted: 2nd Nov 2007 16:39 Edited at: 2nd Nov 2007 16:40

Link

New one!
Three diffrent looking thunders in circle shape

Pic:

Code:

sync on
sync rate 60
cls
set display mode 1024,768,32
hide mouse
D3D_INIT
do
D3D_Color 0,0,0,55
D3D_BOX 0,0,screen width(),screen height()
d#=0.88
r=15
inc n
if n>2
   n=0
  CircleThund(screen width()/4,screen height()/2,100,d#,r)    
  CircleThund2(screen width()/2,screen height()/2,100,d#,r)  
  CircleThund3(screen width()-250,screen height()/2,100,d#,r)  
endif
d3d_circle screen width()/2,screen height()/2,100,0
d3d_circle screen width()/4,screen height()/2,100,0
d3d_circle screen width()-250,screen height()/2,100,0
fastsync

while spacekey()=1:wait 5:endwhile
loop

Function CircleThund(x,y,Radius,d#,r)
 fractal_line(x,y-radius,x,y,0.3,d#,r)
 fractal_line(x,y+radius,x,y,0.3,d#,r)
 fractal_line(x+radius,y,x,y,0.3,d#,r)
 fractal_line(x-radius,y,x,y,0.3,d#,r) 
 fractal_line(x-(radius-30),y-(radius-30),x,y,0.3,d#,r)
 fractal_line(x+(radius-30),y+(radius-30),x,y,0.3,d#,r)
 fractal_line(x+(radius-30),y-(radius-30),x,y,0.3,d#,r)
 fractal_line(x-(radius-30),y+(radius-30),x,y,0.3,d#,r)
Endfunction

Function CircleThund2(x,y,Radius,d#,r)
 fractal_line(x,y-radius,x,y,0.3,d#,r)
 fractal_line(x,y-radius,x-(radius-30),y-(radius-30),0.3,d#,r)
 fractal_line(x,y+radius,x,y,0.3,d#,r)
 fractal_line(x,y+radius,x+(radius-30),y+(radius-30),0.3,d#,r)
 fractal_line(x+radius,y,x,y,0.3,d#,r)
 fractal_line(x+radius,y,x+(radius-30),y-(radius-30),0.3,d#,r)
 fractal_line(x-radius,y,x,y,0.3,d#,r) 
 fractal_line(x-radius,y,x-(radius-30),y+(radius-30),0.3,d#,r) 
 fractal_line(x-(radius-30),y-(radius-30),x,y,0.3,d#,r)
 fractal_line(x-(radius-30),y-(radius-30),x-radius,y,0.3,d#,r)
 fractal_line(x+(radius-30),y+(radius-30),x,y,0.3,d#,r)
 fractal_line(x+(radius-30),y+(radius-30),x+radius,y,0.3,d#,r)
 fractal_line(x+(radius-30),y-(radius-30),x,y,0.3,d#,r)
 fractal_line(x+(radius-30),y-(radius-30),x,y-radius,0.3,d#,r)
 fractal_line(x-(radius-30),y+(radius-30),x,y,0.3,d#,r)
 fractal_line(x-(radius-30),y+(radius-30),x,y+radius,0.3,d#,r) 
Endfunction

Function CircleThund3(x,y,Radius,d#,r)
 fractal_line(x,y-radius,x-(radius-30),y-(radius-30),0.3,d#,r)
 fractal_line(x,y+radius,x+(radius-30),y+(radius-30),0.3,d#,r)
 fractal_line(x+radius,y,x+(radius-30),y-(radius-30),0.3,d#,r)
 fractal_line(x-radius,y,x-(radius-30),y+(radius-30),0.3,d#,r) 
 fractal_line(x-(radius-30),y-(radius-30),x-radius,y,0.3,d#,r)
 fractal_line(x+(radius-30),y+(radius-30),x+radius,y,0.3,d#,r)
 fractal_line(x+(radius-30),y-(radius-30),x,y-radius,0.3,d#,r)
 fractal_line(x-(radius-30),y+(radius-30),x,y+radius,0.3,d#,r) 
Endfunction

function fractal_line(x1#,y1#,x2#,y2#,k#,d#,r)
   dx#=x2#-x1#
   dy#=y2#-y1#
   if r<=0 or (dx#^2+dy#^2)<900
      w=3
      for s=2 to 1 step -1
         D3D_COLOR 255,255,255,255.0/(s+1)^2
         for x=-s*w+w-1 to s*w-w+1
            for y=-s*w+w-1 to s*w-w+1
               D3D_LINE x1#+x,y1#+y,x2#+x,y2#+y
            next y
         next x
      next s
      exitfunction
   endif
   mx#=(x1#+x2#)/2
   my#=(y1#+y2#)/2
   nx#=-dy#
   ny#=dx#
   repeat
      m#=randf(-k#,k#)
      x3#=mx#+nx#*m#
      y3#=my#+ny#*m#
   until x3#>0 and x3#<screen width() and y3#>0 and y3#<screen height()
   fractal_line(x1#,y1#,x3#,y3#,k#*d#,d#,r-1)
   fractal_line(x2#,y2#,x3#,y3#,k#*d#,d#,r-1)
endfunction

function randf(min#,max#)
   d#=max#-min#
   x#=rnd(d#*10000)/10000.0+min#
endfunction x#

+ Code Snippet

sync on
sync rate 60
cls
set display mode 1024,768,32
hide mouse
D3D_INIT
do
D3D_Color 0,0,0,55
D3D_BOX 0,0,screen width(),screen height()
d#=0.88
r=15
inc n
if n>2
   n=0
  CircleThund(screen width()/4,screen height()/2,100,d#,r)    
  CircleThund2(screen width()/2,screen height()/2,100,d#,r)  
  CircleThund3(screen width()-250,screen height()/2,100,d#,r)  
endif
d3d_circle screen width()/2,screen height()/2,100,0
d3d_circle screen width()/4,screen height()/2,100,0
d3d_circle screen width()-250,screen height()/2,100,0
fastsync

while spacekey()=1:wait 5:endwhile
loop

Function CircleThund(x,y,Radius,d#,r)
 fractal_line(x,y-radius,x,y,0.3,d#,r)
 fractal_line(x,y+radius,x,y,0.3,d#,r)
 fractal_line(x+radius,y,x,y,0.3,d#,r)
 fractal_line(x-radius,y,x,y,0.3,d#,r) 
 fractal_line(x-(radius-30),y-(radius-30),x,y,0.3,d#,r)
 fractal_line(x+(radius-30),y+(radius-30),x,y,0.3,d#,r)
 fractal_line(x+(radius-30),y-(radius-30),x,y,0.3,d#,r)
 fractal_line(x-(radius-30),y+(radius-30),x,y,0.3,d#,r)
Endfunction

Function CircleThund2(x,y,Radius,d#,r)
 fractal_line(x,y-radius,x,y,0.3,d#,r)
 fractal_line(x,y-radius,x-(radius-30),y-(radius-30),0.3,d#,r)
 fractal_line(x,y+radius,x,y,0.3,d#,r)
 fractal_line(x,y+radius,x+(radius-30),y+(radius-30),0.3,d#,r)
 fractal_line(x+radius,y,x,y,0.3,d#,r)
 fractal_line(x+radius,y,x+(radius-30),y-(radius-30),0.3,d#,r)
 fractal_line(x-radius,y,x,y,0.3,d#,r) 
 fractal_line(x-radius,y,x-(radius-30),y+(radius-30),0.3,d#,r) 
 fractal_line(x-(radius-30),y-(radius-30),x,y,0.3,d#,r)
 fractal_line(x-(radius-30),y-(radius-30),x-radius,y,0.3,d#,r)
 fractal_line(x+(radius-30),y+(radius-30),x,y,0.3,d#,r)
 fractal_line(x+(radius-30),y+(radius-30),x+radius,y,0.3,d#,r)
 fractal_line(x+(radius-30),y-(radius-30),x,y,0.3,d#,r)
 fractal_line(x+(radius-30),y-(radius-30),x,y-radius,0.3,d#,r)
 fractal_line(x-(radius-30),y+(radius-30),x,y,0.3,d#,r)
 fractal_line(x-(radius-30),y+(radius-30),x,y+radius,0.3,d#,r) 
Endfunction

Function CircleThund3(x,y,Radius,d#,r)
 fractal_line(x,y-radius,x-(radius-30),y-(radius-30),0.3,d#,r)
 fractal_line(x,y+radius,x+(radius-30),y+(radius-30),0.3,d#,r)
 fractal_line(x+radius,y,x+(radius-30),y-(radius-30),0.3,d#,r)
 fractal_line(x-radius,y,x-(radius-30),y+(radius-30),0.3,d#,r) 
 fractal_line(x-(radius-30),y-(radius-30),x-radius,y,0.3,d#,r)
 fractal_line(x+(radius-30),y+(radius-30),x+radius,y,0.3,d#,r)
 fractal_line(x+(radius-30),y-(radius-30),x,y-radius,0.3,d#,r)
 fractal_line(x-(radius-30),y+(radius-30),x,y+radius,0.3,d#,r) 
Endfunction

function fractal_line(x1#,y1#,x2#,y2#,k#,d#,r)
   dx#=x2#-x1#
   dy#=y2#-y1#
   if r<=0 or (dx#^2+dy#^2)<900
      w=3
      for s=2 to 1 step -1
         D3D_COLOR 255,255,255,255.0/(s+1)^2
         for x=-s*w+w-1 to s*w-w+1
            for y=-s*w+w-1 to s*w-w+1
               D3D_LINE x1#+x,y1#+y,x2#+x,y2#+y
            next y
         next x
      next s
      exitfunction
   endif
   mx#=(x1#+x2#)/2
   my#=(y1#+y2#)/2
   nx#=-dy#
   ny#=dx#
   repeat
      m#=randf(-k#,k#)
      x3#=mx#+nx#*m#
      y3#=my#+ny#*m#
   until x3#>0 and x3#<screen width() and y3#>0 and y3#<screen height()
   fractal_line(x1#,y1#,x3#,y3#,k#*d#,d#,r-1)
   fractal_line(x2#,y2#,x3#,y3#,k#*d#,d#,r-1)
endfunction

function randf(min#,max#)
   d#=max#-min#
   x#=rnd(d#*10000)/10000.0+min#
endfunction x#

[center]

Sorry your browser is not supported!

Code Snippets / [DBP] 2D Lightning Function

Attachments