September 2017 Update
This commit is contained in:
parent
bba7bfd280
commit
ba8067c3b7
14570 changed files with 153136 additions and 63871 deletions
|
|
@ -1,22 +0,0 @@
|
|||
0 REM GOTO
|
||||
100 GOTO 110 : REM JUMP TO A SPECIFIC LINE
|
||||
110 RUN 120 : REM START THE PROGRAM RUNNING FROM A SPECIFIC LINE
|
||||
120 IF 1 GOTO 130 : REM CONDITIONAL JUMP
|
||||
130 IF 1 THEN 140 : REM THEN ALSO WORKS IN PLACE OF GOTO
|
||||
140 IF 1 THEN GOTO 150 : REM BE VERBOSE BY USING THEN GOTO
|
||||
150 ON A GOTO 170, 180, 190 : REM JUMP A SPECIFIC LINE NUMBER IN THE LIST INDEXED BY THE VALUE OF A STARTING AT 1, IF A IS OUT OF RANGE DO NOT JUMP
|
||||
160 ON ERR GOTO 270 : REM WHEN AN ERROR OCCURS JUMP TO A SPECIFIC LINE
|
||||
170 GOSUB 180 : REM JUMP TO LINE 180, PUSHING THE CURRENT PLACE ON THE STACK
|
||||
180 POP : REM POP THE CURRENT PLACE FROM THE STACK, EFFECTIVELY MAKING THE PREVIOUS LINE A JUMP
|
||||
190 CALL -151 : REM CALL ANY MACHINE LANGUAGE SUBROUTINE, IT MIGHT RETURN, IT MIGHT NOT
|
||||
200 & : REM CALL THE USER-DEFINED AMPERSAND ROUTINE, IT MIGHT RETURN, IT MIGHT NOT
|
||||
210 ? USR(0) : REM CALL THE USER-DEFINED FUNCTION, IT MIGHT RETURN, IT MIGHT NOT
|
||||
220 S = 6 : ?CHR$(4)"PR#"S : REM CALL THE ROM ROUTINE IN SLOT S
|
||||
230 S = 6 : ?CHR$(4)"IN#"S : REM CALL THE ROM ROUTINE IN SLOT S
|
||||
240 ?CHR$(4)"RUN PROGRAM" : REM RUN A BASIC PROGRAM FROM DISK
|
||||
250 ?CHR$(4)"BRUN BINARY PROGRAM": REM RUN A MACHINE LANGUAGE BINARY PROGRAM FROM DISK
|
||||
260 ?CHR$(4)"EXEC PROGRAM.EX" : REM EXECUTE THE TEXT THAT IS CONTAINED IN THE FILE PROGRAM.EX
|
||||
270 RESUME : REM JUMP BACK TO THE STATEMENT THAT CAUSED THE ERROR
|
||||
280 STOP : REM BREAK THE PROGRAM
|
||||
290 END : REM END THE PROGRAM
|
||||
300 GOTO : REM NO LINE NUMBER, JUMPS TO LINE 0
|
||||
|
|
@ -1 +0,0 @@
|
|||
CONT : REM CONTINUE, JUMP BACK TO WHERE THE PROGRAM STOPPED
|
||||
16
Task/Jump-anywhere/Kotlin/jump-anywhere.kotlin
Normal file
16
Task/Jump-anywhere/Kotlin/jump-anywhere.kotlin
Normal file
|
|
@ -0,0 +1,16 @@
|
|||
// version 1.0.6
|
||||
|
||||
fun main(args: Array<String>) {
|
||||
intArrayOf(4, 5, 6).forEach lambda@ {
|
||||
if (it == 5) return@lambda
|
||||
println(it)
|
||||
}
|
||||
println()
|
||||
loop@ for (i in 0 .. 3) {
|
||||
for (j in 0 .. 3) {
|
||||
if (i + j == 4) continue@loop
|
||||
if (i + j == 5) break@loop
|
||||
println(i + j)
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -1,13 +0,0 @@
|
|||
# Example 2: Restarting a loop:
|
||||
from goto import goto, label
|
||||
label .start
|
||||
for i in range(1, 4):
|
||||
print i
|
||||
if i == 2:
|
||||
try:
|
||||
output = message
|
||||
except NameError:
|
||||
print "Oops - forgot to define 'message'! Start again."
|
||||
message = "Hello world"
|
||||
goto .start
|
||||
print output, "\n"
|
||||
|
|
@ -1 +0,0 @@
|
|||
: foo 19 jump: 1+ 21 ;
|
||||
|
|
@ -1,20 +0,0 @@
|
|||
for i = 1 to 10
|
||||
if i = 5 then goto [label5]
|
||||
next i
|
||||
end
|
||||
|
||||
[label5]
|
||||
print i
|
||||
while i < 10
|
||||
if i = 6 then goto [label6]
|
||||
i = i + 1
|
||||
wend
|
||||
end
|
||||
|
||||
[label6]
|
||||
print i
|
||||
if i = 6 then goto [finish]
|
||||
print "Why am I here"
|
||||
|
||||
[finish]
|
||||
print "done"
|
||||
3
Task/Jump-anywhere/SPL/jump-anywhere-1.spl
Normal file
3
Task/Jump-anywhere/SPL/jump-anywhere-1.spl
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
myLabel ->
|
||||
...
|
||||
:myLabel
|
||||
3
Task/Jump-anywhere/SPL/jump-anywhere-2.spl
Normal file
3
Task/Jump-anywhere/SPL/jump-anywhere-2.spl
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
4 -> a=0
|
||||
...
|
||||
:4
|
||||
5
Task/Jump-anywhere/SPL/jump-anywhere-3.spl
Normal file
5
Task/Jump-anywhere/SPL/jump-anywhere-3.spl
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
label 55 <->
|
||||
#.output("1")
|
||||
:label 55
|
||||
#.output("2")
|
||||
<-
|
||||
Loading…
Add table
Add a link
Reference in a new issue