Exceptions: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) m (→{{header|BQN }}: fix markup) |
(Applesoft BASIC) |
||
| Line 442: | Line 442: | ||
'''error''' |
'''error''' |
||
<syntaxhighlight lang="applescript">error "Error message." number 2000</syntaxhighlight> |
<syntaxhighlight lang="applescript">error "Error message." number 2000</syntaxhighlight> |
||
=={{header|Applesoft BASIC}}== |
|||
<syntaxhighlight lang="gwbasic"> 100 REM TRY |
|||
110 ONERR GOTO 160"CATCH |
|||
120 PRINT 1E99 |
|||
130 POKE 216,0 |
|||
140 PRINT "NEVER REACHED." |
|||
150 GOTO 200"END TRY |
|||
160 REM CATCH |
|||
170 POKE 216,0 |
|||
180 LET E = PEEK (222) |
|||
190 PRINT "ERROR "E" OCCURRED." |
|||
200 REM END TRY</syntaxhighlight> |
|||
{{out}} |
|||
<pre>ERROR 133 OCCURRED. |
|||
</pre> |
|||
=={{header|AutoHotkey}}== |
=={{header|AutoHotkey}}== |
||
=== True exceptions === |
=== True exceptions === |
||