Map Editable

Module — 2 files

These files compile together (same module folder).

file_1.verse

using { /Verse.org/Simulation }

map_key<public> := interface:
    GetKey<public>()<transacts>:comparable

map_value<public> := interface:

DefaultMapKey := string_map_key
DefaultMapValue := int_map_value

string_map_key<public> := class<concrete>(map_key):
    @editable
    Key<public> : string = ""

    GetKey<override>()<transacts>:comparable=return Key

int_map_value<public> := class<concrete>(map_value):
    @editable
    Value<public> : int = 0

editable_map_item<public> := class<concrete>:
    @editable
    Key<public> : map_key = DefaultMapKey{}
    @editable
    Value<public> : map_value = DefaultMapValue{}

editable_map<public> := class<concrete>:
    @editable
    Items<public> : []editable_map_item = array{}

    Find<public>(MapKey : map_key)<transacts><decides>:map_value=
        var ReturnMapValue : ?map_value = false

        for(Item : Items, not ReturnMapValue?, Item.Key.GetKey() = MapKey.GetKey()):
            set ReturnMapValue = option{Item.Value}

        return ReturnMapValue?

example_manager_device.verse

using { /Fortnite.com/Devices }
using { /Verse.org/Simulation }
using { Editables } #map_editable.verse module


example_manager_device := class(creative_device):
    @editable
    EditableMap<public> : editable_map = editable_map{}

    OnBegin<override>()<suspends>:void=
        Map : editable_map = editable_map:
            Items := array:
                editable_map_item:
                    Key := string_map_key{Key := "Test1"}
                    Value := int_map_value{Value := 0}

                editable_map_item:
                    Key := string_map_key{Key := "GameManager"}
                    Value := int_map_value{Value := 0}

        if(Map.Find[string_map_key{Key := "Test2"}]):
            Print("Found Test2")
        else:
            Print("Not Found Test2")

        if(Map.Find[string_map_key{Key := "GameManager"}]):
            Print("Found GameManager")
        else:
            Print("Not Found GameManager")

        if(EditableMap.Find[string_map_key{Key := "Test"}]):
            Print("Found Test")
        else:
            Print("Not Found Test")

Copy-paste each file above is always free.

Map Editable

Comments