SHOW:
|
|
- or go back to the newest paste.
| 1 | - | //scr_txt_read |
| 1 | + | //scr_txt_read |
| 2 | - | //read from text file with random number |
| 2 | + | //read from text file with random number |
| 3 | - | exedir=working_directory |
| 3 | + | exedir=working_directory; |
| 4 | - | puzzledir=string("puzzle") |
| 4 | + | puzzlefile=string(irandom_range(1,2)) + ".txt"; |
| 5 | - | puzzlefile = file_text_open_read(string(irandom_range(1,2)) + ".txt"); |
| 5 | + | puzzledir=string(exedir)+"\puzzle\"+string(puzzlefile); |
| 6 | - | puzzleopen=string(exedir)+"\"+string(puzzledir)+"\"+string(puzzlefile); |
| 6 | + | puzzleopen = file_text_open_read(puzzledir); |
| 7 | - | //setting initial line for array_read |
| 7 | + | //setting initial line for array_read |
| 8 | - | vblock = 1 |
| 8 | + | vblock = 1 |
| 9 | - | hblock = 1 |
| 9 | + | hblock = 1 |
| 10 | - | // |
| 10 | + | // |
| 11 | - | do |
| 11 | + | do |
| 12 | - | {array_read[vblock]=file_text_read_real(puzzleopen) |
| 12 | + | {array_read[vblock]=file_text_read_real(puzzleopen)
|
| 13 | - | vblock +=1 |
| 13 | + | vblock +=1 |
| 14 | - | file_text_readln(puzzleopen); |
| 14 | + | file_text_readln(puzzleopen); |
| 15 | - | } until(file_text_eof(puzzleopen)); |
| 15 | + | } until(file_text_eof(puzzleopen)); |
| 16 | - | file_text_close(puzzlefile); |
| 16 | + | file_text_close(puzzlefile); |
| 17 | - | global.array_grid[hblock,vblock] = string_char_at(hblock,array_read[vblock]) |
| 17 | + | global.array_grid[hblock,vblock] = string_char_at(hblock,array_read[vblock]) |
| 18 | - | |
| 18 | + | |
| 19 | - | //obj_mouse step |
| 19 | + | //obj_mouse step |
| 20 | - | x=mouse_x |
| 20 | + | x=mouse_x |
| 21 | - | y=mouse_y |
| 21 | + | y=mouse_y |
| 22 | - | move_snap(16,16) |
| 22 | + | move_snap(16,16) |
| 23 | - | if y<16 {depth = -5} |
| 23 | + | if y<16 {depth = -5}
|
| 24 | - | else {depth = 0} |
| 24 | + | else {depth = 0}
|
| 25 | - | |
| 25 | + | |
| 26 | - | //obj_mouse global left mouse pressed |
| 26 | + | //obj_mouse global left mouse pressed |
| 27 | if y>=16 instance_create(x,y,obj_num_disp) else {} |