Added "GP Mod" logo

jhmaloney · Jun 24, 2018 · 165eb02 · 165eb02
1 parent 524bb55
commit 165eb02
Showing 1 changed file with 23 additions and 8 deletions.
diff --git a/runtime/lib/Project.gp b/runtime/lib/Project.gp
@@ -22,7 +22,7 @@ to emptyProject {
 
 method initialize Project {
   pages = (list (newProjectPage (list)))
-  images = (list (makeShip this))
+  images = (list (makeShip this) (makeGPModLogo this))
   sounds = (list (makePopSound this))
   notes = ''
   blockSpecs = (dictionary) // op -> blockSpec
@@ -685,18 +685,33 @@ method removeClassFromPages Project aClass {
 
 method makeShip Project {
   data = 'iVBORw0KGgoAAAANSUhEUgAAACgAAAAeCAYAAABe3VzdAAABmElEQVR4nGNgZ2f/D8V/1dTUDoiLiycw
-MDDwMAwWwMnJ+RvJkWAsICDwGejYBTw8PA5AJYwD6kBlZeUOkKO4ZLn+S1aL/eez4P3PzoFwrJSU1COg
-mnYWFhblgXIjm6Ki4mWQY0Rihf4r75P7r7BS5r9YhvB/bgUulJBVUVE5LSEhkcpA7yQAjGYzcFRzsv+X
-nSIJdiQY75X7LztZ8r9QgMB/TgFOuEP5+Pi+qaurrwQmBR+gdia6OBIW1dwq3P+VtssiHAnFIDHJxoFN
-AhhRjQsPWBLAGdW48EAkAVB04YtqXJieSQAR1TH4o3rAkgDJUT0QSYDcqKZnEqA4qmmeBGBRzcHJ8V92
-uhRVHQlLAjITJP4LevH/5+TnwNUWIBjV4AKcRxUY1Tsoj2pcWHGLzH/JSmASMOZBSQJD24GDPYqJrvoG
-JJOgNB6oELVULWYGe0FNcdTStKojN2rp0lgY7M2twd1gBUZDJ76oHdAm/2DvNA3ubie84y7N+V+iWBSj
-LpSRkbkP9EADMAqV6OYoZDDohz4G++ARAFGPsWx+VWYhAAAAAElFTkSuQmCC'
+  MDDwMAwWwMnJ+RvJkWAsICDwGejYBTw8PA5AJYwD6kBlZeUOkKO4ZLn+S1aL/eez4P3PzoFwrJSU1COg
+  mnYWFhblgXIjm6Ki4mWQY0Rihf4r75P7r7BS5r9YhvB/bgUulJBVUVE5LSEhkcpA7yQAjGYzcFRzsv+X
+  nSIJdiQY75X7LztZ8r9QgMB/TgFOuEP5+Pi+qaurrwQmBR+gdia6OBIW1dwq3P+VtssiHAnFIDHJxoFN
+  AhhRjQsPWBLAGdW48EAkAVB04YtqXJieSQAR1TH4o3rAkgDJUT0QSYDcqKZnEqA4qmmeBGBRzcHJ8V92
+  uhRVHQlLAjITJP4LevH/5+TnwNUWIBjV4AKcRxUY1Tsoj2pcWHGLzH/JSmASMOZBSQJD24GDPYqJrvoG
+  JJOgNB6oELVULWYGe0FNcdTStKojN2rp0lgY7M2twd1gBUZDJ76oHdAm/2DvNA3ubie84y7N+V+iWBSj
+  LpSRkbkP9EADMAqV6OYoZDDohz4G++ARAFGPsWx+VWYhAAAAAElFTkSuQmCC'
   bm = (readFrom (new 'PNGReader') (base64Decode data))
   setName bm 'ship'
   return bm
 }
 
+method makeGPModLogo Project {
+  bm = (newBitmap 100 100)
+  c = (color 64 192 48)
+  fillRoundedRect (newVectorPen bm) (rect 1 1 99 99) 10 (gray 250) 2 (gray 0)
+  fillRoundedRect (newVectorPen bm) (rect 1 1 99 65) 10 (gray 250) 2 (gray 0)
+  floodFill bm 50 90 (gray 0) 7
+  drawBlock (newShapeMaker bm) 2 67 97 29 (gray 250) 3 2 4 1
+  setFont 'Verdana' 50
+  drawString bm 'GP' c 4 -9
+  setFont 'Verdana Bold' 16
+  drawString bm 'MOD' c 25 66
+  setName bm 'GP'
+  return bm
+}
+
 method makePopSound Project {
   samples = (array
   	213 771 1981 3442 5615 7507 9020 9371 8418 5803 1651 -3755 -9633 -15264 -19571