dialog-ide 0.5.0

package/bin/dialog-lib/stddebug.dg

@@ -0,0 +1,112 @@
+
+(extension version) Debugging extension 1.2.2-dev.
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% Informative actions
+
+(understand command [scope])
+(perform [scope])
+	(scope)
+
+(understand command [allrooms])
+(perform [allrooms])
+	All rooms: (line)
+	(exhaust) {
+		*(room $Room)
+		$Room: (The $Room)
+		(if) ($Room is visited) (then) \(visited\) (endif)
+		(line)
+	}
+
+(understand command [meminfo])
+(perform [meminfo])
+	(display memory statistics)
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% Manipulative actions
+
+(understand [teleport | $Words] as [teleport $Room])
+	(determine object $Room)
+		*(room $Room)
+	(from words)
+		*(dict $Room)
+	(matching all of $Words)
+
+(describe action [teleport $Room])
+	teleport to (the full $Room)
+
+~(refuse [teleport $])
+
+(perform [teleport $Room])
+	(inhibit next tick)
+	(enter $Room)
+
+(understand [purloin | $Words] as [purloin $Obj])
+	(determine object $Obj)
+		*(item $Obj)
+	(from words)
+		*(dict $Obj)
+	(matching all of $Words)
+
+~(refuse [purloin $])
+
+(perform [purloin $Obj])
+	(inhibit next tick)
+	(current player $Player)
+	(now) ($Obj is #heldby $Player)
+	(now) ($Obj is handled)
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% Action tracing
+
+(understand command [actions on])
+(perform [actions on])
+	(actions on)
+
+(understand command [actions off])
+(perform [actions off])
+	(actions off)
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% License and copyright notice
+%% Copyright 2018-2026 Linus Åkesson and the Dialog Project contributors
+%%
+%% Redistribution and use in source and binary forms, with or without
+%% modification, are permitted provided that the following conditions are met:
+%%
+%%  1. Redistributions of source code must retain the above copyright
+%%      notice, this list of conditions and the following disclaimer.
+%%
+%%  2. Redistributions in binary form must reproduce the above copyright
+%%     notice, this list of conditions and the following disclaimer in the
+%%     documentation and/or other materials provided with the distribution.
+%%
+%%     THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
+%%     IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
+%%     TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
+%%     PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
+%%     HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+%%     SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
+%%     LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+%%     DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+%%     THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+%%     (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+%%     OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+%%
+%% This license is intended to apply to the Dialog compiler and debugger and
+%% the source code of the standard libraries. Any time those components are
+%% distributed, this copyright notice should be attached. But it is not meant
+%% to limit what the compiler's output can be used for, even for projects that
+%% include the standard libraries. To make this explicit, the project is ALSO
+%% released under a modified two-clause BSD license, which is exactly the same
+%% as the above but adds this exception:
+%%
+%%     As an exception, if, as a result of you compiling your source code,
+%%     portions of this software are embedded into compiler output in binary
+%%     form, you may redistribute such embedded portions without complying
+%%     with condition 2 of the license.
+%%
+%% In other words, you can distribute the Z-machine and Å-machine bytecode that
+%% the compiler produces in any way you like, without needing to include this
+%% license file or comply with the attribution requirements (for the library
+%% or for the Z-machine runtime routines).