-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathmodel.nlogo
1509 lines (1344 loc) · 34.8 KB
/
model.nlogo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
extensions [ gis nw cf ]
globals [
bounds-dataset
landuse-dataset
outer-bounds-dataset
envelope-dataset
openspace-patches
tradearea-patches
industry-patches
facility-patches
residential-patches
workarea-patches
working-agent
moving-agent
home-agent
agent-on-traffic
minute
hour
day
minutes-per-ticks
]
undirected-link-breed [ streets street ]
breed [ peoples people ]
breed [ nodes node ]
peoples-own [
location-record
current-location
activity
occupation
home-location
work-location
route-counter
route
target
speed
car-ahead
working-time
preparation-time
trip-length
trip-time
]
patches-own [ city landuse district ]
nodes-own [ route-length nodes-route use occupied? ]
;;;;;;;;;;;;;;;;;;
;;Main Procedure;;
;;;;;;;;;;;;;;;;;;
to setup
clear-all
setup-gis
setup-globals
setup-time
setup-environment
setup-roads
setup-peoples
ask peoples [
setup-route
]
count-by-activity
reset-ticks
end
to go
time-update
ask peoples [
run-schedule
;update-location
]
count-by-activity
if day > 0 [ stop ]
tick
end
;;;;;;;;;;;;;;;;;;;;;;;;;
;;Environment Procedure;;
;;;;;;;;;;;;;;;;;;;;;;;;;
to setup-gis
;; Membaca shapefile
set bounds-dataset gis:load-dataset "shapefile/bounds.shp"
set landuse-dataset gis:load-dataset "shapefile/landuse.shp"
set outer-bounds-dataset gis:load-dataset "shapefile/outer-bounds.shp"
set envelope-dataset gis:load-dataset "shapefile/box.shp"
;; Mengatur batasan tampilan kota
gis:set-world-envelope (gis:envelope-of envelope-dataset)
;; Menerapkan atribut “guna-lahan” dan “kota” ke masing-masing patch
gis:apply-coverage landuse-dataset "LANDUSE" landuse
gis:apply-coverage bounds-dataset "KECAMATAN" district
end
to setup-globals
set openspace-patches patches with [landuse = "openspace"]
set tradearea-patches patches with [landuse = "commercial"]
set industry-patches patches with [landuse = "industrial"]
set facility-patches patches with [landuse = "facility"]
set residential-patches patches with [landuse = "residential"]
set workarea-patches (patch-set tradearea-patches industry-patches facility-patches)
end
to setup-environment
;; Mengatur tampilan warna patch berdasarkan atribut guna lahan
ask patches [set pcolor white]
ask openspace-patches [ set pcolor lime + 1 set landuse "Ruang Terbuka" ]
ask facility-patches [ set pcolor pink + 2 set landuse "Fasilitas Umum" ]
ask industry-patches [ set pcolor magenta + 1 set landuse "Industri" ]
ask tradearea-patches [ set pcolor red + 1 set landuse "Perdagangan dan Jasa"]
ask residential-patches [ set pcolor yellow + 1 set landuse "Permukiman" ]
;; Menggambar batas administrasi
gis:set-drawing-color black gis:draw outer-bounds-dataset 1
end
to-report meters-per-patch
let world gis:world-envelope ;
let x-meters-per-patch (item 1 world - item 0 world) / (max-pxcor - min-pxcor)
let y-meters-per-patch (item 3 world - item 2 world) / (max-pycor - min-pycor)
report mean list x-meters-per-patch y-meters-per-patch
end
;;;;;;;;;;;;;;;;;;;
;;Roads Procedure;;
;;;;;;;;;;;;;;;;;;;
to setup-roads
nw:set-context nodes streets
nw:load "data/setup-roads.gdf" nodes streets
ask nodes [street-setup]
create-local-street
end
to create-local-street
ask workarea-patches
[
sprout-nodes 1 [
create-street-with min-one-of other nodes [distance myself]
street-setup
set use "work"
]
]
ask n-of num-peoples residential-patches
[
sprout-nodes 1 [
create-street-with min-one-of other nodes [distance myself]
street-setup
set use "home"
]
]
end
to street-setup
set color grey + 5
set size 0.05
set shape "circle"
end
;;;;;;;;;;;;;;;;;;;;;
;;peoples Procedure;;
;;;;;;;;;;;;;;;;;;;;;
to setup-peoples
create-peoples num-peoples
ask peoples [
set color blue
set size 1
set home-location one-of nodes with [use = "home" and occupied? = 0]
ask home-location [set occupied? 1]
setxy [pxcor] of home-location [pycor] of home-location
assign-workplace
set activity "persiapan"
set working-time jam-kerja * 60
set preparation-time jam-berangkat * 60
set speed 0.1 + random-float 0.5
set location-record []
]
;update-location
end
to assign-workplace
let n-trade-worker round (num-peoples * work-trade / 100)
let n-industry-worker round (num-peoples * work-industry / 100)
let n-service-worker round (num-peoples * work-service / 100)
let n-other-worker (num-peoples - n-trade-worker - n-industry-worker - n-service-worker)
let list-worker (list n-service-worker n-industry-worker n-trade-worker n-other-worker)
let list-work-patches (list facility-patches industry-patches tradearea-patches workarea-patches)
let list-occupation (list "public service" "industry" "trade" "others")
(foreach list-worker list-work-patches list-occupation [ [a b c] ->
ask n-of a peoples [
set work-location one-of nodes-on b
ask work-location [set occupied? occupied? + 1]
set occupation c
]
])
end
to setup-route
ask home-location [
set nodes-route nw:turtles-on-path-to [work-location] of myself
set route-length nw:distance-to [work-location] of myself
]
ask nodes with [nodes-route != 0] [
ask peoples-on self [
set route-counter 0
set route [nodes-route] of myself
set target item 1 route
set trip-length [route-length] of myself
]
]
end
; General movement procedure
to run-schedule
cf:match ([activity] of self)
cf:case [ [a] -> (a = "persiapan") ]
[
if (preparation-time <= 0) or (hour >= jam-berangkat)
[
set activity "berangkat"
set route-counter 1
]
]
cf:case [ [a] -> (a = "berangkat") ]
[
ifelse (patch-here != work-location)
[ set color green
face target
if distance target = 0
[ set route-counter route-counter + 1
set trip-time trip-time + 1
ifelse route-counter >= length route
[ set activity "bekerja" ]
[ set target item route-counter route
face target ]
]
ifelse distance target < 1
[ move-to target ]
[ move ]
]
[ set activity "bekerja" ]
]
cf:case [ [a] -> (a = "bekerja") ]
[
if (working-time > 0) or (hour >= jam-pulang)
[
set color red
set activity "bekerja"
set working-time working-time - minutes-per-ticks
]
if working-time = 0 [ set activity "pulang" ]
]
cf:case [ [a] -> (a = "pulang") ]
[
ifelse (patch-here != home-location)
[ set color green
face target
if distance target = 0
[ set route-counter route-counter - 1
set trip-time trip-time + 1
ifelse route-counter < 0
[ set activity "istirahat" ]
[ set target item route-counter route
face target ]
]
ifelse distance target < 1
[ move-to target ]
[ move ]
]
[ set activity "istirahat" ]
]
cf:else [ [a] -> set color blue ]
end
; Car Following Algorithm (Based on Traffic Basic Model)
to move
set trip-time trip-time + 1
set car-ahead one-of other moving-agent in-cone 1 30
ifelse car-ahead != 0
[ set car-ahead one-of other moving-agent in-cone 1 60 ]
[ set car-ahead nobody ]
ifelse car-ahead != nobody
[ slow-down-car car-ahead
if [car-ahead] of car-ahead = self
[ set speed 0
overturn ]
]
[ speed-up-car ]
if speed <= speed-min [ set speed speed-min ]
if speed > speed-limit [ set speed speed-limit ]
fd speed
end
to slow-down-car [ car-upfront ]
set speed [ speed ] of car-upfront - deceleration
end
to speed-up-car
set speed speed + acceleration
end
to overturn
;Menyingkir dari jalan
rt 60
fd 1
lt 60
lt 60
fd 1
;Kembali ke jalan
lt 60
fd 1
rt 60
end
;;;;;;;;;;;;;;;;;;
;;Time Procedure;;
;;;;;;;;;;;;;;;;;;
to setup-time
set minute 0
set hour 0
set day 0
set minutes-per-ticks 1
end
to time-update
set minute minute + 1 * minutes-per-ticks
if minute >= 60 [
set hour hour + 1
set minute minute - 60
]
if hour >= 24 [
set day day + 1
set hour hour - 24
]
end
;;;;;;;;
;;Misc;;
;;;;;;;;
to update-location
ask peoples [
set current-location [district] of patch-here
; Nodes link update
set location-record lput current-location location-record
if length location-record > 2 [set location-record remove-item 0 location-record]
]
end
to count-by-activity
set working-agent peoples with [activity = "bekerja"]
set moving-agent peoples with [activity = "berangkat" or activity = "pulang"]
set home-agent peoples with [activity = "persiapan" or activity = "istirahat"]
set agent-on-traffic moving-agent with [speed = 0]
end
@#$#@#$#@
GRAPHICS-WINDOW
90
20
494
425
-1
-1
4.0
1
10
1
1
1
0
0
0
1
-49
49
-49
49
0
0
1
ticks
30.0
BUTTON
10
20
75
53
NIL
setup
NIL
1
T
OBSERVER
NIL
NIL
NIL
NIL
1
SLIDER
505
20
670
53
num-peoples
num-peoples
0
100
50.0
1
1
NIL
HORIZONTAL
BUTTON
10
55
75
88
NIL
go
T
1
T
OBSERVER
NIL
NIL
NIL
NIL
1
BUTTON
10
90
75
123
go once
go
NIL
1
T
OBSERVER
NIL
NIL
NIL
NIL
1
MONITOR
395
430
492
475
meters/patch
meters-per-patch
2
1
11
MONITOR
15
335
80
380
NIL
hour
17
1
11
MONITOR
15
385
80
430
NIL
minute
17
1
11
MONITOR
15
285
80
330
NIL
day
17
1
11
PLOT
865
25
1195
230
Peoples by Activity
Time (ticks)
Count
0.0
10.0
0.0
10.0
true
true
"" ""
PENS
"working" 1.0 0 -2674135 true "" "plot count working-agent"
"moving" 1.0 0 -13840069 true "" "plot count moving-agent"
"home" 1.0 0 -13791810 true "" "plot count home-agent"
SLIDER
505
105
670
138
work-industry
work-industry
0
100
14.0
1
1
%
HORIZONTAL
SLIDER
505
70
670
103
work-trade
work-trade
0
100
46.0
1
1
%
HORIZONTAL
SLIDER
505
140
670
173
work-service
work-service
0
100
24.0
1
1
%
HORIZONTAL
MONITOR
505
180
580
225
others (%)
100 - work-industry - work-trade - work-service
2
1
11
MONITOR
680
120
755
165
n-industry
count peoples with [occupation = \"industry\"]
17
1
11
MONITOR
760
120
835
165
n-ver-industry
work-industry / 100 * num-peoples
0
1
11
MONITOR
680
70
755
115
n-trade
count peoples with [occupation = \"trade\"]
17
1
11
MONITOR
760
70
835
115
n-ver-trade
num-peoples * work-trade / 100
0
1
11
MONITOR
680
170
755
215
n-service
count peoples with [occupation = \"public service\"]
2
1
11
MONITOR
760
170
835
215
n-ver-service
work-service / 100 * num-peoples
0
1
11
MONITOR
760
220
835
265
n-ver-other
num-peoples - (num-peoples * work-trade / 100) - (work-industry / 100 * num-peoples) - (work-service / 100 * num-peoples)
0
1
11
MONITOR
680
220
755
265
n-others
count peoples with [occupation = \"others\"]
2
1
11
SLIDER
680
285
845
318
acceleration
acceleration
0
0.0990
0.0251
0.0001
1
NIL
HORIZONTAL
SLIDER
505
280
670
313
jam-kerja
jam-kerja
1
8
8.0
1
1
NIL
HORIZONTAL
SLIDER
505
315
670
348
jam-berangkat
jam-berangkat
0
12
6.0
1
1
NIL
HORIZONTAL
SLIDER
505
350
670
383
jam-pulang
jam-pulang
13
24
16.0
1
1
NIL
HORIZONTAL
SLIDER
680
320
845
353
deceleration
deceleration
0
.099
0.056
.001
1
NIL
HORIZONTAL
SLIDER
680
355
845
388
speed-limit
speed-limit
0
1
0.6
0.05
1
NIL
HORIZONTAL
MONITOR
680
430
797
475
Real speed limit
speed-limit * meters-per-patch
2
1
11
MONITOR
1090
235
1195
280
Agent on Traffic
count agent-on-traffic
2
1
11
MONITOR
865
235
925
280
working
count working-agent
2
1
11
MONITOR
990
235
1050
280
moving
count moving-agent
2
1
11
MONITOR
930
235
987
280
home
count home-agent
2
1
11
PLOT
865
305
1025
475
Travel Time
Travel Time
Count
0.0
10.0
0.0
10.0
true
false
"" "set-plot-y-range 0 1\n set-plot-x-range 0 (max [ trip-time ] of peoples + 1)"
PENS
"test" 1.0 1 -16777216 true "" "histogram [trip-time] of peoples"
PLOT
1035
305
1195
475
Travel Length
Length (m)
Count
0.0
10.0
0.0
10.0
true
false
"" "set-plot-y-range 0 1\n set-plot-x-range 0 (max [ trip-length ] of peoples + 1)"
PENS
"default" 1.0 1 -16777216 true "" "histogram [trip-length] of peoples"
SLIDER
680
390
845
423
speed-min
speed-min
0
0.5
0.1
0.01
1
NIL
HORIZONTAL
@#$#@#$#@
## WHAT IS IT?
Model ini berusaha mempelajari struktur ruang kota harian berdasarkan aktivitas penduduk.
## HOW IT WORKS
Model ini memuat dua macam agen. Agen manusia (peoples) dan node struktur ruang (placenodes)obfuscated. Agen manusia adalah penduduk DKI Jakarta. Agen jaringan-lokasi merupakan node masing-masing kecamatan. Node ini berfungsi merekam jumlah penduduk dan atribut-atributnya pada masing-masing kecamatan. Link masing-masing node berfungsi merekam penduduk yang berpindah antar kecamatan.
Analisis node didasarkan pada submodel indeks sentralitas (Zhong, 2015).
Agen terbagi ke dalam 3 kelompok aktivitas: kerja, istirahat, transportasi. Aktivitas kerja meliputi seluruh kegiatan yang menghasilkan nilai tambah secara ekonomi, sosial, lingkungan. Termasuk didalamnya bekerja dan bersekolah. Aktivitas istirahat meliputi seluruh kegiatan yang memulihkan kembali energi agen. Aktivitas transportasi merupakan yang paling sentral dalam model ini. Meliputi seluruh pergerakan yang dilakukan penduduk sejak keluar dari rumah, pulang dari tempat kerja atau sekadar berjalan-jalan. Aktivitas lain seperti beribadah, meskipun juga menghasilkan nilai tambah secara holistik, tidak dimasukkan ke dalam model ini.
Aktivitas bekerja umumnya dilakukan di kantor. Meskipun tidak menutup kemungkinan ada agen yang beristirahat di kantor (tidak produktif). Kemungkinan ini dimasukkan dalam parameter produktivitas-kerja, yang terbagi ke dalam rentang nilai 0 sampai 1. Nilai 0 menunjukkan ketidakproduktivitas ekstrim (tidak ada yang bekerja pada waktu yang seharusnya bekerja). Nilai 1 menunjukkan Aktivitas kerja selanjutnya dibagi lagi kedalam masing-masing sektor sesuai mata pencaharian. Terdapat 9 mata pencaharian yang ditempatkan sesuai masing-masing guna lahan. Pekerjaan diluar guna lahan disesuaikan dengan data ketersediaan lapangan pekerjaan per masing-masing sektor pada setiap Kotamadya.
Aktivitas beristirahat umumnya dilakukan di rumah. Meskipun tidak menutup kemungkinan ada agen yang beristirahat di kantor (tidak produktif). Kemungkinan ini didasarkan pada jumlah penduduk dengan mata pencaharian yang mungkin dilakukan di rumah. Aktivitas ini juga bisa dilakukan di tempat rekreasi. Agen memilih untuk berekreasi sesuai tingkat kejenuhan, ketersediaan waktu dan biaya. Rekreasi dilakukan secara individu sebagaimana aktivitas bekerja, kemungkinan rekreasi dilakukan dalam grup tidak dimasukkan dalam model ini.
Aktivitas pergerakan dilakukan di jaringan jalan. Tidak terdapat perbedaan moda dalam model ini. Penduduk diasumsikan hanya bergerak menggunakan kendaraan pribadi. Hal ini dikarenakan masih minimnya persentase penggunaan kendaraan bermotor di DKI Jakarta, keterbatasan waktu dan kapasitas komputasi, serta fokus dari model ini yang berada pada persebaran aktivitas, bukan pilihan moda. Aktivitas pergerakan dibagi ke dalam dua kelompok, lancar dan tersendat. Pembagian kedua kelompok ini didasarkan pada nilai parameter batas-kecepatan.
Masalah transportasi bukan cuma masalah moda, tetapi juga persebaran aktivitas.
## HOW TO USE IT
Tombol setup mempersiapkan agen
## THINGS TO NOTICE
(suggested things for the user to notice while running the model)
## THINGS TO TRY
(suggested things for the user to try to do (move sliders, switches, etc.) with the model)
## EXTENDING THE MODEL
(suggested things to add or change in the Code tab to make the model more complicated, detailed, accurate, etc.)
## NETLOGO FEATURES
(interesting or unusual features of NetLogo that the model uses, particularly in the Code tab; or where workarounds were needed for missing features)
## RELATED MODELS
(models in the NetLogo Models Library and elsewhere which are of related interest)
## CREDITS AND REFERENCES
(a reference to the model's URL on the web if it has one, as well as any other necessary credits, citations, and links)
@#$#@#$#@
default
true
0
Polygon -7500403 true true 150 5 40 250 150 205 260 250
airplane
true
0
Polygon -7500403 true true 150 0 135 15 120 60 120 105 15 165 15 195 120 180 135 240 105 270 120 285 150 270 180 285 210 270 165 240 180 180 285 195 285 165 180 105 180 60 165 15
arrow
true
0
Polygon -7500403 true true 150 0 0 150 105 150 105 293 195 293 195 150 300 150
box
false
0
Polygon -7500403 true true 150 285 285 225 285 75 150 135
Polygon -7500403 true true 150 135 15 75 150 15 285 75
Polygon -7500403 true true 15 75 15 225 150 285 150 135
Line -16777216 false 150 285 150 135
Line -16777216 false 150 135 15 75
Line -16777216 false 150 135 285 75
bug
true
0
Circle -7500403 true true 96 182 108
Circle -7500403 true true 110 127 80
Circle -7500403 true true 110 75 80
Line -7500403 true 150 100 80 30
Line -7500403 true 150 100 220 30
butterfly
true
0
Polygon -7500403 true true 150 165 209 199 225 225 225 255 195 270 165 255 150 240
Polygon -7500403 true true 150 165 89 198 75 225 75 255 105 270 135 255 150 240
Polygon -7500403 true true 139 148 100 105 55 90 25 90 10 105 10 135 25 180 40 195 85 194 139 163
Polygon -7500403 true true 162 150 200 105 245 90 275 90 290 105 290 135 275 180 260 195 215 195 162 165
Polygon -16777216 true false 150 255 135 225 120 150 135 120 150 105 165 120 180 150 165 225
Circle -16777216 true false 135 90 30
Line -16777216 false 150 105 195 60
Line -16777216 false 150 105 105 60
car
false
0
Polygon -7500403 true true 300 180 279 164 261 144 240 135 226 132 213 106 203 84 185 63 159 50 135 50 75 60 0 150 0 165 0 225 300 225 300 180
Circle -16777216 true false 180 180 90
Circle -16777216 true false 30 180 90
Polygon -16777216 true false 162 80 132 78 134 135 209 135 194 105 189 96 180 89
Circle -7500403 true true 47 195 58
Circle -7500403 true true 195 195 58
circle
false