commit 6a79311bd9a16c700672fb6bb4f1d946f181cb6d Author: cuu Date: Sun Dec 15 16:12:09 2019 +0800 first diff --git a/gameshell-19q1/AGENT OF SHINIGAMI/.game b/gameshell-19q1/AGENT OF SHINIGAMI/.game new file mode 100644 index 0000000..89f76d0 --- /dev/null +++ b/gameshell-19q1/AGENT OF SHINIGAMI/.game @@ -0,0 +1 @@ +launcher \ No newline at end of file diff --git a/gameshell-19q1/AGENT OF SHINIGAMI/file/AGENT OF SHINIGAMI.tar.gz b/gameshell-19q1/AGENT OF SHINIGAMI/file/AGENT OF SHINIGAMI.tar.gz new file mode 100644 index 0000000..18ec3e2 Binary files /dev/null and b/gameshell-19q1/AGENT OF SHINIGAMI/file/AGENT OF SHINIGAMI.tar.gz differ diff --git a/gameshell-19q1/AGENT OF SHINIGAMI/shots/AGENT OF SHINIGAMI.png b/gameshell-19q1/AGENT OF SHINIGAMI/shots/AGENT OF SHINIGAMI.png new file mode 100644 index 0000000..fddb7f6 Binary files /dev/null and b/gameshell-19q1/AGENT OF SHINIGAMI/shots/AGENT OF SHINIGAMI.png differ diff --git a/gameshell-19q1/quantum_shooter/.game b/gameshell-19q1/quantum_shooter/.game new file mode 100644 index 0000000..25ffaa9 --- /dev/null +++ b/gameshell-19q1/quantum_shooter/.game @@ -0,0 +1 @@ +pico8 \ No newline at end of file diff --git a/gameshell-19q1/quantum_shooter/file/quantum_shooter.p8.png b/gameshell-19q1/quantum_shooter/file/quantum_shooter.p8.png new file mode 100644 index 0000000..280edde Binary files /dev/null and b/gameshell-19q1/quantum_shooter/file/quantum_shooter.p8.png differ diff --git a/gameshell-19q1/quantum_shooter/shots/quantum_shooter.png b/gameshell-19q1/quantum_shooter/shots/quantum_shooter.png new file mode 100644 index 0000000..533332e Binary files /dev/null and b/gameshell-19q1/quantum_shooter/shots/quantum_shooter.png differ diff --git a/generate_game_index.lsp b/generate_game_index.lsp new file mode 100755 index 0000000..537272d --- /dev/null +++ b/generate_game_index.lsp @@ -0,0 +1,56 @@ +#!/usr/bin/env newlisp +(module "util.lsp") +(module "getopts.lsp") +(module "json.lsp") + +(shortopt "d" (setq gamefolder getopts:arg) "" "game folder") +(shortopt "?" (getopts:usage) nil "Print this help message") + +(getopts (2 (main-args))); parse getopt + +(if (or (nil? gamefolder) (= gamefolder "")) + (begin + (getopts:usage) + (exit) + ) +) + +(setq files (directory gamefolder)) + +(setq res (list )) + +(dolist (x files) + (if (and (not (starts-with x ".")) (directory? (string gamefolder "/" x ))) + (begin + (setq gametype (read-file (string gamefolder "/" x "/.game"))) + ;(println gametype) + (if (not (nil? gametype)) + (begin + (setq item_list '()) + (setq _file (exec (string "raw.github.lsp " gamefolder "/'" x "'/file/*"))) + (setq _shots (exec (string "raw.github.lsp " gamefolder "/'" x "'/shots/*"))) + + (setq item_list (list (list "title" x) (list "type" gametype))) + + (if (= (length _file) 1) + (push (list "file" (nth 0 _file)) item_list) + (push (list "file" _file) item_list) + ) + (if (= (length _shots) 1) + (push (list "shots" (nth 0 _shots)) item_list) + (push (list "shots" _shots) item_list) + ) + ;(println item_list) + (reverse item_list) + (push item_list res) + ) + ) + ) + ) +) + +(set 'indexjson:list res) +(println (Json:Lisp->Json indexjson)) + + +(exit) diff --git a/index.json b/index.json new file mode 100644 index 0000000..1e3f891 --- /dev/null +++ b/index.json @@ -0,0 +1,3 @@ +{ + "list":[{"title":"[gameshell-19q1]","file":"https://raw.githubusercontent.com/clockworkpi/warehouse/master/gameshell-19q1/index.json","type":"dir"}] +}