; CreateJsonNull Example
; ----------------------
; Requires Extended mode.

; JSON null is a real value with a real (positive) handle -
; not the zero that signals a failed parse or lookup.
empty_slot=CreateJsonNull()

Print "Handle for JSON null: "+empty_slot+" (positive, not zero)"
Print "JsonIsNull says:      "+JsonIsNull(empty_slot)
Print "Kind is JSON_NULL:    "+(JsonKind(empty_slot)=JSON_NULL)
Print ""

; A save-game can use null for an unclaimed equipment slot
save=CreateJsonObject()
JsonObjectSet save,"ring_slot",empty_slot
Print "In a save file: "+JsonStringify(save,0)

FreeJson save
FreeJson empty_slot

Print ""
Print "Press any key to close the example"
WaitKey

End