BaselScript Interpreter

---------------------------------------------------------------

// 1. select a language

// 2. select a word with description from the file word_XXX (XXX= language)

// the choice is made taking into account already guessed words

// 3. input a character and checking for its occurrence in a word

----------------------------------------------------------------

scene=1 name="select language"

section init

if #_orientation == portrait && $unit()==windows

set orient = landscape

call script=words

endif

call menu=start

end

menu start

tile=item text=english section=eng

tile=item text=deutsch section=ger

tile=item text=< section=back

end

---------------------------------------------

section ger

#language=GER; #won_text ="GRATULATION!"; #lose_text ="Verloren..."; #next_text ="WEITER"; #exit_text ="EXIT"; #attempts="Versuche: "

#scene_name_4="Rate das Wort "; #game_mode="Von vorne beginnen?"; #yes="ja"; #no="nein"

// characters pc-layout

#line1=$upper("qwertzuiopü") ; #line2=$upper("asdfghjklöä") ; #line3=$upper("yxcvbnmß"); #file_solved_words ="solved_words_GER"

call scene=3a

end section

------------------------------------------------

section eng

#language=ENG; #won_text ="CONGRULATIONS!"; #lose_text ="LOSE..."; #next_text ="CONTINUE"; #exit_text ="EXIT"

#attempts="Attempts: "; #scene_name_4="guess the word"; #game_mode="Start over?"; #yes="yes": #no="no"

// characters pc-layout

#line1=$upper("qwertyuiop"); #line2=$upper("asdfghjkl"); #line3=$upper("zxcvbnm"); #file_solved_words ="solved_words_ENG"

call scene=3a

end section

section back

call script= 13_0_games

end scene

---------------------------------------------------------------------------

scene=3a name="setting"

---------------------------------------------------------------------------

section init

call dialog=dia

end section

dialog dia

tile=title text=#game_mode

tile=button text=#yes section=yes

tile=button text=#no scene=3b

end dialog

section yes

delete file=#file_solved_words directory=#_directory_temp

call scene=3b

end section

end scene

---------------------------------------------------------------------------

scene=3b name="guess the word"

---------------------------------------------------------------------------

section init

// RESTORE SOLVED WORDS IN ARRAY #solved_words_array

file name=#file_solved_words record=(#solved_words) directory=#_directory_temp

if $file.exist_file(#_directory_temp,#file_solved_words )==0

// create empty array for solved words

array name=#solved_words_array[1]

else

// read solved words from the file and create array with solved words

read file=#file_solved_words

// after read created array #solved_words_array[]

#counter_solved= #_counter_of_records

endif

// file with all words (word_ENG or word_GER or word_RUS)

#file=$concate("word_",#language)

// file description

file name=#file record=(#word,#group)

// read into memory and create arrays #word_array and #group_array

read file=#file directory=#_directory_files_examples

call scene=4

end

end scene 3

================================================================

scene=4 name= #scene_name_4

================================================================

section init

#won=0

#try_counter=0

clear form=1

#found_unsolved=0

// search random from #word_array

for #i=0 step=1 to=1000 section= search_unsolved

// not found , repeat

if #found_unsolved==0

call scene=1

endif

// group ( used as help)

#help=$upper(#group_array[#index])

// word length

#L=$length(#w)

#MAX=$math.truncate(#L+#L/4)

// create array from word #w

// 1. split string #w

#string_with_coma=$split_to_string(#w,",")

// e.g. BONN -> B,O,N,N

// 2. create array

array name=#array_source[#L] value=#string_with_coma

// create empty array for solution

// we will fill it later with found letters

array name=#array_solution[#L] value=" "

// create line with word help

create tile=text x=80 y=190 text=#help size=35 w=1100 h=120 // 160

// create line with try counter

create tile=text name= try x=80 y=20 text=$concate(#attempts+#try_counter+~slash + #MAX) size=35 color=#444444

// create layout

for #index=0 step=1 to=$length(#line1) section=line1 // 1 line

for #index=0 step=1 to=$length(#line2) section=line2 // 2 line

for #index=0 step=1 to=$length(#line3) section=line3 // 3 line

// create empty cells to solve

for #index=0 step=1 to=#L section=b

draw form=1

end

-------------------------------------------

section search_unsolved

#index=$math.random(0, #_counter_of_records)

#w=$lower(#word_array[#index])

if $array.contains(#solved_words_array, #w)==0

#found_unsolved=1

#w=$upper(#word_array[#index])

stop loop

endif

end

// create 1 line of keyboard

section line1

#s=$substr(#line1,#index,1)

create tile=button name=#s x=80+100*#index y=400 text=#s w=88 h=88 size=36 section= pressed

end section

// create 2 line of keyboard

section line2

#s=$substr(#line2,#index,1)

create tile=button name=#s x=80+100*#index y=500 text=#s w=88 h=88 size=36 section= pressed

end section

// create 3 line of keyboard

section line3

#s=$substr(#line3,#index,1)

create tile=button name=#s x=80+100*#index y=600 text=#s w=88 h=88 size=36 section= pressed

end section

// create empty place holder for output solution

section b

create tile=button name=$concate("b"+#index) x=80+90*#index y=256 text="" w=88 h=88 size=40 bgcolor=white color=black

end section

------------------------------

// one character entered !

------------------------------

section pressed

if #won != 0 // won or lose are done

return

endif

// all attempts completed ?

if #try_counter >= #MAX

// create line "LOSE..."

create tile=text x=80 y=94 text= #lose_text size=48 h=120 color=black weight=bold

#won=-1

// create buttons

create tile=button x=600 y=100 text=#next_text w=260 name=next section=next size=30

create tile=button x=900 y=100 text=#exit_text w=260 name=exit section=exit size=30

endif

// the entered character is taken from the text of the pressed button

#character=#_selected_button_text

// convert input character to upper register

#character=$upper(#character)

// character contains in the word ?

if $string.contains(#w,#character)==0

#try_counter++ // add try counter

set name=try text=$concate(#attempts+#try_counter+~slash+#MAX) form=1

draw form=1

return

endif

// put character in array_solution

for #index=0 step=1 to=#L section=test_entered symbol

// all characters was guessed?

if $array.arrays_are_equell( #array_source, #array_solution,#L) == 1

// create line "WON!"

create tile=text x=80 y=100 text= #won_text size=48 h=120 color=red weight=bold

#won=1

// create buttons next and exit

create tile=button x=600 y=100 text=#next_text w=260 name=next size=30 scene=4

create tile=button x=900 y=100 text=#exit_text w=260 name=exit size=30 script= 13_0_games

// save in array in lower register

#word=$lower(#w)

#res=$array.add(#solved_words_array, #word)

// writing all guessed words for the selected language to a file solved_words_XXX

save file=#file_solved_words directory=#_directory_temp mode=from_fields_arrays

endif

// draw all lines

draw form=1

end section

------------------------------------------------------

section test_entered symbol

------------------------------------------------------

// select a next character from the word

#character_from_word=$substr(#w,#index,1)

// comparison of the entered symbol with the character from the word

if #character == #character_from_word

// put the character in the solution string

set name=$concate("b"+#index) text= #character form=1

// put the character in the solution array

#array_solution[#index]=#character

endif

end section

------------------------------

section back

call scene=1

end

end scene

LIST OF EXAMPLES

1. 000_templates

2. 000_template_dialog_buttons

3. 000_template_dialog_input_name_pass

4. 000_template_dialog_input_number

5. 000_template_dialog_message

6. 000_template_list

7. 000_template_list_from_directory

8. 000_template_menu

9. 000_template_menu_from_array

10. 000_template_menu_from_file

11. 000_template_menu_simple

12. 01_0_notes

13. 01_1_add_notes

14. 01_2_selectall_notes

15. 01_2_select_all_notes

16. 01_3_select_theme_notes

17. 01_4_edit_note

18. 01_5_edit_or_delete_note

19. 02_0_work_with_person

20. 03_0_directory

21. 03_10_directory_list

22. 03_10_show_directory

23. 03_11_copy_from_directory

24. 03_1_create_directory

25. 03_2_delete_directory

26. 03_3_copy_script_from_download

27. 03_4_list_screenshots

28. 03_5_list_cameras

29. 03_6_list_images

30. 03_7_list_icons

31. 03_8_list_flags

32. 03_9_copy_from_whatsapp

33. 04_0_server_and_web

34. 04_1_download_image

35. 04_2_download_music_files

36. 04_3_download_flags

37. 04_4_download_csv_stream

38. 04_6_my_links

39. 04_7_run_program

40. 05_002_draw_graphic

41. 05_003_draw_graphic

42. 05_004_draw_graphic

43. 05_00_draw_graphic

44. 05_01_draw_image

45. 05_02_draw_lines_and_points

46. 05_03_draw_chart

47. 05_04_draw_chart_lines

48. 05_05_draw_text

49. 05_06_draw_polygon

50. 05_07_draw_pendel

51. 05_08_draw_random_circle

52. 05_11_draw_circle

53. 05_12_draw_ellipse

54. 05_13_draw_rect

55. 05_14_draw_rotate

56. 05_14_finger_painting

57. 05_15_draw

58. 05_17_moving_circles

59. 05_18_draw_spiral

60. 05_19_draw_lights

61. 05_20_draw_chart_3columns

62. 05_21_draw_chart3

63. 05_21_draw_chart_points

64. 05_22_draw_color_bar

65. 05_23_pop_up_balls

66. 05_25_move_rect

67. 05_26_draw_arc

68. 05_26_draw_axes

69. 05_26_draw_sector

70. 05_26_draw_segment

71. 06_1_primitive_circle

72. 06_2_primitive_dialog

73. 06_3_primitive_loop

74. 06_4_primitive_menu

75. 06_5_primitive_multiline

76. 06_6_primitive_timer

77. 06_7_primitive_message

78. 06_8_primitive_form

79. 06_9_primitive_hello

80. 07_0_google_map

81. 07_1_show_map_dialog

82. 07_2_search_on_map_dialog

83. 07_3_navi_dialog

84. 07_4_navi_from_file

85. 07_5_map_street

86. 07_6_show_kml

87. 07_7_show_my_place

88. 08_0_form_tiles

89. 08_0_form_tiles_landscape

90. 08_10_tile_rect

91. 08_1_tile_button

92. 08_1_tile_button_landscape

93. 08_2_tile_text

94. 08_3_tile_image

95. 08_4_tile_radiobutton

96. 08_5_tile_checkbox

97. 08_6_tile_seekbar

98. 08_7_tile_spinner

99. 08_8_tile_togglebutton

100. 08_9_tile_switch

101. 09_0_geotest

102. 09_1_flags

103. 09_2_capitals

104. 09_2_capitals.script

105. 10_1_select_file

106. 11_0_work_with_scripts

107. 11_1_select_script

108. 11_2_browse_script

109. 11_4_select_myscript

110. 12_0_reactiontest

111. 12_1_reaction_black_square

112. 12_2_reaction_blue_square

113. 12_3_test_compute

114. 13_0_games

115. 13_1_game15

116. 13_3_puzzle

117. 14_000_work_with_files

118. 14_00_work_with_files

119. 14_0_work_with_files

120. 14_10_edit

121. 14_10_test_format

122. 14_11_encrypting_files

123. 14_12_restructuring

124. 14_12_restructurisation

125. 14_13_sort_and_sum

126. 14_14_convert_files

127. 14_15_update_records

128. 14_16_delete_records

129. 14_17_read_file_to_string

130. 14_18_select_color

131. 14_19_browse_xml

132. 14_1_browse_cars

133. 14_2_create_file

134. 14_3_list_from_file

135. 14_4_read_file

136. 14_5_2_save_result

137. 14_5_save_result

138. 14_6_get_record

139. 14_7_show_records

140. 14_8_select_color

141. 14_9_merge_files

142. 15_0_play_music

143. 16_0_play_sound

144. 17_0_test_function

145. 17_1_test_function_math

146. 17_2_test_function_string

147. 17_3_test_function_date

148. 17_4_test_function_files

149. 17_5_test_function_array

150. 17_6_test_function_all

151. 17_7_test_function_tables

152. 17_8_paragraph

153. 18_0_lessons

154. 18_square_equation

155. 19_0_notification

156. 20_0_calendar_test

157. 21_0_calculator

158. 22_shopping_list

159. 25_1_hash_get_capital

160. 25_2_simple_hash_array

161. 25_3_simple_array

162. 25_4_transform_dictionary

163. 25_work_with_array

164. 26_1_dictionary_support

165. 26_2_dictionary_languages

166. 26_3_dictionary_example

167. 26_dictionary

168. 28_installed_apps

169. 30_0_loop

170. 30_1_read_array_split_loop

171. 30_1_read_array_split_loop.script

172. 30_2_loop_in_loop

173. 30_loop

174. 32_search_internet

175. 32_search_on_the_internet

176. 33_date

177. abstract

178. bouquets

179. buttons-1

180. buttons-2

181. buttons-3

182. buttons-4

183. buttons-5

184. buttons-6

185. call_scriptA

186. call_scriptB

187. creating_dynamic_list

188. creating_dynamic_menu

189. examples_apps

190. examples_apps2

191. examples_basic_elements

192. examples_dialog

193. examples_form

194. examples_list

195. examples_main

196. examples_menu

197. examples_work_with_screen

198. hello_world

199. hello_world_1

200. hello_world_2

201. hello_world_2_landscape

202. hello_world_3

203. hello_world_4

204. hello_world_5

205. hello_world_6

206. hello_world_7

207. muster

208. myscripts

209. pie_chart

210. poem

211. property

212. scaling_form

213. SERVICE_example_person

214. sky

215. sky_landscape

216. words

217. _assistant

218. _assistant_CREATE_DIALOG

219. _assistant_CREATE_FORM

220. _assistant_CREATE_LIST

221. _assistant_CREATE_MENU

222. _assistant_DIALOG

223. _assistant_DIRECTORY

224. _assistant_FORM

225. _assistant_LIST

226. _assistant_MENU

227. _browse_script

228. _calendar

229. _colors

230. _copy_script_from_download

231. _CREATE_FILE_MANAGEMENT

232. _CREATE_FILE_SERVICE

233. _create_script

234. _create_service_file

235. _dictionary

236. _dictionary_example

237. _dictionary_support

238. _directories_extend

239. _download_and_browse_docu

240. _download_sample_list

241. _download_sample_scripts

242. _editor

243. _editor_landscape

244. _editor_portrait

245. _files_menu

246. _FILE_SERVICE

247. _get_dictionary

248. _get_examplescripts_from_server

249. _get_scripts_from_server

250. _get_systemscripts_from_server

251. _globals

252. _language

253. _last

254. _list_files

255. _mainmenu

256. _mainmenu.script

257. _menu

258. _more

259. _muster

260. _mydictionary

261. _mydictionary_example

262. _mydictionary_support

263. _myfirst

264. _my_friends

265. _notifications

266. _popupmenu

267. _popupmenu_win

268. _repaire

269. _sample_list

270. _scripts_menu

271. _selectmyscript

272. _selectproject

273. _selectsample

274. _selectsystem

275. _SERVICE_for_example_person

276. _setting_colorscheme

277. _setting_config

278. _setting_dateformat

279. _setting_emails

280. _setting_font

281. _setting_friends

282. _setting_language

283. _setting_menu

284. _setting_menu2

285. _setting_parameters

286. _setting_profile

287. _setup2

288. _setup3

289. _setup4

290. _setup6

291. _setup7

292. _setup_download_files

293. _setup_download_flags

294. _setup_download_icons

295. _setup_download_images

296. _setup_download_music

297. _setup_download_schemes

298. _setup_download_sound

299. _system_sound

300. _tables

301. _tables_fields

302. _template_dialog

303. _template_dialogue

304. _template_form

305. _template_list

306. _template_menu

307. _test_profile

308. _thanks

309. _trace

310. _upload_script

Die bereitgestellten Screenshots können geringfügig von den tatsächlichen Ergebnissen der Skripte abweichen.