2020-08-24 20:27:02 +00:00
|
|
|
package com.htmlism.mos6502.dsl
|
|
|
|
|
package snake
|
|
|
|
|
|
|
|
|
|
import cats.data.NonEmptyList
|
|
|
|
|
|
2022-02-14 23:11:45 +00:00
|
|
|
object Direction:
|
2023-06-19 09:33:38 +00:00
|
|
|
given directionBitField: BitField[Direction] =
|
2022-09-07 15:21:22 +00:00
|
|
|
new BitField[Direction]:
|
2020-08-26 05:35:37 +00:00
|
|
|
def definitionGroupComment: String =
|
|
|
|
|
"Directions"
|
2020-08-24 20:27:02 +00:00
|
|
|
|
|
|
|
|
def all: NonEmptyList[Direction] =
|
|
|
|
|
NonEmptyList.of(Up, Down, Left, Right)
|
|
|
|
|
|
|
|
|
|
def label(x: Direction): String =
|
|
|
|
|
"moving" + x.toString
|
|
|
|
|
|
|
|
|
|
sealed trait Direction
|
|
|
|
|
|
2022-12-02 01:44:59 +00:00
|
|
|
case object Up extends Direction
|
|
|
|
|
case object Down extends Direction
|
|
|
|
|
case object Left extends Direction
|
2020-08-24 20:27:02 +00:00
|
|
|
case object Right extends Direction
|
