Narcissist: Difference between revisions
Added AppleScript.
(Added Wren) |
(Added AppleScript.) |
||
Line 29:
<lang algol68>STRINGs="STRINGs="";print(readstring=2*s[:9]+2*s[9:])";print(readstring=2*s[:9]+2*s[9:])</lang>
Output: T or F depending on input.
=={{header|AppleScript}}==
As long as the script hasn't been exported as run-only (''ie.'' without its source code):
<lang applescript>(display dialog "" default answer "")'s text returned = (do shell script ("osadecompile " & (path to me)'s POSIX path's quoted form))</lang>
{{output}}
Depending on the text entered and button clicked, one of:
<lang applescript>true
false
error "User cancelled." number -128</lang>
=={{header|AutoHotkey}}==
| |||