Add online() reporter block (sensing_online) (#279)

Adds the `online()` reporter block with opcode `sensing_online` to the
sensing reporters. No arguments. Documentation added to
`docs/language/reporters/sensing.md`.

Author: aspizu

docs/language/reporters/sensing.md

@@ -200,6 +200,16 @@ user = username();
 (username)
 ```
 
+### online?
+
+```goboscript
+is_online = online();
+```
+
+```scratchblocks
+<online?>
+```
+
 ### touching color ()?
 
 ```goboscript

editors/code/syntaxes/goboscript.tmGrammar.yml

@@ -31,7 +31,7 @@ patterns:
   - name: support.function.builtin
     match: "\\b(move|turn_left|turn_right|goto_random_position|goto_mouse_pointer|goto|glide|glide_to_random_position|glide_to_mouse_pointer|point_in_direction|point_towards_mouse_pointer|point_towards_random_direction|point_towards|change_x|set_x|change_y|set_y|if_on_edge_bounce|set_rotation_style_left_right|set_rotation_style_do_not_rotate|set_rotation_style_all_around|say|think|switch_costume|next_costume|switch_backdrop|previous_backdrop|random_backdrop|next_backdrop|set_size|change_size|change_color_effect|change_fisheye_effect|change_whirl_effect|change_pixelate_effect|change_mosaic_effect|change_brightness_effect|change_ghost_effect|set_color_effect|set_fisheye_effect|set_whirl_effect|set_pixelate_effect|set_mosaic_effect|set_brightness_effect|set_ghost_effect|clear_graphic_effects|show|hide|goto_front|goto_back|go_forward|go_backward|play_sound_until_done|start_sound|stop_all_sounds|change_pitch_effect|change_pan_effect|set_pitch_effect|set_pan_effect|change_volume|set_volume|clear_sound_effects|broadcast|broadcast_and_wait|wait|stop_all|stop_this_script|stop_other_scripts|delete_this_clone|clone|ask|set_drag_mode_draggable|set_drag_mode_not_draggable|reset_timer|erase_all|stamp|pen_down|pen_up|set_pen_color|change_pen_size|set_pen_size|set_pen_hue|set_pen_saturation|set_pen_brightness|set_pen_transparency|change_pen_hue|change_pen_saturation|change_pen_brightness|change_pen_transparency|rest|set_tempo|change_tempo)\\b"
   - name: entity.name.type
-    match: "\\b(x_position|y_position|direction|size|costume_number|costume_name|backdrop_number|backdrop_name|volume|distance_to_mouse_pointer|distance_to|touching_mouse_pointer|touching_edge|touching|key_pressed|mouse_down|mouse_x|mouse_y|loudness|timer|current_year|current_month|current_date|current_day_of_week|current_hour|current_minute|current_second|days_since_2000|username|touching_color|color_is_touching_color|answer|random|contains)\\b"
+    match: "\\b(x_position|y_position|direction|size|costume_number|costume_name|backdrop_number|backdrop_name|volume|distance_to_mouse_pointer|distance_to|touching_mouse_pointer|touching_edge|touching|key_pressed|mouse_down|mouse_x|mouse_y|loudness|timer|current_year|current_month|current_date|current_day_of_week|current_hour|current_minute|current_second|days_since_2000|username|online|touching_color|color_is_touching_color|answer|random|contains)\\b"
   - name: punctuation
     match: ",|;"
   - name: keyword.operator

editors/notepad++/goboscript.udl.xml

@@ -31,7 +31,7 @@
             <Keywords name="Keywords5">on onflag onkey onclick onbackdrop onloudness ontimer onclone on</Keywords>
             <Keywords name="Keywords6">show hide add to delete insert at of as</Keywords>
             <Keywords name="Keywords7">move turn_left turn_right goto_random_position goto_mouse_pointer goto glide glide_to_random_position glide_to_mouse_pointer point_in_direction point_towards_mouse_pointer point_towards_random_direction point_towards change_x set_x change_y set_y if_on_edge_bounce set_rotation_style_left_right set_rotation_style_do_not_rotate set_rotation_style_all_around say think switch_costume next_costume switch_backdrop next_backdrop set_size change_size change_color_effect change_fisheye_effect change_whirl_effect change_pixelate_effect change_mosaic_effect change_brightness_effect change_ghost_effect set_color_effect set_fisheye_effect set_whirl_effect set_pixelate_effect set_mosaic_effect set_brightness_effect set_ghost_effect clear_graphic_effects show hide goto_front goto_back go_forward go_backward play_sound_until_done start_sound stop_all_sounds change_pitch_effect change_pan_effect set_pitch_effect set_pan_effect change_volume set_volume clear_sound_effects broadcast broadcast_and_wait wait stop_all stop_this_script stop_other_scripts delete_this_clone clone ask set_drag_mode_draggable set_drag_mode_not_draggable reset_timer erase_all stamp pen_down pen_up set_pen_color change_pen_size set_pen_size set_pen_hue set_pen_saturation set_pen_brightness set_pen_transparency change_pen_hue change_pen_saturation change_pen_brightness change_pen_transparency rest set_tempo change_tempo</Keywords>
-            <Keywords name="Keywords8">x_position y_position direction size costume_number costume_name backdrop_number backdrop_name volume distance_to_mouse_pointer distance_to touching_mouse_pointer touching_edge touching key_pressed mouse_down mouse_x mouse_y loudness timer current_year current_month current_date current_day_of_week current_hour current_minute current_second days_since_2000 username touching_color color_is_touching_color answer random contains</Keywords>
+            <Keywords name="Keywords8">x_position y_position direction size costume_number costume_name backdrop_number backdrop_name volume distance_to_mouse_pointer distance_to touching_mouse_pointer touching_edge touching key_pressed mouse_down mouse_x mouse_y loudness timer current_year current_month current_date current_day_of_week current_hour current_minute current_second days_since_2000 username online touching_color color_is_touching_color answer random contains</Keywords>
             <Keywords name="Delimiters">00&quot; 01\&quot; 02&quot; 03 04 05 06``` 07 08``` 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23</Keywords>
         </KeywordLists>
         <Styles>

gdsl.txt

@@ -193,6 +193,7 @@ current_minute                    ...                            | ...=MINUTE
 current_second                    ...                            | ...=SECOND         | 
 days_since_2000                   dayssince2000                  |                    | 
 username                          username                       |                    | 
+online                            online                         |                    | 
 touching_color                    touchingcolor     COLOR        |                    | 
 color_is_touching_color           coloristouchingcolor COLOR,COLOR2|                  | 
 answer                            answer                         |                    | 

src/blocks.rs

@@ -276,8 +276,7 @@ pub enum Block {
     ChangePenSaturation,
     ChangePenBrightness,
     ChangePenTransparency,
-    PlayDrum1,
-    PlayDrum2,
+    PlayDrum,
     PlayNote,
     SetInstrument,
     Rest,
@@ -438,13 +437,7 @@ impl Block {
                 field: "colorParam",
                 default: "transparency",
             }),
-            Self::PlayDrum1 => Some(Menu {
-                opcode: "music_menu_DRUM",
-                input: "DRUM",
-                field: "DRUM",
-                default: "1",
-            }),
-            Self::PlayDrum2 => Some(Menu {
+            Self::PlayDrum => Some(Menu {
                 opcode: "music_menu_DRUM",
                 input: "DRUM",
                 field: "DRUM",
@@ -467,7 +460,6 @@ impl Block {
             "say" => &[Self::Say2, Self::Say1],
             "think" => &[Self::Think2, Self::Think1],
             "clone" => &[Self::Clone0, Self::Clone1],
-            "play_drum" => &[Self::PlayDrum1, Self::PlayDrum2],
             _ => &[],
         }
     }
@@ -573,9 +565,7 @@ impl Block {
             ("change_pen_saturation", _) => Some(Self::ChangePenSaturation),
             ("change_pen_brightness", _) => Some(Self::ChangePenBrightness),
             ("change_pen_transparency", _) => Some(Self::ChangePenTransparency),
-            ("play_drum", 1) => Some(Self::PlayDrum1),
-            ("play_drum", 2) => Some(Self::PlayDrum2),
-            ("play_drum", _) => Some(Self::PlayDrum1),
+            ("play_drum", _) => Some(Self::PlayDrum),
             ("play_note", _) => Some(Self::PlayNote),
             ("set_instrument", _) => Some(Self::SetInstrument),
             ("rest", _) => Some(Self::Rest),
@@ -681,8 +671,7 @@ impl Block {
             Self::ChangePenSaturation => "change_pen_saturation",
             Self::ChangePenBrightness => "change_pen_brightness",
             Self::ChangePenTransparency => "change_pen_transparency",
-            Self::PlayDrum1 => "play_drum",
-            Self::PlayDrum2 => "play_drum",
+            Self::PlayDrum => "play_drum",
             Self::PlayNote => "play_note",
             Self::SetInstrument => "set_instrument",
             Self::Rest => "rest",
@@ -887,8 +876,7 @@ impl Block {
             Self::ChangePenSaturation => "pen_changePenColorParamBy",
             Self::ChangePenBrightness => "pen_changePenColorParamBy",
             Self::ChangePenTransparency => "pen_changePenColorParamBy",
-            Self::PlayDrum1 => "music_playDrumForBeats",
-            Self::PlayDrum2 => "music_playDrumForBeats",
+            Self::PlayDrum => "music_playDrumForBeats",
             Self::PlayNote => "music_playNoteForBeats",
             Self::SetInstrument => "music_setInstrument",
             Self::Rest => "music_restForBeats",
@@ -993,8 +981,7 @@ impl Block {
             Self::ChangePenSaturation => &["VALUE"],
             Self::ChangePenBrightness => &["VALUE"],
             Self::ChangePenTransparency => &["VALUE"],
-            Self::PlayDrum1 => &["BEATS"],
-            Self::PlayDrum2 => &["DRUM", "BEATS"],
+            Self::PlayDrum => &["DRUM", "BEATS"],
             Self::PlayNote => &["NOTE", "BEATS"],
             Self::SetInstrument => &["INSTRUMENT"],
             Self::Rest => &["BEATS"],
@@ -1101,8 +1088,7 @@ impl Block {
             Self::ChangePenSaturation => None,
             Self::ChangePenBrightness => None,
             Self::ChangePenTransparency => None,
-            Self::PlayDrum1 => None,
-            Self::PlayDrum2 => None,
+            Self::PlayDrum => None,
             Self::PlayNote => None,
             Self::SetInstrument => None,
             Self::Rest => None,
@@ -1142,6 +1128,7 @@ pub enum Repr {
     CurrentSecond,
     DaysSince2000,
     Username,
+    Online,
     TouchingColor,
     ColorIsTouchingColor,
     Answer,
@@ -1192,7 +1179,7 @@ impl Repr {
         }
     }
 
-    pub fn overloads(_name: &str) -> &'static [Self] {
+    pub fn overloads(name: &str) -> &'static [Self] {
         &[]
     }
 
@@ -1227,6 +1214,7 @@ impl Repr {
             ("current_second", _) => Some(Self::CurrentSecond),
             ("days_since_2000", _) => Some(Self::DaysSince2000),
             ("username", _) => Some(Self::Username),
+            ("online", _) => Some(Self::Online),
             ("touching_color", _) => Some(Self::TouchingColor),
             ("color_is_touching_color", _) => Some(Self::ColorIsTouchingColor),
             ("answer", _) => Some(Self::Answer),
@@ -1267,6 +1255,7 @@ impl Repr {
             Self::CurrentSecond => "current_second",
             Self::DaysSince2000 => "days_since_2000",
             Self::Username => "username",
+            Self::Online => "online",
             Self::TouchingColor => "touching_color",
             Self::ColorIsTouchingColor => "color_is_touching_color",
             Self::Answer => "answer",
@@ -1306,6 +1295,7 @@ impl Repr {
             "current_second",
             "days_since_2000",
             "username",
+            "online",
             "touching_color",
             "color_is_touching_color",
             "answer",
@@ -1345,6 +1335,7 @@ impl Repr {
             Self::CurrentSecond => "sensing_current",
             Self::DaysSince2000 => "sensing_dayssince2000",
             Self::Username => "sensing_username",
+            Self::Online => "sensing_online",
             Self::TouchingColor => "sensing_touchingcolor",
             Self::ColorIsTouchingColor => "sensing_coloristouchingcolor",
             Self::Answer => "sensing_answer",
@@ -1384,6 +1375,7 @@ impl Repr {
             Self::CurrentSecond => &[],
             Self::DaysSince2000 => &[],
             Self::Username => &[],
+            Self::Online => &[],
             Self::TouchingColor => &["COLOR"],
             Self::ColorIsTouchingColor => &["COLOR", "COLOR2"],
             Self::Answer => &[],
@@ -1423,6 +1415,7 @@ impl Repr {
             Self::CurrentSecond => Some("{\"CURRENTMENU\": [\"SECOND\", null]}"),
             Self::DaysSince2000 => None,
             Self::Username => None,
+            Self::Online => None,
             Self::TouchingColor => None,
             Self::ColorIsTouchingColor => None,
             Self::Answer => None,