13 lines
268 B
Haskell
13 lines
268 B
Haskell
module Dodge.Tesla where
|
|
import Dodge.Data
|
|
import Dodge.Beam
|
|
|
|
teslaParams :: ItemParams
|
|
teslaParams = Arcing
|
|
{ _currentArc = Nothing
|
|
, _arcSize = 20
|
|
, _arcNumber = 10
|
|
, _newArcStep = defaultArcStep
|
|
, _previousArcEffect = NoPreviousArcEffect
|
|
}
|