chore: initial commit of foundryvtt-admin

Spun out of the hbm-books working folder into its own repo. A small
backend+frontend+COBOL admin tool for managing Foundry VTT worlds
(socket inspection, join/shutdown debugging).
This commit is contained in:
2026-08-17 21:46:42 +02:00
commit 460d136d21
28 changed files with 2494 additions and 0 deletions
+26
View File
@@ -0,0 +1,26 @@
IDENTIFICATION DIVISION.
PROGRAM-ID. HBM-ADMIN.
*
DATA DIVISION.
WORKING-STORAGE SECTION.
01 URL-STRING PIC X(100)
VALUE "http://backend:3000/api/actors/update".
01 JSON-PAYLOAD PIC X(200).
01 RESULT-CODE PIC S9(9) BINARY.
*
PROCEDURE DIVISION.
MAIN-LOGIC.
MOVE "Gimli" TO JSON-PAYLOAD.
DISPLAY "Calling API for: " JSON-PAYLOAD.
CALL "send_actor_update" USING BY REFERENCE URL-STRING
BY REFERENCE JSON-PAYLOAD
RETURNING RESULT-CODE.
IF RESULT-CODE = 1
DISPLAY "Update successful!"
ELSE
DISPLAY "Update failed."
END-IF.
STOP RUN.