Details |
Last modification |
View Log
| RSS feed
Rev |
Author |
Line No. |
Line |
2 |
daniel-mar |
1 |
rem Level einlesen |
|
|
2 |
remstart |
|
|
3 |
open to read 1, "zone\lev001.map" |
|
|
4 |
while file end(1) = 0 |
|
|
5 |
read string 1, eingelesen$ |
|
|
6 |
rem Baum |
|
|
7 |
if eingelesen$ = "Tree" |
|
|
8 |
rem Nix |
|
|
9 |
endif |
|
|
10 |
endwhile |
|
|
11 |
close file 1 |
|
|
12 |
remend |